From 897688a77ed3e09febc7699b34f3639fbe2c8705 Mon Sep 17 00:00:00 2001
From: UrbanCohortDev <UrbanCohortDev@users.noreply.github.com>
Date: Tue, 20 Apr 2021 16:39:02 +0100
Subject: [PATCH 1/2] Update Amazon.DelphiRESTClient.pas

---
 Source/Core/Amazon.DelphiRESTClient.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Source/Core/Amazon.DelphiRESTClient.pas b/Source/Core/Amazon.DelphiRESTClient.pas
index c6a9d57..c434643 100644
--- a/Source/Core/Amazon.DelphiRESTClient.pas
+++ b/Source/Core/Amazon.DelphiRESTClient.pas
@@ -104,6 +104,7 @@ procedure TAmazonDelphiRestClient.Post(aUrl: string; aRequest: UTF8String;
       begin
         // fiErrorCode := E.Message
         fsErrorMessage := E.Message;
+        aResponse := FResponseContent.DataString;
 
         if Trim(aResponse) = '' then
           aResponse := fsErrorMessage;

From 3f6e4a00f56c4d866ed1c4a540a02ac69ff83e6c Mon Sep 17 00:00:00 2001
From: UrbanCohortDev <UrbanCohortDev@users.noreply.github.com>
Date: Tue, 20 Apr 2021 23:57:15 +0100
Subject: [PATCH 2/2] Delphi 10.4 Update

Added Delphi 10.4 to the DelphiVersions.inc file
---
 Source/Core/Amazon.SignatureV4.pas |  2 +-
 Source/DelphiVersions.inc          | 19 +++++++++++++++++++
 2 files changed, 20 insertions(+), 1 deletion(-)

diff --git a/Source/Core/Amazon.SignatureV4.pas b/Source/Core/Amazon.SignatureV4.pas
index 7248c33..fc8a459 100644
--- a/Source/Core/Amazon.SignatureV4.pas
+++ b/Source/Core/Amazon.SignatureV4.pas
@@ -3,7 +3,7 @@
 
 interface
 
-Uses Classes, Amazon.Utils, SysUtils, IdGlobal, Amazon.Interfaces,
+Uses Classes, Amazon.Utils, SysUtils, {$IFDEF DELPHIXE8_UP}IdGlobal,{$ENDIF} Amazon.Interfaces,
   Amazon.Request;
 
 const
diff --git a/Source/DelphiVersions.inc b/Source/DelphiVersions.inc
index 1248f9d..b80208d 100644
--- a/Source/DelphiVersions.inc
+++ b/Source/DelphiVersions.inc
@@ -15,6 +15,12 @@
 
 (* http://docwiki.embarcadero.com/RADStudio/Rio/en/Compiler_Versions *)
 
+
+(* Delphi 10.4  / C++Builder Sydney / D27 *)
+{$IFDEF VER340}
+   {$DEFINE DELPHI10_4}
+{$ENDIF}
+
 (* Delphi 10.3  / C++Builder Rio / D26 *)
 {$IFDEF VER330}
    {$DEFINE DELPHI10_3}
@@ -93,6 +99,19 @@
    {$DEFINE DELPHI2007_1}
 {$ENDIF}
 
+{$IFDEF DELPHI10_4}
+   {$DEFINE DELPHI10_4_UP} 
+   {$DEFINE DELPHI10_3_UP}
+   {$DEFINE DELPHI10_2_UP}
+   {$DEFINE DELPHI10_1_UP}
+   {$DEFINE DELPHI10_UP}
+   {$DEFINE DELPHIXE8_UP}
+   {$DEFINE DELPHIXE7_UP}
+   {$DEFINE DELPHIXE6_UP}
+   {$DEFINE DELPHI2009_UP}
+{$ENDIF}
+
+
 {$IFDEF DELPHI10_3}
    {$DEFINE DELPHI10_3_UP}
    {$DEFINE DELPHI10_2_UP}