Kopieren mit TProgressbar Ausserhalb des gültigen bereiches

[DeddyH]

Delphi-Quellcode:

if Assigned(Callback) then
  Callback(0, SizeFile);

Sollte das Ganze stabiler machen, und man muss nicht zwingend einen Callback mitgeben.

Zitat:

Form1.ProgressBar1.Position := ( 100 * Position ) div Size;

Noch' n Vorschlag:
Form1.ProgressBar1.Position := MulDiv(Position, 100, Size);