这些节点都是动态生成,再设置。
原理 还是 在前面显示图片 实现
procedure TForm1.FormCreate(Sender: TObject);
var
pnode, node: TTreeNode;
begin
with TreeView1.Items do begin
node := Add(nil, 'Item1'); // 动态生成一个节点
node.ImageIndex := 0;
node.SelectedIndex := 0;
CheckNode(node, true); // 这里 在前面生成CHECKbox
相关文件下载:
链接:https://pan.baidu.com/s/1BifaPiZz-7-d2VH50zwMaA
提取码:onja