Source position: treegrids.pas line 2028
type TTGHeaderNotifyEvent = procedure(
Sender: TTGHeader;
Column: TColumnIndex
) of object;