Problem bei Imagekomponente Loadfromfile via http

[glkgereon]

ich grab diesen thread nochmnal aus...

ich will images ausm inet holen

dazu benutz ich folgenden code:

Delphi-Quellcode:

function DownloadFile(const url: string; filename: string): boolean;
begin
  Result := urlmon.URLDownloadToFile(nil, PChar(url), PChar(filename), 0, nil) = 0;
end;

procedure TForm1.Button1Click(Sender: TObject);
var i, j:integer;
    filename:string;
begin
  for i:=SpinEdit1.Value to SpinEdit2.Value do
  begin
    FileName:=inttostr(i)+'.jpg';
    if DownloadFile(url+filename,ShellTreeView1.Path+filename)
    then ListBox1.Items.Add('Erfolgreich '+filename)
    else ListBox1.Items.Add('Fehlgeschlagen '+filename);
  end;
end;

aber es kommt IMMER fehlgeschlagen,. obwohl es das bild gibt!!!

kann es daran liegen das ich hinter nem router sitze?