TJsonObject Parsen

[SyntaxXx]

Ich habe mich jetzt dazu doch SuperObject zu benutzen, da es viel einfacher zu verwenden ist.

Jetzt hab ich nur ein Problem.
Mein String sieht so aus:

Code:

{
"info":{

    "file":[
        {
            "id":"123",
            "name":"index.php"
        },
        {
            "id":"124",
            "name":"index.html"
        }
    ]
}

Wie komme ich hier jetzt an die Daten von den beiden ID Feldern?

[gzuz]

Hallo,
ich habe momentan das selbe Problem.
Mein JSONString hat den selben Aufbau wie in dem vorherigen Beitrag.
Aber wir komme ich an , in diesem Fall die IDs, ran?

Ich benutze delphi 10 seattle

Freue mich über jede Antwort

[Sir Rufo]

Schau mal dort nach

• http://www.delphipraxis.net/188131-j...n-problem.html
• http://www.delphipraxis.net/188108-r...-klammern.html

[gzuz]

Vielen dank, endlich etwas Aufklärung

[gzuz]

Ich habe allerdings noch eine Frage.
Mein JSONString unterteilt sich in zwei Objekte, welche jeweils aus einem Array bestehn. Mein Problem ist, dass ich nicht weiß wie man, wenn man den gesamten Response als String hat, ihn in zwei objekte zu teielen, um damit dann weiter arbeiten zu können.
Also ein Objekt 1 als String bekommt und Objekt 2 als String bekommt. Ich habe kein Problem mit dem Auslesen von Strings oder anderen datentypen solange ich nur ein obj. habe.

Ich lese mich erst seit zwei Tagen ein, habe aber schon gefühlt jeden Forumbeitrag durchforstet aber nur wenig nützliches gefunden.
abgesehen davon dass ich JSON immer noch nicht richtig verstanden habe.

[Sir Rufo]

Wie in den anderen Threads schon genannt:

Strukturen definieren und einfach benutzen:

Code:

{
  "foo":{
    "items":[
      {
        "name":"bla"
      },
      {
        "name":"blupp"
      }
    ]
  },
  "bar":{
    "items":[
      {
        "name":"blabla"
      },
      {
        "name":"blubber"
      }
    ]
  }
}

Delphi-Quellcode:

type
  TItemJSON = class
  private
    [JsonName('name')]
    FName: string;
  public
    property Name: string read FName;
  end;

  TItemsJSON = class
  private
    [JsonName('items')]
    FItems: TArray<TItemJSON>;
  public
    property Items: TArray<TItemJSON> read FItems;
  end;

  TContainerJSON = class
  private
    [JsonName('foo')]
    FFoo: TItemsJSON;
    [JsonName('bar')]
    FBar: TItemsJSON;
  public
    property Foo: TItemsJSON read FFoo;
    property Bar: TItemsJSON read FBar;
  end;