摘要:
====================================需要设置multiselect=true;multiselstyle设置为[mscontrolselect]procedure TUserRightSet.BitBtn8Click(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 be. 阅读全文
posted @ 2012-03-22 17:06
byronming
阅读(2793)
评论(0)
推荐(0)
浙公网安备 33010602011771号