Unit

CGM

Syntax

type TsgCgmProgressEvent = procedure(Stage: TProgressStage; Done,Count: Integer) of object;

Description

Stage parameter indicates the state of the call to the OnProgress event:

•psStarting

•psRunning

•psEnding

Done parameter indicates the ratio of work done to work remaining, on a scale of 0 to 100 relatively to the value set in Count.

Count parameter defines the value of the whole work should be done.