Read until [Résolu]

Signaler
Messages postés
79
Date d'inscription
vendredi 26 mai 2006
Statut
Membre
Dernière intervention
10 juillet 2008
-
Messages postés
79
Date d'inscription
vendredi 26 mai 2006
Statut
Membre
Dernière intervention
10 juillet 2008
-
Je sais que ses une questions simple mais bon:
comment je lit le texte jusquau \
exemple: C:\allo\Bonjour    il vas lire: Bonjour

Merci en avance.

3 réponses

Messages postés
4202
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
13 juin 2020
37
function Cut(Var S : string) : string;
var L   : integer;
begin
  L := Length(S);
  result := Copy(S, L-Pos('\',ReverseString(S))+1, L);
end;
Messages postés
600
Date d'inscription
samedi 8 juin 2002
Statut
Membre
Dernière intervention
6 avril 2010
1
Ou encore dans ton cas:
ExtractFileName('C:\allo\Bonjour') //<-Renvoie la chaîne 'Bonjour'
Messages postés
79
Date d'inscription
vendredi 26 mai 2006
Statut
Membre
Dernière intervention
10 juillet 2008

Ok, merci sa vas m'aider.