我用了两个RZCOMBOBOXBAK做下拉显示,要求在选择第一个combobox数据后,第二个combobox会自动显示满足第一个combobox数据.其实现的代码为:
if cbb_ys.Text<>'' then
begin
qry5.Close;
qry5.SQL.Clear;
qry5.SQL.Add('select USEAMOUNT from T_WASTE where FACTOR='+cbb_ys.Text);
qry5.SQL.Add(' order by USEAMOUNT');
qry5.Open;
qry5.First;
while not qry5.Eof do
begin
cbb_dl.Items.Add(FloatToStr(qry5.fieldbyname('USEAMOUNT').AsFloat));
qry5.Next;
end;
qry5.Close;
end;但是在cbb_ys第一次选择一数据后,cbb_dl的数据会正确的显示,可是再在cbb_ys选择另一个数据时,第一次的数据和第二次的数据都显示在里面.只要求显示第二次选择的数据显示出来.那位大侠帮忙?
if cbb_ys.Text<>'' then
begin
qry5.Close;
qry5.SQL.Clear;
qry5.SQL.Add('select USEAMOUNT from T_WASTE where FACTOR='+cbb_ys.Text);
qry5.SQL.Add(' order by USEAMOUNT');
qry5.Open;
qry5.First;
while not qry5.Eof do
begin
cbb_dl.Items.Add(FloatToStr(qry5.fieldbyname('USEAMOUNT').AsFloat));
qry5.Next;
end;
qry5.Close;
end;但是在cbb_ys第一次选择一数据后,cbb_dl的数据会正确的显示,可是再在cbb_ys选择另一个数据时,第一次的数据和第二次的数据都显示在里面.只要求显示第二次选择的数据显示出来.那位大侠帮忙?
解决方案 »
- 多线程,传递参数时装载不了dll?
- 请问如何把html转化成txt格式
- 请问大家做销售界面的一般什么网格控件
- 一个问题小妹实在不知如何解决了
- 我的练习程序
- 如何获取网络端口的数据
- delphi 多人开发过程中,如何实现代码共享同步的问题,有没有类似java中的cvs
- blob字段导入图片时出现invalid blob length错误请问怎么解决
- 在DOS下如何还愿一天前的注册表.
- 各位老大,我是VB转向DELPHI的(弃暗投明啊),现在重金悬赏一个单表操作的例子,有如下功能:新增,编辑,删除,刷新等功能,不胜感激,请打包发到我邮箱:[email protected]
- delphi里面的一段sql查询出错.大家帮我看看.谢谢了.
- 运行期界面设计控件!
cbb_dl.Items.Clear;