Source position: TplTimerUnit.pas line 57
type TplTimerProgressEvent = procedure(
Sender: TObject;
const deltaTime: Double;
const newTime: Double
) of object;