InsertJSONStructure()

Syntaxe

InsertJSONStructure(JSONValeur, *Memoire, Structure)

Insère le contenu de la structure présente en mémoire dans la valeur JSON donnée.

La valeur JSON sera changé en type #PB_JSON_Object et contient un membre pour chaque membre de la structure.

Arguments

JSONValeur	La valeur JSON. Le contenu de la valeur sera remplacé par le contenu de la structure.
*Memoire	L'adresse de la structure à insérer dans la valeur JSON.
Structure	Le type de la structure à insérer.

Valeur de retour

Aucune.

Exemple

  Structure Personne
    Prenom$
    Nom$
    Age.l
    List Livres.s()
  EndStructure
  
  Define P.Personne
  P\Prenom$ = "Jean"
  P\Nom$  = "Dupond"
  P\Age        = 42
  AddElement(P\Livres()): P\Livres() = "Investir pour les nuls"
  AddElement(P\Livres()): P\Livres() = "English pour les nuls"
  AddElement(P\Livres()): P\Livres() = "Dépenser pour les nuls ;)"
  
  If CreateJSON(0)
    InsertJSONStructure(JSONValue(0), @P, Personne)
    Debug ComposeJSON(0, #PB_JSON_PrettyPrint)
  EndIf
  
  ; Resultat : 
  ;{
  ; "Nom"   : "Dupond",
  ; "Livres": [
  ;   "Investir pour les nuls",
  ;   "English pour les nuls",
  ;   "Dépenser pour les nuls ;)"
  ;  ],
  ; "Prenom": "Jean",
  ; "Age"   : 42
  ;}

Voir aussi

InsertJSONArray(), InsertJSONList(), InsertJSONMap(), ExtractJSONArray(), ExtractJSONList(), ExtractJSONMap(), ExtractJSONStructure(),

OS Supportés

Tous