delphi – 为什么带有Integer字段的参数化查询失败？

以下INSERT查询将与qry.ExecSQL一起正常工作：

qry.SQL.Text :=
  'INSERT INTO KUNDE ' +
  '(FNAVN,ENAVN,INSTNR) ' +
  'VALUES ' +
  '(:FirstName,:LastName,' + IntToStr(InstructorNo) + ' )';

qry.ParamByName('FirstName').AsString := FirstName;
qry.ParamByName('LastName').AsString := LastName;

但是,这个完全参数化的版本失败了BDE错误’在表达式中输入mismtach’：

qry.SQL.Text :=
'INSERT INTO KUNDE ' +
'(FNAVN,INSTNR) ' +
'VALUES ' +
'(:FirstName,:InstructorNo)';

qry.ParamByName('FirstName').AsString := FirstName;
qry.ParamByName('LastName').AsString := LastName;
qry.ParamByName('InstructorNo').AsInteger := InstructorNo;

我已尝试过各种各样的InstructorNo赋值,例如.Value而不是AsInteger,但它们都会产生相同的错误.

列’INSTNR’定义为Numeric,maxwidth = 4,decimals = 0.我试图分配的值是999.

函数参数InstructorNo的类型为Integer.

这是BDE中某种已知的错误吗？

编辑：我已经部分地想出了这一个

我可以通过使用.AsSmallInt而不是.AsInteger来解决某些字段上的这个问题,但是在另一个数字字段上,Integer,SmallInt或Word都不起作用.唯一的方法是手动将值插入SQL语句. maxwidth = 6的dBase数字字段有什么特别之处？

另一个编辑：终于明白了

我不得不使用.AsFloat来获取存储的值.虽然对于CustomerID使用float类型字段有点奇怪.