新手求教 DBLookupComboBox 动态添加 SQL

lx_neteasy 2004-07-20 02:28:11
我有个 DBLookupComboBox
也有 ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select*from U_HTQCBF where F_BH="01"');
想实现在下拉菜单中选择后,上面的列表显示响应条目。

可是不知道 在哪里添加 代码。求教大虾给个简单的实现方法。
...全文
191 12 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
12 条回复
切换为时间正序
请发表友善的回复…
发表回复
ln521 2004-07-24
  • 打赏
  • 举报
回复
你用combobox也可以啊 ,U_HTQCBF 是string 吗?
在form的onshow中写
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select*from U_HTQCBF where F_BH="01"');
adoquery1.open;
adoquery1.first;
while not adoquery1.eof do
begin
combobox1.items.add(adoquery1.fields[0].value);
adoquery1.next;
end;
iknowwn 2004-07-24
  • 打赏
  • 举报
回复
在DBLookupComboBox设置属性就好了,如数据集字段之类的
pokemonFK 2004-07-24
  • 打赏
  • 举报
回复
vvvvvvvvvvvvvvvvvvvvv
drift1981 2004-07-24
  • 打赏
  • 举报
回复
我也觉得用combobox好,因为dblookupcombobox的text属性好像不能赋值,所以有些功能实现不了
Sunny319 2004-07-20
  • 打赏
  • 举报
回复
onclose里面,ADOQuery1.Open,也要有
zhlwyy 2004-07-20
  • 打赏
  • 举报
回复
还要加上ADOQuery1.Open;
刚才没有看你的代码
zhlwyy 2004-07-20
  • 打赏
  • 举报
回复
你要记住itemindex是从0开始记起的
zhlwyy 2004-07-20
  • 打赏
  • 举报
回复
你写在button的onclick事件里呀
不可能我刚试了的
lx_neteasy 2004-07-20
  • 打赏
  • 举报
回复
onClick
里也不行啊 我原来就在onClick
里的
zhlwyy 2004-07-20
  • 打赏
  • 举报
回复

你写在onClick
lx_neteasy 2004-07-20
  • 打赏
  • 举报
回复
是 ONDATACHANGE事件吧 可是加入以后 什么都不显示了 。我的默认是 'select*from U_HTQCBF ???
zhlwyy 2004-07-20
  • 打赏
  • 举报
回复
在它的onChange事件里写
if DBLookupComboBox.ItemIndex=1 then
begin
ADOQuery1.Close;
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add('select*from U_HTQCBF where F_BH="01"');
end
else
if DBLookupComboBox.ItemIndex=..then
begin
end

2,507

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧