Source position: treegrids.pas line 2053
type TTGCanSplitterResizeColumnEvent = procedure(
Sender: TTGHeader;
P: TPoint;
Column: TColumnIndex;
var Allowed: Boolean
) of object;