Source position: ovcvlb.pas line 109
type TIsSelectedEvent = procedure(
Sender: TObject;
Index: LongInt;
var Selected: Boolean
) of object;