if combobox3.Text='按住户姓查' then
begin
query1.Close;
query1.SQL.clear;
query1.SQL.add('select * from fzwj.dbf where zh like zhxing%');
query1.Prepare;
query1.ParamByName('zhxing').AsString:=edit4.Text;//给SQL变量赋值
query1.Open;
query1.Active:=true;
end;
(注:“zh”是表fzwj.dbf中的字段,“zhxing”是String类的局部变量)
这样写程序执行为何得不到预期结果?错在哪?
begin
query1.Close;
query1.SQL.clear;
query1.SQL.add('select * from fzwj.dbf where zh like zhxing%');
query1.Prepare;
query1.ParamByName('zhxing').AsString:=edit4.Text;//给SQL变量赋值
query1.Open;
query1.Active:=true;
end;
(注:“zh”是表fzwj.dbf中的字段,“zhxing”是String类的局部变量)
这样写程序执行为何得不到预期结果?错在哪?
解决方案 »
- 请问哪位有斯图兹精密空调的通讯协议,麻烦给发一份,谢谢。
- 为何同一个程序,有的win7可以打开,有的报,请求的操作需要提升!
- 关于procedure定义的问题!
- 急啊,在delphi中如何用SQL语句彻底删除.dbf(VFP)表中的所有记录?
- 关于Delphi 2006 的问题
- Borland Delphi 7 Studio Enterprise 注册码,序列号
- ★★乱散100分啦!★★喜欢用yahoo通(yahoo messanger)的朋友近来报道啊!不管是初学者还是大虾都来吧!
- 如何对比两张文字类型的矢量图片?
- paodox数据库
- 使用delphi7+sql2005编写的系统,现要求多地同时使用,有什么好方案?
- 高难度挑战(一个关于远程桌面终端的问题)$$$$$$$
- 放分,是有理由的
begin
query1.Close;
query1.SQL.clear;
query1.SQL.add('select * from fzwj.dbf where zh like :zhxing');
query1.Prepare;
query1.ParamByName('zhxing').AsString:=Trim(edit4.Text) + '%';//给SQL变量赋值
query1.Open; //Open和下面的True相当
// query1.Active:=true;
end;
// query1.Active:=true;