Source position: fpgtk.pp line 1626
type TFPgtkCTreeFunction = procedure(
TheTree: TFPgtkCTree;
TheNode: PGtkCTreeNode;
data: pointer
) of object;