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]