Quellcode durchsuchen

* 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 vor 6 Jahren
Ursprung
Commit
b1347be8f7
1 geänderte Dateien mit 1 neuen und 0 gelöschten Zeilen
  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
 begin
   l := Length(S);
   l := Length(S);
   if l=0 then exit;
   if l=0 then exit;
+  Result:='';
   SetLength(Result, l);
   SetLength(Result, l);
   P:=PChar(Result);
   P:=PChar(Result);
   i:=1;
   i:=1;