Source position: treegrids.pas line 3407
type TVSTGetTextEvent = procedure(
Sender: TBaseTreeGrid;
Node: PTreeGridNode;
Column: TColumnIndex;
TextType: TVSTTextType;
var CellText: string
) of object;