Attribute bei ObjectToJsonstring

[Ghostwalker]

Also irgendwie ignoriert mir die Funktion ObjectToJsonString von TJson meine Attribute.

Folgende Klasse:

Delphi-Quellcode:

  TTest = Class
    private
      fCaption : string;
      fIdent   : Integer;
      [JsonName('Nixda')]
      fInternal: String;
    public
      constructor Create;
      Destructor Destroy;override;
    published
  End;

Ergibt

Code:

{"caption":"Testcaption","ident":42,"internal":"Testcaption mit 42"}

Dabei sollte es eigentlich

Code:

{"caption":"Testcaption","ident":42,"Nixda":"Testcaption mit 42"}

sein.

Muss man da noch irgendwas beachten, wenn man so Objekte serialisieren will ?