Source position: mknob.pas line 61
type TKnobChangeEvent = procedure(
Sender: TObject;
AValue: LongInt
) of object;