Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.378 Beiträge
 
Delphi 12 Athens
 
#3

AW: TJson.ObjectToJsonString - Reihenfolge der Felder ändern

  Alt 15. Dez 2020, 16:03
Versuch mal
Delphi-Quellcode:
type
  TAdditionTest = class(TTest)
  private
    FAdditionValue: String;
  public
    property ID;
    property Value;
    property AdditionValue: String read FAdditionValue write FAdditionValue;
  end;
Eigentlich nutzt man das, um die Sichtbarkeit der Property zu ändern (Protected>Public>Published), aber vielleicht hilft's hier ja auch.

TRttiType.GetFields geht halt die Vererbung durch, also erst alles "neue" in TAdditionTest und dann wird unten das von dem Vorfahren (TTest) an die Liste angehängt.
(oben in die Liste einzufügen hielt man wohl für unnötig umständlich)
Ein Therapeut entspricht 1024 Gigapeut.

Geändert von himitsu (15. Dez 2020 um 16:12 Uhr)
  Mit Zitat antworten Zitat