diff options
Diffstat (limited to 'avx512-0037785/packages/fcl-json/src/fpjson.pp')
| -rw-r--r-- | avx512-0037785/packages/fcl-json/src/fpjson.pp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/avx512-0037785/packages/fcl-json/src/fpjson.pp b/avx512-0037785/packages/fcl-json/src/fpjson.pp index d83157a624..f4acce05a1 100644 --- a/avx512-0037785/packages/fcl-json/src/fpjson.pp +++ b/avx512-0037785/packages/fcl-json/src/fpjson.pp @@ -1796,7 +1796,7 @@ end; function TJSONBoolean.GetAsString: TJSONStringType; begin - Result:=BoolToStr(FValue, True); + Result:=BoolToStr(FValue, 'true', 'false'); end; procedure TJSONBoolean.SetAsString(const AValue: TJSONStringType); |