我要將樹和數據庫連起來,
進行修改刪除新增動作,
請問我該如何做?還有,就是我該如何刷新會使速度最快?
還要將原來有展開的結點在刷新後也要展開?

解决方案 »

  1.   

    数据库和树相关联的有一些现成的控件,具体是不是好用不太清楚,如果想灵活添加修改删除,还是自己写代码实现比较好。
    为了使刷新速度增加,就要只显示看到的部分,对于要展开的节点,在展开的时候再增加它的子节点,windows的目录树就是这么做的。
    至于全部展开树的所有结点,只是树的一个函数而已,好像是叫做fullexpand,具体怎么拼写记不清楚了,呵呵
      

  2.   

    TreeView由节点构成,建树通过对TreeView.items属性进行操作。Items是一个TTreeNodes对象,这是一个TTreeNode集。一、针对TTreeNodes,也就是 TreeView.Items,有这些属性:
    1、count,节点个数。
    2、item[index]  ,通过index得到节点。二、针对TTreeNodes,也就是 TreeView.Items,常用的添加节点的操作有:
    AddFirst添加第一个根节点。由此函数添加的节点总排在前面,除非后来又使用此函数添加了一个节点,则后添加的节点将排在前面。该函数返回新添加的节点。
    AddChildFirst添加第一个子节点,要求有父节点作为其参数。返回新添加的节点。
    AddChild添加一个子节点,要求有父节点作为其参数。返回新添加的节点。
    Add添加一个兄弟节点,要求有兄弟节点作为其参数。返回新添加的节点。三、针对TTreeNodes,也就是 TreeView.Items,常用的得到节点的操作有:
    GetFirstNode() 得到根节点。
    然后配合TTreeNode.GetNext(),就可以访问所有的节点。四、建树举例:var
      root_node,cur_node:TTreeNode;
    begin
      root_node:=AddFirst(nil,'根节点1');
      cur_node:=addChildfirst(root_node,nil,'根节点1_child1');
      add(cur_node,'根节点1_child2');
      root_node:=Add(nil,'根节点2');
      AddChildFirst(root_node,''根节点2_child1');  
    end; 五、事件触发:
    当从一个节点跳到另一个节点,会触发TTreeView.OnChange事件。该事件中,将传递node,即当前被选中的节点。当修改一个节点的text时,会触发TTreeView.onEdit事件。
    六、将节点和节点所对应的数据联系起来
    对于每个TTreeNode,有个Data属性,可以存放一个指针。我们可以利用这个域来存放与节点对应的自己的数据。
    1.我们先定义一个数据结构,作为记录我们要记录的数据。如:
    type 
      PMyData=^TMyData;
      TMyData=Record
        sFName:string;
        sLName:String;
        nIndex:integer;
      end;2.然后,创建数时,将节点和节点数据联系起来:
    procedure TForm1.Button1Click(Sender: TObject);
    var
      myshuju: PMyData
      cur_node:TTreeNode;
    begin
      New(MyRecPtr);  //记住,一定要先分配内存。有几个节点,就要分配几次内存。
      myshuju^.FName:=Edit1.Text;
      Myshuju^.LName := Edit2.Text;
      TreeViewIndex := StrToInt(Edit3.Text);
      with TreeView1 do
      begin
        cur_node:=items.AddFirst(nil,'first');
        cur_node.data:=myshuju;
      end;
    end;3.当我们选中一个节点时,就可以使用我们的数据了。
    procedure  TForm1.TreeView1Change(Sender:TObject;Node:TTreeNode);
    begin
       if node.data<>nil then
        self.label1.caption:=pmyData(node.data)^.Fname+pmyData(node.data)^.Lname
    end;
    七、一般使用流程:
    1、添加全局变量:
       b_first:boolean;  //记录是否是第一次访问节点,因为此时数据还未准备好,而一旦访问节点就会触发OnChange事件,在此事件处理函数中也许会出错。
    2、在FormCreate中,
      a、设置b_first:=true;
      b. 创建数并将节点与数据联系。
    3、在FormShow中
      设置b_first:=false;
    4.在事件OnChange中处理节点被选中事件。
    5.在Edit中处理节点被修改Text事件。
      并调用OnChange.
    6.在 TreeView.Destory中
      释放Data 中指向的内存空间。
      

  3.   

    以上是别人的版权,呵呵。如果要在对TreeView中对数据直接进行操作还是用第三方控件来的简单。
      

  4.   

    謝謝,
    真的太感激
     youhuiyun(youhuiyun)