Laufwerksbuchstabe aus String entfernen

[Helmi]

Hallo,

ich habe einen String: "C:\test\testtest\".

Ich möchte nun den Laufwerksbuchstaben entfernt haben.
Also so: "\test\testtest\

Es kann aber sein, dass der String auch auf einen Server schaut:
"\\Server\test\testtest\"

Ich kann also nicht einfach die ersten zwei Zeichen rauslöschen.

Gibt es dafür eine Function?

[jokerfacehro]

wenn 1. zeichen ungleich "\" dann lösche die ersten 2 zeichen

[_frank_]

ich würde lieber nach dem : suchen, dann kann man auch URLs unterscheiden :)
einfach blind 2 zeichen entfernen ist ziemlich unsicher...was z.b. wenn der Dateiname in " eingebunden ist?

Gruß Frank

[Larsi]

Hilft dir das?
http://www.delphi-treff.de/tipps/dat...rksbuchstaben/

[Hawkeye219]

Hallo Helmi,

der folgende Code sollte dein Problem lösen:

Delphi-Quellcode:

function StripDrive (const s: string) : string;
var
  Drive : string;
begin
  Drive := ExtractFileDrive(s);
  if (Length(Drive) = 2) then
    Result := '\' + ExtractRelativePath(Drive, s)
  else
    Result := s;
end;

Warum behandelst du Verweise auf Server anders als lokale Verweise? Wenn du dir das Ergebnis des Aufrufs von ExtractFileDrive anschaust, dann siehst du, dass der Servername Teil der Laufwerksbezeichnung ist.

Gruß Hawkeye

[Helmi]

Danke für den Code!