Abgesehen vom syntaktischen sehe ich noch ein funktionelles Problem. Wenn auf einen absoluten Pfad inklusive Laufwerk geprüft werden soll, dann besser so:
Delphi-Quellcode:
uses
SysUtils // ExtractFileDrive(), PathDelim
;
function CheckAbsoluteDrivePath(fn: TFileName): Boolean;
var
drive: String;
begin
drive := ExtractFileDrive(fn);
Delete(fn, 1, Length(drive));
Result := (drive <> '') and (Copy(fn, 1, 1) = PathDelim);
end;
Grüße vom marabu