JSON einlesen - Hilfe für Anfänger

[TERWI]

... eine absoluter JSON-Laie braucht Hilfe:
Wie lese ich einfach und schnell Daten mit folgendem Aufbau ein ?
Hab bisher mit JSON noch nix gemacht.
Die Reihenfolge der Daten in den Blöcken kann je nach Quelle unterschiedlich sein.
Speichern will ich das ganze in einer TList aus Records

Code:

{"Blöcke":
  {"Block_A":
    [{"Liste_1":[],
      "Liste_2":["Text_A"],
      "Int_1":111,
      "Txt_1":"Bla...",
      "Txt_2":"..Bla",
      "Int_2":2222,
      "Bool_1":true,
      "Liste_3":["Text_B","Text_C"],
      "Real_1":123,4,
      "Wert":null,
      "Bool_2":false,
      "Liste_4":[1,3,5,7]
     },
    ],
   "Block_B":
    [{... wie Block_A ...
     }
    ],
   .... 
   "Block_Z":
    [{... wie Block_A ...
     }
    ],
  }
}

Wie lese ich das gescheit & einfach in Schleife mit TJSONObject, TJSONArray, TJSONValue, .... aus ?