求treeview使用的例子

[spiritchs1]

想做一个treeview的树形列表
本人的想法
1、在from中拉入一个treeview组件，两个button组件，还有一个label组件
2、两个button组件一个起名叫添加，一个叫删除
3、点击添加，可以往treeview里面添加节点，比如，便签| 将这个结构加到treeview里面，然后保存这个结构，下次
|便签1 启动程序可以直接显示这个结构
|便签2
联系人|
|联系人1
|联系人2
4、点击treeview里的一个节点可以显示在label里，比如点击便签1，就会在label里面显示便签1
5、点击treeview里的一个节点然后点击删除可以删除这个节点，下此启动的时候也不在显示

谢谢大家

[spiritchs1]

谢谢 上面两位老大指点

[spiritchs1]

jxw1987628 老大，
void __fastcall TForm1::TreeView1Click(TObject *Sender)//单击节点事件
{
if(TreeView1->Selected)
{
TTreeNode *selectedNode=TreeView1->Selected;
Label1->Caption = selectedNode->Text ;//将选择的节点的文本显示在label上
}
}
我想要确定我选择的这个节点的index号，还是以上面那个为例，我点击便签1，得到它的index号是0，但是我点击它的父节点便签，得到的index还是0，其实我只想得到便签1的index号，把它获取传给其他程序进行处理，我怎么区分父节点和它的子节点，谢谢

[yumikoo]

if(selectedNode->Parent==true)//他是子节点
else是父节点

[jxw1987628]

void __fastcall TForm1::TreeView1Click(TObject *Sender)
{
    //第3层第1个节点就是你要的便签1（从root层开始算起）
    if( TreeView1->Selected &&
    	TreeView1->Selected->Level==2 &&  /* 层数*/
        TreeView1->Selected->Index ==0)   /* index*/
    {
        TTreeNode *selectedNode=TreeView1->Selected;
         Label1->Caption = selectedNode->Text ;//将选择的节点的文本显示在label上
    }
}
//---------------------------------------------------------------------------

[laowang2]

for (int i = 0; i < main_bar->ItemLinks->Count; i++) 
    { 
        TTreeNode *node; 
        //-------------------------parent----------------------- 
        TdxBarSubItem *sub = (TdxBarSubItem *)main_bar->ItemLinks->Items[i]->Item; 
        if(sub->Visible == ivNever || sub->Name == "MMBchange_hotel") 
            continue; 
        else if(sub->Visible == ivAlways) 
        { 
            node = TV->Items->AddChild(NULL,sub->Caption.Trim()); 
            this->sg_name->Add(sub->Name.Trim()); 
            this->sg_parent->Add("0");    
            this->sg_caption->Add(sub->Caption); 

            if(sg_all_name->IndexOf(sub->Name.Trim() + ",0") != -1)   
            { 
                sg_child->Add(sg_all_id->Strings[sg_all_name->IndexOf(sub->Name.Trim() + ",0")]);    //menu_id 
                sg_op->Add("0"); 
            } 
            else 
            { 
                sg_child->Add(sub->Name.Trim()); 
                sg_op->Add("1"); 
            } 
        } 
        //-------------------------child------------------------ 
        for (int j = 0; j < sub->ItemLinks->Count; j++) 
        { 
            if(sub->Name == "MMBchange_db" || sub->Name == "MMBchange_hotel") 
                continue; 
            else 
            { 
                TdxBarLargeButton *button = (TdxBarLargeButton *)sub->ItemLinks->Items[j]->Item; 
                if(button->Visible == ivAlways && sg_visible->IndexOf(button->Name) < 0) 
                { 
                    sg_name->Add(button->Name.Trim()); 
                    if(sg_all_name->IndexOf(sub->Name.Trim() + ",0") != -1)   
                        sg_parent->Add(sg_all_id->Strings[sg_all_name->IndexOf(sub->Name.Trim() + ",0")]);    //menu_id 
                    else 
                        sg_parent->Add(sub->Name.Trim()); 

                    if(sg_all_name->IndexOf(button->Name.Trim() + "," + sub->Name.Trim()) != -1)    //狦垫虫竒 
                    { 
                        sg_child->Add(sg_all_id->Strings[sg_all_name->IndexOf(button->Name.Trim() + "," + sub->Name.Trim())]);    //menu_id 
                        sg_op->Add("0"); 
                    } 
                    else 
                    { 
                        sg_child->Add(button->Name.Trim()); 
                        sg_op->Add("1"); 
                    } 

                    sg_caption->Add(button->Caption.Trim()); 

                    TV->Items->AddChild(node,button->Caption); 
                } 
            } 
        } 
    } 

帮顶，树形数据一般用递归可以载入。

[jxw1987628]

void __fastcall TForm1::FormCreate(TObject *Sender)
{
	AnsiString strFileName= "联系人.treeview" ;
	if(!FileExists( strFileName)) //判断存盘文件是否存在
    {

        TTreeNode *rootNode=TreeView1->Items->AddChild(NULL,"root");  //添加根节点

        //添加需要的子节点
        TTreeNode *tempNode =TreeView1->Items->AddChild(rootNode,"便签");
        TreeView1->Items->AddChild(tempNode,"便签1");
        TreeView1->Items->AddChild(tempNode,"便签2");
        tempNode=TreeView1->Items->AddChild(rootNode,"联系人");
        TreeView1->Items->AddChild(tempNode,"联系人1");
        TreeView1->Items->AddChild(tempNode,"联系人2");
    }
    else
    {
    	TreeView1->LoadFromFile(strFileName);  //从上次的存盘中读取数据
    }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
	TreeView1->SaveToFile( "联系人.treeview"); //存盘
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)   //添加节点代码
{
	if(TreeView1->Selected)
    {
    	TTreeNode *selectedNode=TreeView1->Selected;
        TreeView1->Items->AddChild(selectedNode,"新增的节点");
    }
}
//---------------------------------------------------------------------------


void __fastcall TForm1::Button2Click(TObject *Sender) //删除节点代码
{
   	if(TreeView1->Selected)
    {
    	TTreeNode *selectedNode=TreeView1->Selected;
        selectedNode->DeleteChildren(); //删除其子节点
        selectedNode->Delete() ;  //删除自身
    }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::TreeView1Click(TObject *Sender)//单击节点事件
{
	if(TreeView1->Selected)
    {
    	TTreeNode *selectedNode=TreeView1->Selected;
     	Label1->Caption = selectedNode->Text ;//将选择的节点的文本显示在label上
    }
}
//---------------------------------------------------------------------------

[[e-mail]]

for (int i = 0; i < main_bar->ItemLinks->Count; i++)
{
TTreeNode *node;
//-------------------------parent-----------------------
TdxBarSubItem *sub = (TdxBarSubItem *)main_bar->ItemLinks->Items[i]->Item;
if(sub->Visible == ivNever || sub->Name == "MMBchange_hotel")
continue;
else if(sub->Visible == ivAlways)
{
node = TV->Items->AddChild(NULL,sub->Caption.Trim());
this->sg_name->Add(sub->Name.Trim());
this->sg_parent->Add("0");
this->sg_caption->Add(sub->Caption);

if(sg_all_name->IndexOf(sub->Name.Trim() + ",0") != -1) 
{
sg_child->Add(sg_all_id->Strings[sg_all_name->IndexOf(sub->Name.Trim() + ",0")]); //menu_id
sg_op->Add("0");
}
else
{
sg_child->Add(sub->Name.Trim());
sg_op->Add("1");
}
}
//-------------------------child------------------------
for (int j = 0; j < sub->ItemLinks->Count; j++)
{
if(sub->Name == "MMBchange_db" || sub->Name == "MMBchange_hotel")
continue;
else
{
TdxBarLargeButton *button = (TdxBarLargeButton *)sub->ItemLinks->Items[j]->Item;
if(button->Visible == ivAlways && sg_visible->IndexOf(button->Name) < 0)
{
sg_name->Add(button->Name.Trim());
if(sg_all_name->IndexOf(sub->Name.Trim() + ",0") != -1) 
sg_parent->Add(sg_all_id->Strings[sg_all_name->IndexOf(sub->Name.Trim() + ",0")]); //menu_id
else
sg_parent->Add(sub->Name.Trim());

if(sg_all_name->IndexOf(button->Name.Trim() + "," + sub->Name.Trim()) != -1) //狦垫虫竒
{
sg_child->Add(sg_all_id->Strings[sg_all_name->IndexOf(button->Name.Trim() + "," + sub->Name.Trim())]); //menu_id
sg_op->Add("0");
}
else
{
sg_child->Add(button->Name.Trim());
sg_op->Add("1");
}

sg_caption->Add(button->Caption.Trim());

TV->Items->AddChild(node,button->Caption);
}
}
}
}

[jaffy]

UP，接分

[spiritchs1]

谢谢，知道了

[spiritchs1]

谢谢大家

[spiritchs1]

刚才试了一下，又发现一个问题
void __fastcall TForm1::TreeView1Click(TObject *Sender)
{
//第3层第1个节点就是你要的便签1（从root层开始算起）
if( TreeView1->Selected &&
TreeView1->Selected->Level==2 && /* 层数*/
TreeView1->Selected->Index ==0) /* index*/
{
TTreeNode *selectedNode=TreeView1->Selected;
Label1->Caption = selectedNode->Text ;//将选择的节点的文本显示在label上
}
}
这个可以确定便签1，但是由于还有一个联系人1也属于TreeView1->Selected->Level==2这个层，并且也是index==0，所以当点击联系人1的时候也会显示联系人1，我就是想唯一确定一个节点，比如点击便签1，就是便签1显示，再点击其他的不变，谢谢

[spiritchs1]

自己改出来了，看看对不对
void __fastcall TForm1::TreeView1Click(TObject *Sender)
{
if( TreeView1->Selected &&
TreeView1->Selected->Level==2 && /* 层数*/
TreeView1->Selected->Index ==0) /* index*/
{

TTreeNode *selectedNodepro=TreeView1->Selected->GetPrev();
if(selectedNodepro->Index==0)
{ TTreeNode *selectedNode=TreeView1->Selected;
Label1->Caption = selectedNode->Text ;//将选择的节点的文本显示在label上
}
}
}

[jxw1987628]

/*
原来你是要节点的唯一的东西

那你可以传递节点的AbsoluteIndex

*/

// root的AbsoluteIndex 是0,便签的AbsoluteIndex 是1,便签1的是 2
    if( TreeView1->Selected && 
        TreeView1->AbsoluteIndex==2 
    { 
        TTreeNode *selectedNode=TreeView1->Selected; 
        Label1->Caption = selectedNode->Text ;//将选择的节点的文本显示在label上 
    } 

[spiritchs1]

写错了，应该改为
if( TreeView1->Selected &&
TreeView1->Selected->Level==2 /* 层数*/
) /* index*/
{

TTreeNode *selectedNodepro=TreeView1->Selected->Parent;//得到父节点
if(selectedNodepro->Index==1)
{TTreeNode *selectedNode=TreeView1->Selected;
Label1->Caption = selectedNode->Text ;//将选择的节点的文本显示在label上

}

}

[spiritchs1]

谢谢jxw1987628

[jxw1987628]

/*

你这样写不对的，这样的话，只要是便签下面的节点都会显示

而且一旦这个节点没有父节点，你的代码就会出现异常,

要确定唯一的节点，可以通过AbsoluteIndex，或者index以及父节点的文本

子节点的文本和层次综合判断

*/