JEDI JCL Compression OnProgress wie verwenden

[nahpets]

Hab' die Teil noch nie benutzt.

Was steht denn in Value? MaxValue dürfte ja quasi das Ende sein.

Also mal 'ne Progressbar nehmen. Minimum auf 0, Maximum auf MaxValue und Position auf Value.
Tippe mal darauf, dass man damit (ohne Mathematik) 'nen Fortschrittsbalken bekommt, an dem man sehen kann, wieviel erledigt wurde und wieviel noch fehlt.

Je nach Typ der Progressbar, zeigt sie von alleine die Prozentangabe des Fortschrittes an.

Ansonsten Kettensatz oder Dreisatz:

?% = Value
MaxValue = 100%

Entspricht: ? = Value * 100 / MaxValue

Auf 'nem Label also:
Label.Caption := Format('%d von %d (%3.2f%%) erledigt.',[Value, MaxValue, Value * 100.00 / MaxValue]