fix: Ajuste defensivo em GetResponseEncText

Author: mobius1qwe

src/base/RALResponse.pas

@@ -357,12 +357,14 @@ function TRALClientResponse.GetResponseEncText(
   vStream : TStream;
 begin
 //  {$IFDEF FPC}
-    vStream := TRALStringStream.Create(FStream);
-    try
-      Result := StreamToString(vStream);
-    finally
-      FreeAndNil(vStream);
-    end;
+  if not Assigned(FStream) then exit;
+
+  vStream := TRALStringStream.Create(FStream);
+  try
+    Result := StreamToString(vStream);
+  finally
+    FreeAndNil(vStream);
+  end;
 //  {$ELSE}
 //    vStream := TStringStream.Create(EmptyStr);
 //    FStream.Position := 0;
@@ -380,7 +382,7 @@ procedure TRALClientResponse.SetResponseStream(const AValue: TStream);
   if FStream <> nil then
     FreeAndNil(FStream);
 
-  if AValue.size > 0 then
+  if Assigned(AValue) and (AValue.size > 0) then
     FStream := Params.DecodeBody(AValue, ContentType, ContentDisposition);
 end;