sqlstring := 'update tt set num1=num1'+StrToInt(anum)+' where district_id=1';
Sql.text:='Update tt set Num1=Num1+'+InttoStr(变量)+'where District_ID=1'
update tt set num1=num1+''+StrToInt(anum)+'' where district_id=1;
var StrSelect:string; Num:Integer; begin StrSelect:=update tt set num1=num1+:anum where district_id=1; Num:='你要加的数据'; xxxxxx.Parameters.ParamValues['anum']:='%'+Num+'%'; end; 未验证!
StrSelect:string;
Num:Integer;
begin
StrSelect:=update tt set num1=num1+:anum where district_id=1;
Num:='你要加的数据';
xxxxxx.Parameters.ParamValues['anum']:='%'+Num+'%';
end;
未验证!