Forum: Netzwerke
Delphi
by XXcD,
26. Mär 2008
Ich habe es gerade ausprobiert, funktioniert einwandfrei :) . Da habt ihr mich mal wieder auf den richtigen Weg gebracht, ihr seid echt die besten.
Forum: Netzwerke
Delphi
by XXcD,
26. Mär 2008
Ahh da kam mir jetzt die Idee, ich versuche es mal folgendermaßen:
procedure TForm6.IdHTTP1Work(ASender: TObject; AWorkMode: TWorkMode;
AWorkCount: Integer);
begin
Progress.Position := AWorkCount;
application.ProcessMessages;
end;
Forum: Netzwerke
Delphi
by XXcD,
26. Mär 2008
Hallo,
ich lade per Tidhttp Komponente Dateien aus dem Internet,
den Fortschritt lass ich mir mit einer Progressbar anzeigen.
Bei ca. 20 MB springt die Prgressbar einfach auf 0 und fängt erst bei den letzten MB von vorne an.
Ich nutze die TAdvProgressBar und folgenden code:
procedure TForm6.IdHTTP1Work(ASender: TObject; AWorkMode: TWorkMode;
AWorkCount: Integer);
begin