数据库表信息
科室 姓名 编码
人事科 张三 001
人事科 李四 002
人事科 王五 003
财务科 赵八 004
财务科 魏九 005
....生成树形列表人事科
张三
李四
王五
财务科
赵八
魏九
并可以单选中一个或几个人传到DBG里做查询。谢谢了!小弟新手!请教思路,控件,方法等。
科室 姓名 编码
人事科 张三 001
人事科 李四 002
人事科 王五 003
财务科 赵八 004
财务科 魏九 005
....生成树形列表人事科
张三
李四
王五
财务科
赵八
魏九
并可以单选中一个或几个人传到DBG里做查询。谢谢了!小弟新手!请教思路,控件,方法等。
http://www.cnblogs.com/piaoliuxia/archive/2008/09/06/1937317.html
下面是生成树:var
fNode:TTreeNode;
s:string;
begin
s:='';
fNode:=nil;
with adoquery1 do
begin
first;
while not eof do
begin
if s<>fieldbyname('科室').AsString then
fNode:=TreeView1.Items.Add(nil,fieldbyname('科室').AsString); TreeView1.Items.Add(fNode,fieldbyname('姓名').AsString);
s:=fieldbyname('科室').AsString;
next;
end;
end;至于选择与取值,方法很多,可以在节点前面加个checkbox
这里提供一个方法:可以是2张图片,一张只是方框,一张方框里面打勾
选择的时候,就切换图片动动手,不难实现的