with AdoQuery1 do
begin
close;
sql.Clear;
sql.text:=format('select 报名号,姓名,省份 from lsbmk where '+
'省份=''%s''',[edit1.text]);
open;
end;
begin
close;
sql.Clear;
sql.text:=format('select 报名号,姓名,省份 from lsbmk where '+
'省份=''%s''',[edit1.text]);
open;
end;
解决方案 »
- FastReport中根据条件隐藏GroupHeader?急!
- 实在搞不定了, 有代码(win32form及activeform差异?)麻烦帮看看。
- RadioGroup中的Radio通过Items输入,好像Radio只能竖的排列?
- 怎么做系统托盘的应用程序????
- 我们在2000下开发了一套程序,在98编译成功通过,运行时提示试图用不正确的格式加载程序?????
- 如何做2个bmp的交替闪烁?
- 一个存储过程的问题(急,在线等待)
- 关于delphi下功能最全面的报表控件讨论(灌水)
- 怎么实现??最好有源代码!!!
- 那位朋友使用过华琦库管精灵这个软件,请留下qq号码和email,交流经验,送分/
- 用DELPHI编一些三层或多层的数据库软件,除了要用到ADO外还要用到一些什么工具?一般用DELPHI编什么样的软件最好(我现在靠DELPHI吃饭)?
- dll文件如何使用非可视控件?
with DataFrm.QLSBMK do
begin
close;
sql.Clear;
sql.add('select bmh,xm,sf');
sql.add('from artlsbmk');
sql.add('where sf=:sf');
parameters[0].value:=e1.text;
prepared;
Open;
end; {bmh,xm,sf分别是:报名号,姓名,省份}
但是dbgrid1不现实结果,dbgrid1的设置正确。
begin
Close;
SQL.Text := 'select * from artlsbmk where Field1= :Param1 and Field2=:Param2';
Parameters.ParamByName('Param1').Value := 'abc';
Parameters.ParamByName('Param2').Value := 2;
Open;
end;
ADO中的参数没有AsString, asInteger,全用.Value,
参数访问方法都用Parameters.ParambyName('ParamName').Value
其它的我没试,先用着吧。