title: Array processing with JSON in Delphi 7
body: <p>I have a response coming to me that looks like this:</p>
  
  <pre><code>{
      "successful": true,
      "responseMessage": "OK",
      "responseCode": 2000,
      "messages": [
          {
              "messageId": "da86ede3-83de-4080-9c20-e8a335a7ac25",
              "messageType": "MessageComposeSendNotification",
              "queuedDateTime": 1402092032000,
              "processAttemptCount": 0,
              "processed": false
          },
          {
              "messageId": "382556a3-0654-4a1c-9b54-8393097d9ec9",
              "messageType": "RecordFileImport",
              "queuedDateTime": 1410811005000,
              "processAttemptCount": 1,
              "processed": false
          }
      ]
  }
  </code></pre>
  
  <p>I can access the first three fields fine by just doing a <code>js.Field['successful'].value</code> call or the other field names. I now need to access the <code>Messages</code> array. What I want to do is step through each item in <code>Messages</code>. If the <code>MessageType</code> is <code>"RecordFileImport"</code> I want to save the <code>MessageID</code> to a stringlist. </p>
  
  <p>Right now I can't access <code>Messages</code>. I assume I need to create a new <code>tlkJSONObject</code> or possibly a <code>tlkJSONList</code> to access its contents but I can't seem to instantiate that object and don't know how to navigate through the items.</p>
  
  <p>I'm using Delphi 7 and LkJSON v1.07.</p>