Source position: treegrids.pas line 2051
type TTGBeforeGetMaxColumnWidthEvent = procedure(
Sender: TTGHeader;
Column: TColumnIndex;
var UseSmartColumnWidth: Boolean
) of object;