Einzelnen Beitrag anzeigen

Spike2k3

Registriert seit: 20. Aug 2003
73 Beiträge
 
Delphi 7 Enterprise
 
#1

Download mit steigender Nummerierung

  Alt 25. Mai 2004, 18:14
hidiho

Ich hab da n kleines Problem:
Aaaalllsooo

Ich will was runterladen mit Delphi, hab mir also euer Tut geschnappt und eingebaut:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  cDownStatus : cDownloadStatusCallback;
  h:integer;
begin
  cDownStatus := cDownloadStatusCallBack.Create;
  for h:=1 to 9 do URLDownloadToFIle(nil,('http://bla.com/irgendwas/images/agro-00'+@(inttostr(h))[1]+'.jpg'),('C:\agro-00'+inttostr(h)+'.jpg'),0,CDownStatus);
    for h:=10 to 99 do
  URLDownloadToFIle(nil,'http://bla.com/irgendwas/images/agro-0'+inttostr(h)+'.jpg','C:\agro-0'+inttostr(h)+'.jpg',0,CDownStatus);
    for h:=100 to 145 do
  URLDownloadToFIle(nil,'http://bla.com/irgendwas/images/agro-'+inttostr(h)+'.jpg','C:\agro-'+inttostr(h)+'.jpg',0,CDownStatus);
  end;
Ich dachte das geht so, nur:[Error] Gog.pas(162): Incompatible types: 'Stringand 'PAnsiChar' Sagt, dass das so nich geht...

Mein Ziel ist es Bilder von
agro-001 bis agro-145 zu saugen
also hab ich gedacht, ne Schleife ist schon recht, nur gibts da ja son konvertierungsproblem...

Und da ich auch nach 20mal lesen noch nich gecheckt hab was PansiChar ist, hoffe ich doch ihr könnt mir helfen...
  Mit Zitat antworten Zitat