DELPHI PROCEDURE ET FONCTION :
EXTRACTFILEDRIVE
ExtractFileDrive - SysUtils

Cette fonction retourne l'unité disque d'un chemin de fichier.

Syntaxe :
Function ExtractFileDrive(const FileName: String): String;
Exemple :
procedure TForm1.Button1Click(Sender: TObject);
begin

Label1.Caption := ExtractFileDrive('c:\dossier\fichier.txt');
// resultat : c:

end;
↓ A voir aussi ↓
PROCEDURES ET FONCTIONS >>