做了个查询窗体,
查询的条件比较多:州地市,单位,税务机关,税管员,税种,行业,行业明细
这些条件都是用下拉组合框(combobox)来显示的。
比如:
我在州地市里选“四川省成都市”,后面的单位组合框就只能显示“成都市的单位”
如果"州地市"combobox中没有选择(为空),那么"单位"combobox中就应该显示的是数据库中的"全部单位"
所以我就在form2.onshow事件中写了combobox提取数据库数据并显示的代码
现在的问题是我在combobox的onchange中写了代码,不改变(选择了"州地市",而单位combobox中显示的仍然是全部的单位,没有将所选择的"州地市"的单位). 急!!!!!!!!
谢谢!!!!!!
查询的条件比较多:州地市,单位,税务机关,税管员,税种,行业,行业明细
这些条件都是用下拉组合框(combobox)来显示的。
比如:
我在州地市里选“四川省成都市”,后面的单位组合框就只能显示“成都市的单位”
如果"州地市"combobox中没有选择(为空),那么"单位"combobox中就应该显示的是数据库中的"全部单位"
所以我就在form2.onshow事件中写了combobox提取数据库数据并显示的代码
现在的问题是我在combobox的onchange中写了代码,不改变(选择了"州地市",而单位combobox中显示的仍然是全部的单位,没有将所选择的"州地市"的单位). 急!!!!!!!!
谢谢!!!!!!
解决方案 »
- 怎样在程序里确定image控件的尺寸?
- delphi前景如何?
- 请教Delphi 中应用Excel 问题!
- query1.add('create table abc (c++ char(10))')语句创建表时字段的名字不能含有“+”或”-“一些字符;
- 怎么用STRINGGRID更新数据库??
- publish的含义是什么啊和public有什么区别啊
- 用ADO组件怎样将图片写入SQL SERVER数据库?
- Delphi开发的ocx调用java开发的webservice,调不通
- 对象为什么不能create?
- 能让image或者label等控件旋转或抖动吗
- 这样的Fastreport怎么生成,主从表?
- 怎么解决delphi中出错提示应用程序在当前操作中使用了错误类型的值
根据combobox1的选定值进行查询
然后循环添加到combobox2中去就ok了
var s3:string;
begin
if combobox3.Text='' then
begin
combobox4.Visible:=true;
combobox8
.Visible:=false;
end
else
begin
s3:=copy(combobox3.Text,1,pos('[',combobox3.Text)-1);
combobox8.Items.Clear;
combobox4.Visible:=false;
combobox8.Visible:=true;
LJClientDataSet8.Close;
LJClientDataSet8.Provider.DataRequest('select distinct oper_num,oper_name from dsbm.oper_def '+
'where oper_num in (select sgy from dsbm.shd where swjg='+s3+') and cxjc=5 order by oper_num / ');
LJClientDataSet8.Open;
combobox8.Items.Add('');
while not LJClientDataSet8.Eof do
begin
combobox8.Items.Add(LJClientDataSet8.fieldbyname('oper_num').asstring+'['+LJClientDataSet8.fieldbyname('oper_name').asstring+']');
LJClientDataSet8.Next;
end;
end;
end;这是我按照上面二楼朋友的办法做的这个可以实现.
不知道还有没有其他的办法可以实现.