Pfad:
extractfilepath(filename)
Dateiname:
extractfilename(filename)
Endung des Dateinamens:
extractfileext(filename)
Endung des Dateinamens ändern:
changefileext(filename, newext)
Laufwerksbuchstabe:
Delphi-Quellcode:
function driveletter(filename:string);
begin
if filename[2]=':' then result:=filename[1] else result:=paramstr(0)[1];
end;