débarrasser un string de son dernier caractère ?

**fakinou** · 28/09/2005, 08h57

bonjour

je cherche à débarrasser un string de son dernier caractère
comment faire ?

merci
seb

**Pedro** · 28/09/2005, 09h00

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
function DeleteLastChar(Value:string):string;
begin
  Result:=ReverseStr(Value);
  Delete(Result,1,1);
  Result:=ReverseStr(Result);
end;

Voila...

**fakinou** · 28/09/2005, 09h03

j'ai le droit a un undeclared identifier pour reversestr

**Pedro** · 28/09/2005, 09h04

Oui il faut ajouter StrUtils dans uses ou encore faire

dessus

**fakinou** · 28/09/2005, 09h06

meme avec StrUtils ça ne marche pas

**rbh** · 28/09/2005, 09h09

Plus basique

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
function DeleteLastChar(Value:string):string;
begin
  Result:=LeftStr(Value, Length(Value)-1);
end;

**Pedro** · 28/09/2005, 09h22

Envoyé par fakinou

meme avec StrUtils ça ne marche pas

Alors fait

dessus pour savoir d'où elle vient

**fakinou** · 28/09/2005, 09h23

The keyword or string sent to Help from the IDE is not specified in any topic in this Help system.

**Pedro** · 28/09/2005, 09h26

Les autres solutions:
- Utiliser la solution de rbh
- Faire une recherche dans

(dix de der) avec "reverse string" en mots-clés comme j'ai fait moi...

**fakinou** · 28/09/2005, 09h26

rbh est ce que je peux jarter la fonction et en faire une simple ligne de code comme ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

LeftStr(lastclip, Length(lastclip)-1);

lastclip etant mon string (lol)

en tout cas ça ne change rien à mon string on dirait :/

**Lung** · 28/09/2005, 09h27

Inconnue pour moi aussi.
Par contre, j'ai trouvé ca : ReverseString

**Pedro** · 28/09/2005, 09h29

Houla oui c'est effectivement ReverseString... Mais il aurait pu la retrouver en cherchant un peu...

**fakinou** · 28/09/2005, 09h30

je viens de tomber dessus mais ça ne fait rien :/

**Pedro** · 28/09/2005, 09h32

Désolé de m'être emporté fakinou

C'est bon? Ca marche?

**fakinou** · 28/09/2005, 09h33

hé bien non en testant sur mon string (lol) ça ne fait rien du tout
rien ne change :/

**Pedro** · 28/09/2005, 09h35

Donne moi la déclaration de ReverseString dans l'aide stp

**Lung** · 28/09/2005, 09h35

Et ca :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MaChaine := Copy(MaChaine, 1, Length(MaChaine) - 1);

**Pedro** · 28/09/2005, 09h36

Ah oui c'est encore plus simple... Je n'y pense jamais à Copy

J'ajouterais même:

**fakinou** · 28/09/2005, 09h44

yes lung magnifique 8)

**Lung** · 28/09/2005, 09h45

débarrasser un string de son dernier caractère ?

Langage Delphi

Discussions similaires

Partager

Partager