procedure Tsr.BitBtn2Click(Sender: TObject);
begin
     query1.SQL.Clear ;
query1.SQL.Add('select * from dangtianshourubiao  where usernmae='''+edit4.text+'''' )  ;
query1.Open;
query1.Refresh ;end;

解决方案 »

  1.   

    select * from dangtianshourubiao  where usernmae='+''''+edit4.text+'''' 
      

  2.   

    写法没错。sql语句字段没错么?是usernmae还是username.
      

  3.   

    procedure Tsr.BitBtn2Click(Sender: TObject); 
    begin 
      query1.Close;  //加上这句
      query1.SQL.Clear ; 
      query1.SQL.Add('select * from dangtianshourubiao  where usernmae='''+edit4.text+'''' )  ; 
      query1.Open; 
      query1.Refresh ;  //这句可以删掉 
    end;
      

  4.   

    谢谢了
    是username
     但是有发现新的错误了
    [Error] WARNING. Duplicate resource(s):
    [Error]   Type 10 (RCDATA), ID TSCYH:
    [Error]     File yhsc.dfm resource kept; file Unit1.dfm resource discarded.