假设我现在做了一个Edit1,名字叫A公司;一个Edit2,名字叫B人员;B人员是A公司
里的人,我建立了一个Access的数据库,我希望在输入资料进Access里面的同时在TreeView里面可以显示A公司-----B人员。然后在调用的时候只用单击Treeview里面的资料就可以调用我所希望的数据库内容,请问怎么办啊~~各位大侠,这个问题对
你们来说很简单,但是小弟却无法解决,谢谢啦~~~~~~~~~~~~~~(一定给分啊)

解决方案 »

  1.   

    呵呵,来我地盘了。关注。那我就再给你段以前的代码。
    (我所做的都是取数据,单击去数据问问xjboy(刀剑客))
      catnode:=treeview1.items.add(nil,'所有商品');
      with adoquery1 do
        begin
          close;
          sql.clear;
          sql.add('select longid,text from tree..testtree order by longid');
          open;      first;
          while not adoquery1.eof do
            begin
              cat1node:=treeview1.Items.AddChild(catnode,adoquery1.fieldbyname('text').value+'('+adoquery1.fieldbyname('longid').value+')');
              //treeview1.Items.Item[0].Expanded:=true;
              with adoquery3 do
                begin
                  close;
                  sql.Clear;
                  sql.Add('select distinct * from node where left(node.names,2)=:aa order by names');
                  adoquery3.Parameters.ParamByName('aa').value:=copy(adoquery1.fieldbyname('longid').value,1,2);
                  open;
                  first;
                  while not adoquery3.Eof do
                    begin
                      treeview1.Items.AddChild(cat1node,'('+adoquery3.fieldbyname('names').value+')'+adoquery3.fieldbyname('ide').value);
                      next;
                      //treeview1.Items.Item[1].Expanded:=true;
                    end;
                end;
              next;
            end;
         end;
      

  2.   

    呵呵
    www.nxrs.net/bbs上有这个专题哦;
    -------------------------------------
    如果您觉的您对Delpih感兴趣或是很想学的更好些或者是对Delphi有更深的认识,我们可以一起交流;
    呵呵
    www.nxrs.net/bbs
    谢谢,别抛砖
      

  3.   

    建议放进FAQ里,我看到好多人问。
    小小,又在推销你的网站了,有没有继续讨论我的问题呀,我可是加了分的。^_^