Problem bei Imagekomponente Loadfromfile via http

[Matze]

Hi!

So geht's, allerdings wird das Bild auf der Festplatte (zwischen-)gespeichert.
Aber das müsste man ja nachher wieder löschen können. Wenn jemand weiß, wie's geht, dann soll er es doch bitte hier posten.

Hi! So geht's:

Delphi-Quellcode:

uses: urlmon, jpeg

... 

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);
begin
  if DownloadFile('http://www.discount-software.ws/discount-software-images/borland-delphi-6.0-fr.jpg', 'c:\picture.jpg')
  then image1.Picture.LoadFromFile('C:\picture.jpg')
  else
  showmessage('Sorry, geht irgendwie nicht!');
end;

Gruß Matze

[edit=Daniel B]Delphi-Tags korrigiert. Mfg, Daniel B[/edit]
[edit=Matze]Code korrigiert.[/edit]