Einzelnen Beitrag anzeigen

Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: München
11.412 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: Datei aus url parsen!

  Alt 26. Jan 2004, 15:41
*wuppdi*

Delphi-Quellcode:
function UrlFile(Url: String): String;
var
  P: Integer;
begin
  Result := Url;
  for P := Length(Url) downto 1 do
    if Url[P] = '/then
    begin
      Result := Copy(Url, Succ(P), MaxInt);
      Break;
    end;
end;
......
Daniel W.
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat