buguetj
Messages postés76Date d'inscriptionlundi 25 octobre 2004StatutMembreDernière intervention 5 avril 2012
-
27 déc. 2008 à 22:17
buguetj
Messages postés76Date d'inscriptionlundi 25 octobre 2004StatutMembreDernière intervention 5 avril 2012
-
28 déc. 2008 à 11:21
Bonjour a tous, et bonne fêtes,
je suis en train de créer une application écrite en delphi pour fonctionner sous windows.
Je m'explique, j'ai actuellement utiliser la fonction ParamStr(0) pour obtenir dans un TEdit le chemin et le nom de mon application.
Edit1.Text:=ParamStr(0);
Je souhaiterais dans un TLabel, incrire seulement le nom du fichier. Je sais qu'avec un TOpenDialog, la fonction GetNamePatch permet cela mais je n'utilise pas ce composant.
gbegreg
Messages postés9Date d'inscriptionjeudi 17 juillet 2003StatutMembreDernière intervention 1 mars 2012 27 déc. 2008 à 23:19
Bonsoir,
Les fonctions ExtractFileName et ExtractFilePath de l'unité SysUtils existent et sont là pour ça. Elles retournent respectivement le nom du fichier et le répertoire du fichier à partir d'un nom complet de fichier (répertoire + nom du fichier).
De plus, pour récupérer le nom complet de l'application, tu peux utiliser la propriété exename de l'objet application : application.exename.
Donc pour ta demande, voici ce qu'il faut écrire (je suppose que ton TLabel se nomme lblNomAppli) :
lblNomAppli.caption := ExtractFileName(application.exename);