Source position: comctrls.pp line 2776
type TTVCreateNodeClassEvent = procedure(
Sender: TCustomTreeView;
var NodeClass: TTreeNodeClass
) of object;