Einzelne Objectvariable aus ObjectToJSON ausschließen

[taveuni]

Zitat von Uwe Raabe:

Ja, dazu musst du dem Feld ein [JSONMarshalled(False)] Attribut geben.

Hallo Uwe,
Ich habe:

Delphi-Quellcode:

type
  TDoorList = TObjectList<TTBADoor>;
  TDoorListInterceptor = TObjectListInterceptor<TTBADoor>;

type
  TDoors = class
    private
    [JSONOwned(False), JsonObjectList(TDoorListInterceptor)]
    FDoors: TDoorList;
    public
      property Doors: TDoorList read FDoors;
    constructor Create;
    destructor Destroy; override;
  end;

Wenn ich das deserialsiere mit TJson.ObjectToJsonString(TDoors)

erhalte ich das Json:

Code:

'{"doors":{"ownsObjects":true,"listHelper":[{"doorNumber":102,"lastUpdateGmt":"2023-07-11T07:55:13.862Z","wbTerm"........................

Wie kann ich das "ownsObjects":true,"listHelper" im Json vermeiden?