Discussion :

[BYALI]

bonjour,
j'ai le programme suivant:

Code :

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

1
2
3
4
5
6
7
 
 if openpicturedialog.Execute then
 begin
  img.Picture.LoadFromFile(openpicturedialog.FileName);
  table1['photo']:=openpicturedialog.FileName;
  extension:=  ??? extension du fichier obtenu
 end;

j'ai donc besoin de la commande qu'il faut pour garder l'extension du fichier obtenu par le composant c ité ci dessus.

salutations

[Cl@udius]

Salut

Code :

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

1
2
 
extension := ExtractFileExt(Filename);

A noter que le point est inclus dans le résultat.

@+ Claudius