Skip to main content

AsInteger0

property AsInteger0: Integer read write;

Example​

procedure ScriptEvent(var Value: variant);
var
  Text: TJSONString;
  Item: TJSONValue;
begin
  Text := TJSONString.Create;
  try
    Item := Text;
    Item.AsString := 'not-an-integer';
    Value := Item.AsInteger0;  // 0; scalar conversion failure is suppressed.
  finally
    Text.Free;
  end;
end;

Usage​

AsInteger0 reads Boolean, String or numeric values with zero fallback while still rejecting structured JSON kinds.

Additional Technical Info​

The reader returns 0 for null. A non-null Boolean maps to 1 or 0. A String or jsNumber is passed to Delphi StrToIntDef(..., 0), so malformed text and 32-bit overflow collapse to 0 instead of raising. Unlike AsFloat0, arrays and objects do not collapse to zero: unsupported value kinds raise Deltics EJSONError.

Valid zero, null, false, invalid/overflowing scalar text and some unsuitable numeric formatting are indistinguishable in the result. Check IsNull and ValueType, or use strict AsInteger, when validation matters. Delphi's integer parser also accepts documented non-decimal formats beyond JSON grammar.

The writer is the exact strict AsInteger writer. It formats the 32-bit value with IntToStr and delegates to the concrete virtual setter; there is no fallback or error suppression on assignment. This read/write asymmetry is intentional in the code.

External references

Created 2026-07-15