Registriert seit: 30. Jan 2005
Ort: Münster
745 Beiträge
Delphi 3 Professional
|
Re: ExtractFilePath mit einer URL...
15. Feb 2006, 19:50
Hallo, oder so:
Delphi-Quellcode:
function ExtractUrlPath( URL: String): String;
begin
Result := URL;
if Pos(' /',Result) > 0 then
Delete(Result,LastDelimiter(' /',Result)+1,MAXINT);
end;
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
|
|
Zitat
|