作个循环
for i:= 0 to treeview1.selected.count -1 do
begin
//Treeview1.selected.items[i]不知道你是怎么记录checkbox,这里自己写吧
end;
for i:= 0 to treeview1.selected.count -1 do
begin
//Treeview1.selected.items[i]不知道你是怎么记录checkbox,这里自己写吧
end;
var
myNode: TTreeNode;
begin
MyNode:=Node.getFirstChild;
while myNode<>nil do
MyNode:=SetChildFlag(MyNode,Flag);
if Node.Selected then ....
Result:=Node.GetNextChild(Node);
end;