2012年3月2日
Treeview选中所有节点
摘要： 搞定了，分分拿来TreeView1需要设置MultiSelect = True; MultiSelStyle设置为[msControlSelect]procedure Tform1.TreeView1Click(Sender: TObject); var TNode,Cnode: TTreeNode; i: Integer; iLoop: Boolean; begin Cnode:= self.TreeView1.Selected; if not Cnode.Expanded then Exit; if Cnode.HasChildren then begin TNode:= Cnode.ge 阅读全文
posted @ 2012-03-02 17:59 byronming 阅读(373) 评论(0) 推荐(0) 编辑