Explorar o código

*http client: rewind RequestBody in SendRequest

Ondrej Pokorny %!s(int64=4) %!d(string=hai) anos
pai
achega
675312c201
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      packages/fcl-web/src/base/fphttpclient.pp

+ 1 - 1
packages/fcl-web/src/base/fphttpclient.pp

@@ -747,7 +747,7 @@ begin
     if not Terminated then
       FSocket.WriteBuffer(S[1],Length(S));
     If Assigned(FRequestBody) and not Terminated then
-      FSocket.CopyFrom(FRequestBody,FRequestBody.Size);
+      FSocket.CopyFrom(FRequestBody,0);
   except
     on E: EWriteError do
       raise EHTTPClientStreamWrite.Create(SErrWritingSocket);