From 517c12e73810e22e3fdccfdde3819165a02c276b Mon Sep 17 00:00:00 2001
From: Daniel <daniel.davila@ids.inf.br>
Date: Thu, 20 Jul 2023 14:35:31 -0300
Subject: [PATCH] Fix the array path of the Answer.

---
 src/BardAPI.pas | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/BardAPI.pas b/src/BardAPI.pas
index ea12e2f..c30ec09 100644
--- a/src/BardAPI.pas
+++ b/src/BardAPI.pas
@@ -681,7 +681,7 @@ procedure TBardAPI.Query;
         GetImages;
 
         // get response answer
-        FAnswer := FindJsonValue(LParsedAnswer, '[0][0]').Value;
+        FAnswer := FindJsonValue(LParsedAnswer, '[4][0][1][0]').Value;
 
         // get conversation id
         FConversationID := FindJsonValue(LParsedAnswer, '[1][0]').Value;