常规参数
文章标题:
权重:
文章摘要:
procedure AddSubTree(DestTree: TTreeView; SourceNode, DestNode: TTreeNode; AddState: Boolean);varTempNode, TempNode1: TTreeNode;I : integer;beginTempNode := DestNode;with DestTree do beginif Not (AddState) then TempNode := Items.AddChild(DestNode, s
关键字:
移动 复制 end TempNode do TempNode1 Nil then beginif
管理密码: