我用query组件查询职工表内容 把要查的人在edit中输入

procedure TForm1.Button1Click(Sender: TObject);
var
aaa:string;
begin
with query1 do
begin
close;
sql.Clear;
sql.Add('select * from  职工表 where 姓名 = :aaa');
params[0].AsString:=edit1.text;
open;
end;
end;
end.

这样可以实现了

但是我想使用2个edit 一个选择要查询的fields[] 比如edit1里输入姓名 还可以输入 编号

edit2输入对应的内容来实现更复杂的查询

procedure TForm1.Button1Click(Sender: TObject);
var
aaa:string;
bbb:string;
begin
with query1 do
begin
close;
sql.Clear;
sql.Add('select * from  职工表 where :aaa = :bbb');
params[0].AsString:=edit1.text;
params[1].AsString:=edit2.text;
open;
end;
end;
end.

可是这样显示的结果都是空记录 想了很久没看出问题 请问问题出在哪呢