Fonction pour inverser une chaine de caractère !

Commenter

Contenu du snippet

Salut, une petite fonction bien sympa que l'on m'a donné et qui peut servir à tout le monde! Elle permet d'inverser une chaine de caractère comme par exemple :
InverseStr('1234567890') donnera '0987654321'

Source / Exemple : 


Function InverseStr(sDep : string) : string;
var
sFin : string;
i : integer;
begin
sFin:= '';
for i:= length(sDep) downto 1 do
begin
sFin:= sFin + copy(sDep, i,1);
end;
result:= sFin;
end;

Conclusion :


Bonne Programmation..

A voir également

S'inscrire maintenant

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.