Delphi Json Tutorial hilfe

[LoZe]

Vielleicht Hilft das
https://jsontodelphi.com/
du fügst deinen JSON ein und bekommst eine Klasse mit Load und Save Funktion

Json:

Code:

  {
    "Value1":1,
    "Value2":"Str"
  }

Delphi-Quellcode:

unit RootUnit;

interface

uses
  Pkg.Json.DTO, System.Generics.Collections, REST.Json.Types;

{$M+}

type
  TRoot = class(TJsonDTO)
  private
    FValue1: Integer;
    FValue2: string;
  published
    property Value1: Integer read FValue1 write FValue1;
    property Value2: string read FValue2 write FValue2;
  end;
  
implementation

end.

der Aufruf erfolgt dann mit

Delphi-Quellcode:

Var 
  Obj:TRoot;
begin
  Obj:= TRoot.Create;
  Obj.AsJson := Edit1.Text;

(ungetestet nur ein grobes Beispiel)