在delphi中,我用了一个combobox1来选择学院,再利用dblookupcombox1来自动显示学院里的专业!再选择
数据库表已建好了,这是我的delphi代码beginwithadoquery1dobeginadoquery1.close;adoquery1.sql.add('sele...
数据库表已建好了,这是我的 delphi代码
begin
with adoquery1 do
begin
adoquery1.close;
adoquery1.sql.add('select zyname from zhuanye where suoshuxy=trim(combobox1.text)');
adoquery1.Open;
end;
dblookupcombobox1.listsource:=datasource1 ;
dblookupcombobox1.keyfield:='zyname';
dblookupcombobox1.listfield:='zyname';
dblookupcombobox1. keyvalue:=('zyname');
end; 展开
begin
with adoquery1 do
begin
adoquery1.close;
adoquery1.sql.add('select zyname from zhuanye where suoshuxy=trim(combobox1.text)');
adoquery1.Open;
end;
dblookupcombobox1.listsource:=datasource1 ;
dblookupcombobox1.keyfield:='zyname';
dblookupcombobox1.listfield:='zyname';
dblookupcombobox1. keyvalue:=('zyname');
end; 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询