XProfan X4 mit JSON-Unterstützung

    Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

    Unsere Datenschutzerklärung wurde aktualisiert. Mit der Nutzung unseres Forums akzeptierst Du unsere Datenschutzerklärung. Du bestätigst zudem, dass Du mindestens 16 Jahre alt bist.

    • Hallo Michael,

      Dein ShowJSON gefällt mir sehr gut. Wenn Du nichts dagegen hast,. baue ich es als Json("Hash", js) in XProfan ein. Parameter ist eine Json-Objekt-ID, das Ergebnis ist das Hash-Array.

      Gruß
      Roland
      (Intel Duo E8400 3,0 GHz / 4 GB RAM / 250 GB HDD / ATI Radeon HD4770 512 MB / Windows Vista - ausgemustert zum Verkauf)
      AMD Athlon II X2 2,9 GHz / 8 GB RAM / 500 + 1000 GB HDD / ATI Radeon 3000 (onboard) / Windows 10(64) - XProfan X4


      http://www.xprofan.de
    • Und jetzt habe ich es in der seit heute aktuellen Subscriptionsversion eingebaut:

      ftp("ListDir", Datei[, modus])
      Wenn Modus weggelassen wird oder 0 ist, wird wie bisher ein ausführliches Listing in die Datei geschriebn, ist der Modus <> 0, stehen in der Datei nur die Dateinamen, die etwa mit move("FileToList", Datei) in die Listboxliste geschrieben werden können.

      HashArray[] = json("Hash", Jsondatei)
      Die JSON-Datei wird in ein Hash-Array eingelesen!
      Boolsche Werte haben den "*TRUE*" oder "*FALSE*".
      Eine Liste hat den Wert "[n]", ein Objekt den Wert "{n}", wobei n das entsprechende Handle ist. Ein Beispiel:

      Quellcode

      1. Declare string Dateiname, Schluessel, Wert, \
      2. long js, \
      3. hash HashArray[]
      4. window 1500,1000
      5. Dateiname = LoadFile$("Wähle eine JSON-Datei","*.json")
      6. If Dateiname > ""
      7. js = Create("json", Dateiname)
      8. HashArray[] = json("Hash", js)
      9. ForEach HashArray[], Schluessel, Wert
      10. Print Schluessel + " = " + Wert
      11. EndFor
      12. EndIf
      13. Print
      14. Print "Taste drücken ..."
      15. WaitInput
      16. End
      Alles anzeigen
      Das Ergebnis sieht z.B. so aus:

      Quellcode

      1. Herausgeber = Xema
      2. Nummer = 1234-5678-9012-3456
      3. Deckung = 2000000
      4. Waehrung = EURO
      5. Inhaber = {2}
      6. Inhaber|Name = Mustermann
      7. Inhaber|Vorname = Max
      8. Inhaber|maennlich = *TRUE*
      9. Inhaber|Hobbys = [3]
      10. Inhaber|Hobbys|0 = Reiten
      11. Inhaber|Hobbys|1 = Golfen
      12. Inhaber|Hobbys|2 = Lesen
      13. Inhaber|Alter = 42
      14. Inhaber|Kinder = [4]
      15. Inhaber|Partner = *NULL*
      Alles anzeigen
      (Intel Duo E8400 3,0 GHz / 4 GB RAM / 250 GB HDD / ATI Radeon HD4770 512 MB / Windows Vista - ausgemustert zum Verkauf)
      AMD Athlon II X2 2,9 GHz / 8 GB RAM / 500 + 1000 GB HDD / ATI Radeon 3000 (onboard) / Windows 10(64) - XProfan X4


      http://www.xprofan.de