level 3
heqian11
楼主
我想用一个Tcombox控件实现两种查询，比如说，按班级查询 按教材名查询，但是目前只实现一种，代码如下：
procedure TTakeBookForm.ComboBox1Click(Sender: TObject);
begin
adoquery1.Close;
adoquery1.sql.clear;
adoquery1.SQL.Add('select * from 教材出入库历史表 where 经办单位=:s0');
adoquery1.Parameters.clear;
adoquery1.Parameters.AddParameter;
adoquery1.Parameters[0].name:='s0';
adoquery1.Parameters[0].DataType:=ftstring;
adoquery1.Parameters[0].Direction:=pdinput;
adoquery1.Parameters[0].Value:=combobox1.text;
adoquery1.Prepared;
adoquery1.active:=true;
end;
请问要选中班级名查询和选中教材名查询具体代码要怎么实现呢？
2014年04月28日 12点04分
1
procedure TTakeBookForm.ComboBox1Click(Sender: TObject);
begin
adoquery1.Close;
adoquery1.sql.clear;
adoquery1.SQL.Add('select * from 教材出入库历史表 where 经办单位=:s0');
adoquery1.Parameters.clear;
adoquery1.Parameters.AddParameter;
adoquery1.Parameters[0].name:='s0';
adoquery1.Parameters[0].DataType:=ftstring;
adoquery1.Parameters[0].Direction:=pdinput;
adoquery1.Parameters[0].Value:=combobox1.text;
adoquery1.Prepared;
adoquery1.active:=true;
end;
请问要选中班级名查询和选中教材名查询具体代码要怎么实现呢？
