Forum: Sonstige Fragen zu Delphi
Delphi
by Stevie,
27. Mai 2004
Sorry, mein Fehler!! :wall:
Es muss nichtProgressBar.StepBy(AWorkCount);heißen, sondernProgressBar.Position := AWorkCount;
Forum: Sonstige Fragen zu Delphi
Delphi
by Stevie,
26. Mai 2004
Hab ich gerade übersehen. Geht das überhaupt? Wird die Datei nicht erst gespeichert, wenn der Stream geschlossen wird? Ich hab keine Ahnung... :gruebel:
Forum: Sonstige Fragen zu Delphi
Delphi
by Stevie,
26. Mai 2004
Natürlich nicht! :roll:
Aber erklär mir mal, wo du die Aktualisierung der ProgressBar durchführen willst?
Im OnExecute geht ja nicht, weil er da nur einmal reinläuft und den Stream einliest.
Der einzige Weg, den ich sehe, ist es im OnWork zu machen, weil das immer wieder durchlaufen wird, solange lese-/schreibtechnisch was passiert. Also, einfach ProgressBar.Max := SizeofIncomingStream und...
Forum: Sonstige Fragen zu Delphi
Delphi
by Stevie,
26. Mai 2004
Guck dir mal das OnWork-Event an, das müsste dann ungefähr folgendermaßen aussehen:
procedure TForm1.IdTCPClient1Work(Sender: TObject; AWorkMode: TWorkMode; const AWorkCount: Integer);
begin
ProgressBar.StepBy(AWorkCount);
end;
Natürlich muss das noch erweitert werden, aber das ist sicherlich ein Ansatz...