HttpGet funzt anders:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
HTTPGet1.URL:='http://www.meineseite.de/index.htm';
HTTPGet1.FileName:='C:\ZielPfad\Zieldatei.extension';
//Gauge1.progress:=0; // wenn Du noch nen Gauge verwendest kann der Download kontrolliert werden
//Gauge1.Visible:=true; // in "onDoneFile" kann das Gauge wieder invisible gemacht werden
httpGet1.GetFile;
end;
Das Laden kann auch abgebrochen werden =>
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
begin
HTTPGet1.Abort;
end;
Aktualisierung des Gauge
Delphi-Quellcode:
procedure TForm1.HTTPGet1Progress(Sender: TObject; TotalSize,
Readed: Integer);
begin
gauge1.MaxValue:=totalsize; // auf der Kompo in EREIGNISSE "onProgress" hier eintragen
gauge1.Progress:=readed;
end;