Text aus einer HTML-Datei einlesen?

[raffo]

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;