摘要: 添加树的结点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个&# 阅读全文
posted @ 2012-12-24 08:55 幻劫 阅读(2224) 评论(0) 推荐(0) 编辑