Sélectionner une partie d'une string

Contenu du snippet

Voila comment je fais pour sélectionner le nom d'un fichier d'une url.
par exemple j'ai une url de ce type dans un TEdit : http://www.web.fr/fichier.zip
et pour des raisons quelconque, j'ai besoin de récupérer "fichier.zip".

Source / Exemple :


var
   Taille, i: integer;
   url, chaine2: string;

begin
   url:= Edit1.Text;
   Taille:= Length(url); //on compte le nbre de caracteres de l'url

   for i:= Taille downto 0 do //on décompte jusqu'a 0
      begin
         if url[i] = '/' then //on regarde si on rencontre / pendant le décompte.
            begin
            chaine2:= Copy(url, i + 1, Taille); //si oui, on copie la chaine
            ShowMessage(chaine2);                  //entre i+1 et la fin
            Exit; // on sort pour arreter au 1er / rencontré.
            end;
      end;

end;

Conclusion :


Length(url) permet de connaitre le nombre de caracteres de l'url.
On décompte de cette valeur jusqu'a 0, en cherchant le signe : /
si on le trouve, alors on copie la string qui se situe entre le signe / et la fin, sans prendre le /.
j'ai mis un ShowMessage pour voir vérifier le fonctionnement, mais le but, et d'utiliser chaine2 autre part.
enfin, on quite pour ne pas répéter la boucle for.

A voir également

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.