Question

delphi with adoquery1 do 问题

form1.Edit1.Text:='select * from 表名 '
with adoquery1 do
begin
close;
sql.Clear;
sql.Add(':str') ;
Parameters.ParamByName('str').Value:=form1.Edit1.Text;
open;
end;

请问为什么不可以这么写？

补充：
ADOQUERY1.Close ;
ADOQUERY1.SQL.Clear;
ADOQUERY1.SQL.Add(form1.Edit1.Text);
ADOQUERY1.open;
这种写法可以执行。

Answer 1

不知道你从哪本书上看到这样的写法是对的

Parameters.ParamByName('str').Value:=form1.Edit1.Text;

正确的写法是

form1.Edit1.Text:='select * from 表名 ';
with adoquery1 do
begin
close;
sql.Clear;
sql.Add(form1.edit1.text) ; //括号中间的是字符类型。
open;
end;

或者

var
sql:string;
begin
form1.Edit1.Text:='select * from 表名 ';
sql:=form1.edit1.text;
with adoquery1 do
begin
close;
sql.Clear;
sql.Add(form1.edit1.text) ; //括号中间的是字符类型。
open;
end;
end;

这种写法也是可以的，你试下就知道了。