Bild aus Internet laden

[Richie1103]

Hi ich bin neu, und habe ein ähnliches Problem.


will auch Bilder aus dem netz laden aber es sollen mehrere sein und cih wollte es mit einer for to do schleife realisieren.

Hier der quelltext:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var  Ziel,Datei,s:PChar;
      i:Integer;
begin
For i:=1 to 168 do
 begin
   try
    s:=InttoSTr(i);
    Datei := 'link'+ s[1] + '.png';
    Ziel := 'C:\Documents and Settings\User\Desktop\Neuer Ordner';
    UrlDownloadToFile(nil, Datei, Ziel, 0, nil);
   except
    // Fehlermeldung ausgeben
  end;
 end;
end;

Wie ihr sicher mitbekommen habt, sind es mehrere Bilder bei denen sich nur eine Zahl ändert.

Es kommt folgende Fehlermeldung

Code:

[Fehler] Unit1.pas(36): Inkompatible Typen: 'String' und 'PAnsiChar'

es wäre auch praktisch wenn ihr noch einen Befehl mit dazu tun könntet der mir die png Bilder gleich in jpeg umwandelt.

Hoffe auf baldige kreative Hilfe[delphi]