query1.close;
query1.SQL.clear;
query1.SQL.add('select * from employ where 姓名=edit1.text');
query1.open;
程序老是指edit1.text出错,可是不知道怎么改。哪位大虾帮帮忙啊!!
query1.SQL.clear;
query1.SQL.add('select * from employ where 姓名=edit1.text');
query1.open;
程序老是指edit1.text出错,可是不知道怎么改。哪位大虾帮帮忙啊!!
query1.SQL.clear;
query1.SQL.add('select * from employ where 姓名='''+edit1.text+'''');
query1.open;
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('你的自定义测量设置已保存成功!');
我觉得用参数这种方式更好一些!
query1.SQL.clear;
query1.SQL.add('select * from employ where 姓名=' + edit1.text);
query1.open;