Renvoit une chaine de x fois le caractère demandé
Soyez le premier à donner votre avis sur cette source.
Snippet vu 5 027 fois - Téléchargée 30 fois
Contenu du snippet
Ecrite uniquement pour optimiser la version Delphi.
Cette fonction renvoit un shortstring contenant "Nb" fois le caractère "Car".
Cette fonction renvoit un shortstring contenant "Nb" fois le caractère "Car".
Source / Exemple :
Function RepCar(Car:Char; Nb:Byte):ShortString; Assembler;
Asm
// original delphi coded version : 26 lines and 2 external procedures call, now it's 10 lines
push edi
mov edi,@Result
mov ebx,eax // save needed car (EAX) into ebx
mov al,dl // now take the number of chars (EDX) into al
stosb // and store it ;)
xor ecx,ecx
mov cl,dl // say we want Nb Chars
mov al,bl // of this char
rep stosb // and repeat ;)
pop edi
End;
A voir également
- Renvoit une chaine de x fois le caractère demandé
- Fonction chaîne x fois le même caractère ✓ - Forum - VB.NET
- Répéter un Caractère x fois ✓ - Forum - C# / .NET
- Remplacer chaîne string en array de caractères - pb avec les accents ✓ - Forum - PHP
- Empêcher d'entrer 2 fois le caractère virugule dans une TextBox ✓ - Forum - Visual Basic 6
- [Déplacé .NET -> VBA]Macro pour Copier une zone d'une feuille de calcule X fois ✓ - Forum - Visual Basic 6
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.