请大家帮忙看一下下面的代码，谢谢

Question

if  radiobutton1.Checked then
 if  edit1.Text='' then
 begin
 showmessage('请输入姓名');
 end
 else
  if not adotable1.Locate('username',edit1.Text,[]) then
  begin
  showmessage('用户不存在');
  edit1.Text:='';
  end
  else
   adotable1.Filtered:=false;
   adotable1.Filter:='username like'+''''+'%'+trim(edit1.text)+'%'+'''';
   adotable1.Filtered:=true;
调试程序的时候，查询就报错，  adotable1.Filter:='username like'+''''+'%'+trim(edit1.text)+'%'+'''';
   adotable1.Filtered:=true;请大家帮忙指导一下，谢谢

Answer 1

adotable1.Filter:='username like''%'+trim(edit1.text)+'%'' '

Answer 2

这种提示，好像使用的是Access数据库。
试试修改username字段名称或者将username修改成[username]。

Answer 3

http://zhidao.baidu.com/question/38810347

Answer 4

like后面少了一个空格，改成adotable1.Filter:='username like '+''''+'%'+trim(edit1.text)+'%'+'''';

Answer 5

adotable1.Filter:='[username] like '+''''+'%'+trim(edit1.text)+'%'+'''';

Answer 6

调试这种语句出错，我常常会ShowMessage一下，看有没有少了什么东西

Answer 7

#6楼 
codeadotable1.Filter:='[username] like '+''''+'%'+trim(edit1.text)+'%'+'''';的語法才是正確的.