Source position: treegrids.pas line 4018
type TAddHeaderPopupItemEvent = procedure(
const Sender: TBaseTreeGrid;
const Column: TColumnIndex;
var Cmd: TAddPopupItemType
) of object;