Source position: ovcbase.pas line 556
type TOvcItemSelectedEvent = procedure(
Sender: TObject;
Index: Integer
) of object;