sql.Add('select ... where ... 字段='+Edit1.Text)
解决方案 »
- RzDBGrid使用问题,无法响应DrawDataCell事件
- 主窗口的WM_COMMAND是怎么触发的?
- dbgrid 小问题,请大家帮忙!谢谢
- 求教各种提高SQL 2000 SP3远程访问速度的做法。在线!!
- 100分求教:Filemonitor.dll的问题
- 请问一下这样一个物流管理系统得要多少钱
- 新手关于stringgrid不会用?
- 为什么我在程序中用 'ParamByname'时总是有错:[Error] Unluru.pas(54): Undeclared identifier: 'ParamByname'?
- 关于ADO提交的问题
- 急,请问如何用delphi做一个波形发生器
- 关于Chart的问题,请教!
- 请教有关记录定位问题。
mysql:string;
...
mysql:='';
mysql:='select ... from ... where XXX=:myparam'
query1.close;
query1.sql.clear;
sql.add(mysql);
query1.parambyname('myparam').asstring:=edit1.text;
query1.open;
...
如果edit内是数值
sql.Add('select ... where ... 字段='''+Edit1.Text+'''')
如果是数值型的
sql.Add('select ... where ... 字段='+Edit1.Text+'')
想看打印出来的SQL语句
用
呵呵,有补充sql.Add('select ... where ... 字段='''+Edit1.Text+'''')
如果是数值型的
sql.Add('select ... where ... 字段='+Edit1.Text+'')
想看查看出来的SQL语句
用SHOWMESSAGE(SQL.TEXT)
如果想用文件导出到后台,用
SQL.savetofile('c:\...\filename.txt')