string - Delphi - TQuery .AsString 返回 bool 字段值 0 或 1

Question

当 TQuery 后代字段的 FieldType 是 ftBoolean 时，如何让 Delphi 7 返回“0”或“1”？默认情况下返回“TRUE”或“FALSE”，即

Query1.Fields[0].AsString 将返回 '0'，而不是 'FALSE'

Answer 1

使用

(Query1.Fields[0] as TBooleanField).DisplayValues := 'TRUE;FALSE';

以“TRUE;FALSE”(或“1;0”)形式设置字符串。这允许您定义 AsString 将返回什么值。

如果您在设计时添加了该字段，并且/或者您获得了一个 bool 字段组件，您也可以使用它，而无需进行类型转换:

Query1YourBooleanField.DisplayValues := 'TRUE;FALSE';

顺便说一句，返回“0”的查询不是，"is"ftBoolean 的查询也不是。这些是查询中的字段，代表表或查询结果集中的字段。