Sfoglia il codice sorgente

* Merging revisions 42979 from trunk:
------------------------------------------------------------------------
r42979 | michael | 2019-09-13 18:20:59 +0200 (Fri, 13 Sep 2019) | 1 line

* Fix uninitialized var warning
------------------------------------------------------------------------

git-svn-id: branches/fixes_3_2@43256 -

michael 6 anni fa
parent
commit
b1347be8f7
1 ha cambiato i file con 1 aggiunte e 0 eliminazioni
  1. 1 0
      packages/fcl-web/src/base/fphttpclient.pp

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

@@ -433,6 +433,7 @@ var
 begin
   l := Length(S);
   if l=0 then exit;
+  Result:='';
   SetLength(Result, l);
   P:=PChar(Result);
   i:=1;