[delphi] 如图,当我在第一个下拉框中选中内容时,第二个下拉框将出现相应的数据,代码如下
withData1.ADObmxxdobeginclose;sql.clear;sql.add('selectdepartmentfrom_ht_position‘);s...
with Data1.ADObmxx do
begin
close;
sql.clear;
sql.add('select department from _ht_position‘ );
sql.add('where mc like ''%'+ComboBox1.Text+'%''');
open;
combobox2.items.clear;
while not eof do
begin
combobox2.items.add(fieldbyname('department').asstring);
next;
end;
end; 展开
begin
close;
sql.clear;
sql.add('select department from _ht_position‘ );
sql.add('where mc like ''%'+ComboBox1.Text+'%''');
open;
combobox2.items.clear;
while not eof do
begin
combobox2.items.add(fieldbyname('department').asstring);
next;
end;
end; 展开
3个回答
展开全部
有一处错误:
sql.add('select department from _ht_position‘ );
最后的‘ 不是单引号。修改后还能执行。
sql.add('select department from _ht_position‘ );
最后的‘ 不是单引号。修改后还能执行。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
虽然不严谨,但貌似可以实现,你还有什么问题?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你不是解决了吗?还有什么问题?
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询