一個關于查找的問題，兄弟們幫我看看.....

Question

我是這樣寫的，可編譯成功，但執行起來查不到人員記錄，兄弟們幫我看看.
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
      with adotable1 do
      begin
       if locate('姓名',vararrayof([edit1.text]),[locaseinsensitive]) then
        begin
        showmessage('確有此人！'); 
        end
        else
         showmessage('查無此人...');       
 end;
end;
****************************************
于是我用了第二種方法（SQL語句）竟無法編譯,暈，快幫忙
     with adotable1 do      
      begin
      close;
      sql.clear;
     sql.add('select * from book where 姓名 
like'+''''+'%'+edit1.Text+'%'+'''');
     open;    
     end; 

Answer 1

with adotable1 do      
      begin
      close;
      sql.clear;
     sql.add('select * from book where 姓名 like"%'+edit1.Text+'%"');
     open;    
     end; 

Answer 2

TO： WWWWA(aaaa)
　　幫我看一下第一種方法哪地方有問題.....

Answer 3

with adotable1 do
      begin
       if locate('姓名',trim(edit1.text),[locaseinsensitive]) then
        begin
        showmessage('確有此人！'); 
        end
        else
         showmessage('查無此人...');       
 end;