Source position: treegrids.pas line 2012
type TTGInitChildrenEvent = procedure(
Sender: TBaseTreeGrid;
Node: PTreeGridNode;
var ChildCount: Cardinal
) of object;