在delphi中，如何将treeview与数据库相连？代码越简单越好

[zuozuo1987]

用ado控件比较间接还是bde的？代码是什么样的？急问！！！

[zhangpuqing]

用ehlib控件吧,不用写代码了.

[baiduan]

不喜欢写代码就不要当程序员

[qzmp_sc]

type
BMRecord = record
BMBM : string; //编码
end;
pBMRecord = ^BMRecord;

var
BMRecord: pBMRecord;
begin
TreeList := TList.Create;
with Adoquery1 do
begin
TreeList.Clear;
First;
while not Eof do
begin
New(BMRecord);
BMRecord.BMBM := FieldByName('BMBH').AsString;
TreeList.Add(BMRecord);
Next;
end;
end;
end;

[clnzhou]

楼上的例子不错啊

[ly_liuyang]

DBtreeview
第三方的

[dw.z]

有没有不用ADO的呀??
在TWinForm中做这个怎么做?