|
Registriert seit: 18. Jul 2003
898 Beiträge
Delphi 6 Professional
|
Re: SaveDialog und URLDownloadToFile
23. Jul 2004, 13:51
Delphi-Quellcode:
function HoleDateiname( URL: String): String;
var
i : integer;
begin
for i := Length( URL) downto 1 do
begin
if URL[i] = ' /' then
break;
end;
result := Copy( URL,i+1,length( URL);
end;
Sebastian
Ehemals bekannt als General2004
|