为什么我的带有整数字段的参数化查询失败？

Question

我有一个 TQuery 对象，指向 dBase 数据库，我想知道应该如何参数化我的插入语句。

以下 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 错误“表达式中的类型错误”：

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

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

我尝试了 InstructorNo 分配的各种变体，例如 .Value 而不是 AsInteger，但它们都会产生相同的错误。

列“INSTNR”定义为数字，最大宽度=4，小数=0。我尝试分配的值为 999。

函数参数 InstructorNo 的类型为 Integer。

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

编辑：我已经部分解决了这个问题

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

另一个编辑：终于明白

我必须使用 .AsFloat 来获取存储的值。尽管对 CustomerID 使用浮点类型字段有点奇怪。

Answer 1

通过通过 .AsInteger 分配值，参数将被标记为 4 字节整数。
这不适合 2 字节 dBase 整数（4 位整数为 2 字节）。
因此出现错误消息。

——杰罗恩