netFrame-Syntax:
function ExtractFilePath(aFileName: string) : string
Beschreibung:
Die ExtractFilePath Funktion extrahiert aus dem aFileName den Pfad Anteil.
Die Funktion holt sich den Teil bis einschliesslich des \ vor dem Dateinamen.
Beispiel:
procedure sample;
var
fullFileName : string;
begin
// Set up a full file name with drive and path
fullFileName := 'C:\Program Files\Borland\Delphi7\Projects\Unit1.dcu';
// Show the component parts of this full name
ShowMessage('Drive = '+ExtractFileDrive (fullFileName));
ShowMessage('Dir = '+ExtractFileDir (fullFileName));
ShowMessage('Path = '+ExtractFilePath (fullFileName));
ShowMessage('Name = '+ExtractFileName (fullFileName));
ShowMessage('Ext = '+ExtractFileExt (fullFileName));
end;
Ergebnis:
- Drive = C:
- Dir = C:\Program Files\Borland\Delphi7\Projects
- Path = C:\Program Files\Borland\Delphi7\Projects\
- Name = Unit1.dcu
- Ext = .dcu