Fix compatibility version with Timeout

Adicionado a condição {$IF COMPILERVERSION <= 33} para compatibilidade da função Timeout com versão do Delphi Rio ou anteriores.
viniciussanchez · Aug 26, 2023 · 6b63953 · 6b63953
1 parent e486611
commit 6b63953
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/RESTRequest4D.Request.Client.pas b/src/RESTRequest4D.Request.Client.pas
@@ -437,7 +437,7 @@ function TRequestClient.SynchronizedEvents(const AValue: Boolean): IRequest;
 
 function TRequestClient.Timeout: Integer;
 begin
-  {$IF COMPILERVERSION <= 32}
+  {$IF COMPILERVERSION <= 33}
     Result := FRESTRequest.Timeout;
   {$ELSE}
     Result := FRESTRequest.ConnectTimeout;
@@ -551,7 +551,7 @@ function TRequestClient.ResourceSuffix(const AResourceSuffix: string): IRequest;
 function TRequestClient.Timeout(const ATimeout: Integer): IRequest;
 begin
   Result := Self;
-  {$IF COMPILERVERSION <= 32}
+  {$IF COMPILERVERSION <= 33}
     FRESTRequest.Timeout := ATimeout;
   {$ELSE}
     FRESTRequest.ConnectTimeout := ATimeout;