Source position: ovcvlb.pas line 105
type THeaderClickEvent = procedure(
Sender: TObject;
Point: TPoint
) of object;