帮帮忙，怎样用IWTreeView控件读取后台数据啊

Question

急，怎样用IWTreeView控件读取后台数据啊

Answer 1

procedure Trysele.FormCreate(Sender: TObject);
var tnd,tnd1,tnd2,tnd3:TTreeNode;
begin
   dmd.cx3.Close;
   dmd.cx3.SQL.Clear;
   dmd.cx3.SQL.Add('select 部门 from rybm');
   dmd.cx3.Open;
   while not dmd.cx3.eof do
   begin
   tnd:=treeview1.Items.Add(nil,(dmd.cx3.FieldByName('部门').Asstring));
    dmd.cx4.Close;
      dmd.cx4.SQL.clear;
      dmd.cx4.SQL.add('select 工号,姓名,部门 from ry where 部门='''+dmd.cx3.fieldbyname('部门').asstring+'''');
      dmd.cx4.Open;
    while not dmd.cx4.eof do
    begin
      tnd1:=treeview1.Items.addchild(tnd,((dmd.cx4.fieldbyname('工号').asstring)+'-'+(dmd.cx4.fieldbyname('姓名').asstring)));
       dmd.cx4.Next;
    end;
       dmd.cx4.First;
       dmd.cx3.next;
   end;
end;
dmd.cx3和dmd.cx4是两个adoquery 

Answer 2

就是用IWTreeView控件按层次的显示后台数据数据库里的数据，比如第一层为
IWTreeView2.Items.Add.Caption:=oraquery1.fieldbyname('compname').AsString；
下面第二层怎样写代码

Answer 3

不是TreeView控件，是inteweb内的IWTreeView