Question

Delphi中如何将SqL语句写入字符串，要做哪些改动才合法？

Delphi中将SQL语句写入字符串变量s里，然后运行Sql.add(s);
//var
//s:String;
begin
//s:='Update empl Set e_salary=e_salary*'+QuotedStr((1+strToInt(Trim(Edit1.text))/100));
with ADOQuery1 do
begin
//SQL.Add(s);
SQL.Add('Update empl Set e_salary=e_salary*:Rate');
Parameters.ParamByName('Rate').Value:=1+StrToInt(Trim(Edit1.Text))/100;
ExecSQL;
end;

Answer 1

//s:='Update empl Set e_salary=e_salary*'+QuotedStr((1+strToInt(Trim(Edit1.text))/100));
s:='Update empl Set e_salary=e_salary*(1+'+Trim(Edit1.text)+'/100)';
最好先判断一下Trim(Edit1.text)这个是否是数字

Answer 2

只要构成的语句符合Delphi语法，生成的字符串符合数据库的SQL语句要求，随你改，都是合法的。