Ver código fonte

* properly initialize FPipeBuffersize. Follow up to Mantis #22327

git-svn-id: trunk@21749 -
marco 13 anos atrás
pai
commit
2c3787d415
1 arquivos alterados com 1 adições e 0 exclusões
  1. 1 0
      packages/fcl-process/src/process.pp

+ 1 - 0
packages/fcl-process/src/process.pp

@@ -249,6 +249,7 @@ begin
   {$ifdef UNIX}
   FForkEvent:=nil;
   {$endif UNIX}
+  FPipeBufferSize := 1024;
   FEnvironment:=TStringList.Create;
   FParameters:=TStringList.Create;
 end;