Thema: Delphi Fortschirttsanzeige

Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.757 Beiträge
 
Delphi 10.4 Sydney
 
#3

Re: Fortschirttsanzeige

  Alt 5. Mai 2008, 15:53
Hallo,

das dürfte etwas schwierig sein, wenn Du die Größe der
HTML Datei nicht kennst.
Falls Du sie kennen solltest, wäre
hier ein guter Platz einen Counter zu implementieren.

Delphi-Quellcode:
while (InternetReadfile(hfile,
       @databuffer,
       dwNumber,
       DwRead)) do
  begin
    if dwRead =0 then
      break;
      databuffer[dwread]:=#0;
      Str := pchar(@databuffer);
      resStr := resStr + Str;
    end;

Grüße
Klaus
Klaus
  Mit Zitat antworten Zitat