adodataset查询问题 急 在线等待

Question

procedure TForm1.Button1Click(Sender: TObject);
var
c,n: string;
begin
n:=edit1.Text;
adodataset1.Close;
c:='select * from people where 姓名='+quotedstr(n);
adodataset1.CommandText:=c;
adodataset1.Open;
dbgrid1.DataSource:=datasource1;
dbgrid1.refresh;
end;
end.
其中 people 为表名 
系统提示错误'select * from people where 姓名='张玉''无效

Answer 1

'select * from people where 姓名='+#39+‘张玉'+#39

Answer 2

c:='select * from people where 姓名='+''''+quotedstr(n)+'''';
adodataset1.CommandText:=c;
adodataset1.Open;
dbgrid1.DataSource:=datasource1;
dbgrid1.refresh;
end;

Answer 3

c:='select * from people where 姓名='+quotedstr(n);
一定是你的单引号的问题，改一下好了

Answer 4

Erice(白雪公猪) 和 ziqing(紫情)的方法都比较好，我来晚了，在线等都不结帖啊？