diff options
Diffstat (limited to 'packages/fcl-json/src/fpjson.pp')
| -rw-r--r-- | packages/fcl-json/src/fpjson.pp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/packages/fcl-json/src/fpjson.pp b/packages/fcl-json/src/fpjson.pp index 357ce86a6d..e8b6415df6 100644 --- a/packages/fcl-json/src/fpjson.pp +++ b/packages/fcl-json/src/fpjson.pp @@ -724,7 +724,7 @@ end; function TJSONboolean.GetAsString: TJSONStringType; begin - Result:=BoolToStr(FValue); + Result:=BoolToStr(FValue, True); end; procedure TJSONboolean.SetAsString(const AValue: TJSONStringType); |
