Discussion :

[codial]

Bonjour,

quelqu'un sait comment séparer le nom d'un fichier de son extension ?

D'avance merci

Cordialement

[philnext]

Oui tu utilise ExtractFileExt (sysutils) pour extraire l'extension puis tu 'enlève avec un Copy par exemple.

[ebastien]

Bonjour,
Tu peux voir du côté des fonctions ExtractFileExt et ChangeFileExt
Exemple :

Code :

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

1
2
3
4
5
6
7
procedure TForm1.Button1Click(Sender: TObject);
var aFile : TFileName;
begin
  aFile := 'C:\tmp\toto.txt';
  Label1.Caption := ExtractFileExt(aFile); // Retourne '.txt'
  Label2.Caption := ChangeFileExt(aFile,''); // Retourne 'C:\tmp\toto'
end;

En espérant avoir répondu à ta question ...
Eb

[codial]

Bonsoir,

merci à vous pour le coup de main, vous avez été rapide

Cordialement