修改数据中的错误：Type mismatch in expression

Question

试试:with Query1 do
begin
  Close;
  sql.Clear;
  sql.Add('UPDATE FORMS SET FORMNO= '''+StrToInt(某个变量)+''' WHERE SETNO=''' + StrToInt(变量) + '''');
  Execsql;
end;

Answer 1

你最好在delphi的pas下看看这个字段是不是smallintfield，参数I和SetNo都是整数改成smallint试试。或将字段改成integer字段

Answer 2

试试:with Query1 do
begin
  Close;
  sql.Clear;
  sql.Add('UPDATE FORMS SET FORMNO= '+IntToStr(某个变量)+' WHERE SETNO=' + IntToStr(变量) );
  Execsql;
end;

Answer 3

我把字段改为integer，结果~~~~~~
谢谢wangzh，谢谢各位！