Ergebnis der Suchanfrage

• Forum: Programmieren allgemein

  AW: JSON Wert zufügen

   
    by Union, 16. Feb 2022
  Hier das funktionierende Codefragment.
  uses
  System.JSON;
  
  const
  JSONDATA =
  '{"Version":"1","ID":"Zeptor","IncompatibleIds":,"Dependent":null,' +
  '"Lapforce":{"English":"much","French":null,"German":"Viel","Italian":null,' +
  '"Japanese":null,"Korean":null,"Polish":null,"Russian":null,"Spanish":null,' +
  ...
• Forum: Programmieren allgemein

  AW: JSON Wert zufügen

   
    by Union, 16. Feb 2022
  Wir helfen ja gerne. Natürlich fällt das leichter wenn auch ein Minimum an Eigeninitiative erkennbar ist. Ich habe die grundlegende Vorgehensweise beschrieben, der REST 8-) sollte bei Vorliegen der Dokumentation nicht schwer zu erarbeiten sein.
  
  Auch COBOL unterstützt JSON inzwischen direkt in den meisten Dialekten (z.b. IBM, MF mit json parse into). Du könntest also sogar deine "Hauptsprache"...
• Forum: Programmieren allgemein

  AW: JSON Wert zufügen

   
    by Union, 16. Feb 2022
  Auf die einzelnen TJSONValue im TJSONArray greifst Du über die Get - Methode zu. Die erhaltenen Objekte verarbeitest Du analog mit AddPair.
  
  Ich kann Dir nur empfehlen, dich in die Delphi JSON Frameworks einzuarbeiten. Falls Du künftig noch länger programmieren wirst, kommst Du nämlich um JSON (und u.U. BSON, Protocol Buffers etc.) nicht herum.
• Forum: Programmieren allgemein

  AW: JSON Wert zufügen

   
    by Union, 15. Feb 2022
  Die TJSONValue Werte liegen in einem TJSONArray vor.
• Forum: Programmieren allgemein

  AW: JSON Wert zufügen

   
    by Union, 15. Feb 2022
  Wenn das Objekt als TJSONValue vorliegt:
  
  var LValue : TJSONValue;
  LValue := TJSONObject.ParseJSONValue(<Der JSON String>);
  TJSONObject(AValue.FindValue('Lapforce')).AddPair('Czech', TJSONNull.Create);