查询问题 急 在线等待

Question

procedure TForm1.Button1Click(Sender: TObject);
var
x:string;
begin
x:=edit1.Text;
query1.Close;
query1.SQL.Clear;
query1.sql.Add('select * from people where 姓名='+x);
query1.open;
dbgrid1.datasource:=datasource1;
dbgrid1.refresh;
end;
end.
其中 people 为数据表名 姓名为字段名称
如在edit1中输入张玉则系统提示错误信息列名'张玉'无效 

Answer 1

query1.sql.Add('select * from people where 姓名='''+x+'''');

Answer 2

query1.sql.Add('select * from people where 姓名='+quotedstr('张玉'));

Answer 3

frogshero(三波萝)  HOHOHO
你也有来晚的时候；^_^；
query1.sql.Add('select * from people where 姓名 = :1');
parameters.parambyname('1').value := X;

Answer 4

47522341(睡到8：30)   hehe
:>