TJSONObject

type TJSONObject = class(TJSONData)

protected

  function DoFindPath(); override;

  procedure Converterror();

  function GetAsBoolean; override;

  function GetAsFloat; override;

  function GetAsInteger; override;

  function GetAsInt64; override;

  function GetAsQWord; override;

  procedure SetAsInt64(); override;

  procedure SetAsQword(); override;

  procedure SetAsBoolean(); override;

  procedure SetAsFloat(); override;

  procedure SetAsInteger(); override;

  function GetAsJSON; override;

  function GetAsString; override;

  procedure SetAsString(); override;

  function GetValue; override;

  procedure SetValue(); override;

  function GetCount; override;

  function GetItem(); override;

  procedure SetItem(); override;

  function DoFormatJSON(); override;

public

  constructor Create();

  destructor Destroy; override;

  class function JSONType; override;

  property UnquotedMemberNames: Boolean; [rw]

  function Clone; override;

  function GetEnumerator; override;

  procedure Iterate();

  function IndexOf();

  function IndexOfName();

  function Find();

  function Get();

  procedure Clear; override;

  function Add();

  procedure Delete();

  procedure Remove();

  function Extract();

  property Names []: TJSONStringType; [r]

  property Elements []: TJSONData; default; [rw]

  property Types []: TJSONtype; [r]

  property Nulls []: Boolean; [rw]

  property Floats []: TJSONFloat; [rw]

  property Integers []: Integer; [rw]

  property Int64s []: Int64; [rw]

  property QWords []: QWord; [rw]

  property LargeInts []: TJSONLargeInt; [rw]

  property UnicodeStrings []: TJSONUnicodeStringType; [rw]

  property Strings []: TJSONStringType; [rw]

  property Booleans []: Boolean; [rw]

  property Arrays []: TJSONArray; [rw]

  property Objects []: TJSONObject; [rw]

end;

TJSONObject

TJSONData

TObject