query1.close;
query1.SQL.clear;
query1.SQL.add('select * from  employ where 姓名=edit1.text');
query1.open;
程序老是指edit1.text出错,可是不知道怎么改。哪位大虾帮帮忙啊!!

解决方案 »

  1.   

    'select * from  employ where 姓名='''+edit1.text+''''
      

  2.   

    query1.close; 
    query1.SQL.clear; 
    query1.SQL.add('select * from  employ where 姓名='''+edit1.text+''''); 
    query1.open; 
      

  3.   

    query1.SQL.add('select * from  employ where 姓名='''+edit1.text+'''')
      

  4.   

    query1.SQL.add('select * from  employ where 姓名='+quotedstr(edit1.text))
      

  5.   

      qTemp.Close;
      qTemp.SQL.Clear;
      qTemp.SQL.Add(' update tCustom set fMode=:fMode,fBase=:fBase,fStart=:fStart,fvarZ=:fvarZ where fName=:fName ');
      qTemp.Parameters.ParamByName('fMode').Value := cxComboBox2.Text;
      qTemp.Parameters.ParamByName('fBase').Value := cxCurrencyEdit1.Text;
      qTemp.Parameters.ParamByName('fStart').Value := cxCurrencyEdit2.Text;
      qTemp.Parameters.ParamByName('fvarZ').Value := cxCurrencyEdit3.Text;
      qTemp.Parameters.ParamByName('fName').Value := cxComboBox1.Text;
      qTemp.ExecSQL;
      ShowMessage('你的自定义测量设置已保存成功!');
    我觉得用参数这种方式更好一些!
      

  6.   

    query1.close; 
    query1.SQL.clear; 
    query1.SQL.add('select * from  employ where 姓名=' + edit1.text); 
    query1.open;