注册 登录
编程论坛 Delphi论坛

[求助]两个dbcombobox控件连接问题???

刘香 发布于 2007-06-11 14:15, 952 次点击
我在form中放两个dbcombobox控件,第一个显示 计算机系, 机械系,我想点击计算机系,第二个dbcombobox控件

中显示 软件技术,应用技术等专业选项,点击机械系,第二个dbcombobox控件就显示机械制造等专业选项,

请问该怎样写代码呀
5 回复
#2
songyang2012007-06-11 15:14
onchange
#3
sgliuxiu2007-06-15 07:47
如果系对应的专业放在表里面,很容易实现.事件就是楼上说的onchange,至于代码就要自己去写了
#4
秋日2007-06-20 21:03
procedure TWL11_F.ComboBox1Change(Sender: TObject);
begin
with query1 do
begin
close;
sql.Clear;
sql.Add('select distinct ComboBox2列名 from 表名');
sql.Add('where ComboBox1的列名=:s0');
params[0].AsString:=ComboBox1.Text;
open;
first;
comboBox2.Items.Clear;
while not eof do
begin
ComboBox2.Items.Add(fieldbyname ('ComboBox2的列名').value);
next;
end;
end;
end;
#5
秋日2007-06-20 21:04
你试一下,我用的时候没问题。
#6
刘香2007-06-21 00:02
以解决,谢谢大家!
1