Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by HeikoAdams,
18. Mai 2009
Eben nicht. ExtractFilePath liefert - wie der Name schon sagt, den kompletten Pfad. Meine Funktion liefer nur den Namen des Verzeichnisses.
Forum: Neuen Beitrag zur Code-Library hinzufügen
Delphi
by HeikoAdams,
18. Mai 2009
Um den Namen des Verzeichnisses (ohne den restlichen Pfad), in dem eine Datei gespeichert ist, zu extrahieren, ist folgende Funktion nutzbar:
function GetFileDir(const aBasepath, aFilename: string): string;
begin
Result := Copy(aFilename, Length(aBasepath) +1,
PosEx('\', aFilename, Length(aBasepath) + 1) - Length(aBasepath));
end;