gibt es was wie RecordToJsonString

[charly52]

Zitat von Union:

Ansonsten bestünde auch die Möglichkeit, den Record mit einer function AsJSON : string zu erweitern und dort das JSON zu erzeugen. Die kann gerne auch in einem Record helper sitzen.

Wie könnte das aussehen? Ich habe an der Front noch keinen blassen Schimmer.

Delphi-Quellcode:

type

TRec3 = record
          xyz: Integer;
          abc: boolean;
end;

TArr1  = Array[1..5] of TRec3;


TRecord2 = record
              int1: Integer;
              str3: String;
end;

TRecord = record
            str1: String;
            rec2: TRecord2;
            arr1: TArr1;
end;

var
  myRecVar : TRecord;
  myJSONString: String;

Könnte ich mit was von dir beschriebenen dann sowas nutzen?

myJSONString:= RecordToJsonString(myRecVar, ....); und was muss in TRecord alless rein?
Gibt es dazu ein schönes Beispiel?

Danke