Question

如何编辑Treeview节点 delphi

Answer 1

TreeView1.Items.Clear;
Node1:=TreeView1.Items.Add(NULL,'全部');
Node1.ImageIndex=0;
Node1.SelectedIndex=1;
ChildKHNode=TreeView1.Items.AddChild(Node1,"今天");
ChildKHNode.ImageIndex=2;
ChildKHNode.SelectedIndex=2
呵呵 有些偷懒了。差不多这样的意思吧。具体参数，你可ATL+上 进入treeview的类里看。

Answer 2

this->TreeView1->Items->Clear();
Node1=this->TreeView1->Items->Add(NULL,"全部");
Node1->ImageIndex=0;
Node1->SelectedIndex=1;
ChildKHNode=this->TreeView1->Items->AddChild(Node1,"今天");
ChildKHNode->ImageIndex=2;
ChildKHNode->SelectedIndex=2;