Source position: ovcvlb.pas line 117
type TTopIndexChanged = procedure(
Sender: TObject;
NewTopIndex: LongInt
) of object;