Explorar el Código

* properly initialize FPipeBuffersize. Follow up to Mantis #22327

git-svn-id: trunk@21749 -
marco hace 13 años
padre
commit
2c3787d415
Se han modificado 1 ficheros con 1 adiciones y 0 borrados
  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;