Prüfen ob relativer oder absoluter Pfad

[alcaeus]

Da kann ich mit einem Vierzeiler dagegenhalten:

Delphi-Quellcode:

function IsRelativePath(Path: String): Boolean;
begin
  Result := (Path[2] <> ':') and (Copy(Path, 1, 2) <> '\\');
end;

Die Funktion kommt auch mit Verzeichnissen wie

Code:

\\PC-Name\Freigabe

klar, denn das waere auch ein absoluter Pfad.

Greetz
alcaeus