摘要:
添加树的结点procedure AddNode;var Pnode,bnode:TTreeNode;begin RzCheckTree1.Items.Clear; Pnode:=RzCheckTree1.Items.Add(nil,'第1个'); bnode:=RzCheckTree1.Items.AddChild(Pnode,'第11个'); bnode:=RzCheckTree1.Items.AddChild(Pnode,'第12个'); bnode:=RzCheckTree1.Items.AddChild(Pnode,'第13个 阅读全文