Retourner une chaine...
ELECTRORESiSTiK
Messages postés
25
Date d'inscription
dimanche 6 janvier 2002
Statut
Membre
Dernière intervention
11 août 2002
-
9 janv. 2002 à 15:28
ELECTRORESiSTiK Messages postés 25 Date d'inscription dimanche 6 janvier 2002 Statut Membre Dernière intervention 11 août 2002 - 9 janv. 2002 à 17:59
ELECTRORESiSTiK Messages postés 25 Date d'inscription dimanche 6 janvier 2002 Statut Membre Dernière intervention 11 août 2002 - 9 janv. 2002 à 17:59
A voir également:
- Retourner une chaine...
- Parcourir une chaine de caractère en python ✓ - Forum Python
- Extraction d'une partie d'une chaine dans une chaine - Forum Python
- Chaine de caractère ✓ - Forum Python
- Sql découper une chaîne séparateur - Forum SQL
- Le format de la chaîne d'entrée est incorrect ✓ - Forum C# / .NET
2 réponses
cs_Amadeus
Messages postés
123
Date d'inscription
mercredi 2 janvier 2002
Statut
Membre
Dernière intervention
15 mars 2004
2
9 janv. 2002 à 17:38
9 janv. 2002 à 17:38
J'ai écrit cela si ça peut d'aider :
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;
exemple : InverseStr('12345') renvoie '54321'
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;
exemple : InverseStr('12345') renvoie '54321'
ELECTRORESiSTiK
Messages postés
25
Date d'inscription
dimanche 6 janvier 2002
Statut
Membre
Dernière intervention
11 août 2002
9 janv. 2002 à 17:59
9 janv. 2002 à 17:59
Ok, merci beaucoup!
Bonne Soirée!
Bonne Soirée!
