Discussion :

[devalender]

Bonjour a tous
je viens du monde de windev, étant dans l'incapacité de monter une dll sous windev (Impossible sous windev),
j'ai été obliger de revenir sous delphi 2005 pour la monter. voici donc mon problème:

j'ai une table ou j'ai plusieurs chaines de caractères représentant l’accès a des images voici une extrait :

D:\DOSSIER\VAGUE 2\FOTO FEKESSE 04-08-10\Photo 001.jpg
D:\DOSSIER\VAGUE 2\FOTO FEKESSE 04-08-10\Photo 002.jpg
D:\DOSSIER\VAGUE 2\FOTO FEKESSE 04-08-10\Photo 03.jpg
C:\EVOLIS\PHOTOS\FOTO PATRON ASSI 23 08 11\Photo 007.jpg
D:\DOSSIER \VAGUE 2\FOTO FEKESSE 04-08-10\Photo 005.jpg

je cherche donc a récupérer pour chaque ligne le nom du fichier (en rouge dans l'extrait).
j'ai pu résoudre ce problème avec des fonctions prédéfinie dans windev, mais là j'ai du mal a bouclé avec delphi.

merci a tous

[JustMe]

Code :

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

ExtractFileName('D:\DOSSIER\VAGUE 2\FOTO FEKESSE 04-08-10\Photo 001.jpg');

[devalender]

merci

[ShaiLeTroll]

En même temps, c'est la même fonction en Windev ?

Code windev :

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

1
2
3
// Récupération du nom du fichier
ResNomFichier = fExtraitChemin("C:\MesRépertoires\Fichier.doc", fFichier+fExtension)
// fExtraitChemin renvoie "Fichier"

ou

Code windev :

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

1
2
3
4
// Récupération du nom du fichier
ResNomFichier = fExtractPath("C:\MesRépertoires\Fichier.doc", fFileName+fExtension)
fDirectory+fFileName:)
// fExtractPath renvoie "Fichier"

Tu devrais prendres les noms anglais de fonctions Windev, tu trouveras plus vite les équivalents Delphi !

[devalender]

effectivement !