过滤条件为何错？

Question

procedure TForm1.Button1Click(Sender: TObject);
begin
adotable1.Filtered:=false;
adotable1.Filter:='name='+edit1.Text;
adotable1.Filtered:=true;
end;

Answer 1

adotable1.Filter:='name='+quotedstr(edit1.Text);

Answer 2

ok thank you
quotedstr是何函数?有何作用?

Answer 3

name字段肯定是字符串类型，所以
adotable1.Filter:='name='''+edit1.Text+'''';
当然如果要模糊过滤就加上*

Answer 4

to  zhboy(孔方兄
不对啊

Answer 5

procedure TForm1.Button1Click(Sender: TObject);
begin
adotable1.Filtered:=false;
adotable1.Filter:='name='+#39+edit1.Text+#39;
adotable1.Filtered:=true;
end;

Answer 6

上面都不对啊，要想过滤出符合条件的记录:
 Filter:='name='+QuotedStr(Edit1.Text);
 FindFirst;
 FindNext;
 FindPrior;或 Filtered:=True;并处理 OnFilterRecord 事件
 

Answer 7

procedure TForm1.Button1Click(Sender: TObject);
begin
adotable1.close;
adotable1.Filter:='name='''+trim(edit1.Text)'''';
adotable1.Filtered:=true;
adotable1.open;
end;