Question

高分求指教！！！delphi, DBLookupComboBox1控件两个，

这是我的access表
第一个DBLookupComboBox控件进行“地区名称”选择
第二个DBLookupComboBox控件在所选的“地区名称”里进行“燃料名称”选择
求指教 第二个控件怎么设置 急！！！

Answer 1

你说的是每个地区名称有对应的几个燃料名称吗？
那你要用一个query控件，把对应过滤SQL语句输入进去就行了。

追问

是的 有ADOQuery1连接数据库 能发段代码过来吗？我要成品 事成后外加30财富值

追答

select * from 你的表名 where 地区名称 = 第一个DBLookupComboBox.text
写到第二个DBLookupComboBox的onenter事件里。

追问

就这一句话？
begin呢？
end呢？

追答

WITH adoquery1 do begin
close;
sql.clear;
sql.add(刚才的语句);
execsql;
open;
first;
DBLookupComboBox2.items.clear;
while not eof do begin
DBLookupComboBox2.items.add(adoquery1.fieldvalues['燃料名称']);
next;
end;

end;

追问

你这样不行 ADOQuery1连着两个DBLookupComboBox控件 你这样我还要加个ADOQuery控件 很麻烦 明天给你回复 很晚了 我要睡觉了 如果可以 一定加分 先谢了！！

追答

回答WITH adoquery1 do begin
close;
sql.clear;
sql.add('select * from 地区名称表' );
execsql;
open;
first;
DBLookupComboBox1.items.clear;
while not eof do begin
DBLookupComboBox1.items.add(adoquery1.fieldvalues['地区名称']);
next;
end;
end;
两个一样的，这个写到1的onenter事件里就行。

追问

不行 你这样没有达到我的要求
第二个DBLookupComboBox显示的‘燃料名称’是在第一个所选的‘地区名称’里 所含有的几个‘燃料名称’进行选择，其他‘地区名称’所所含的‘燃料名称’不显示

追答

是根据你选择到的“地区名称”，下拉第二个对应显示第一个选择的“地区名称”所含的‘燃料名称’。
你的要求不是这样？