Source position: comctrls.pp line 835
type TLVColumnClickEvent = procedure(
Sender: TObject;
Column: TListColumn
) of object;