Source position: treegrids.pas line 2090
type TTGMeasureItemEvent = procedure(
Sender: TBaseTreeGrid;
TargetCanvas: TCanvas;
Node: PTreeGridNode;
var NodeHeight: Integer
) of object;