Source position: fpg_tree.pas line 65
type TfpgTreeExpandEvent = procedure(
Sender: TObject;
ANode: TfpgTreeNode
) of object;