Browse Source

* Mantis ipcserver problem solved caused by the adding of locking in the rtl
(mantis 15219)

git-svn-id: trunk@14415 -

marco 15 years ago
parent
commit
ac1ea04d60
1 changed files with 5 additions and 4 deletions
  1. 5 4
      packages/fcl-process/src/unix/simpleipc.inc

+ 5 - 4
packages/fcl-process/src/unix/simpleipc.inc

@@ -59,10 +59,11 @@ procedure TPipeClientComm.Connect;
 begin
 begin
   If Not ServerRunning then
   If Not ServerRunning then
     Owner.DoError(SErrServerNotActive,[Owner.ServerID]);
     Owner.DoError(SErrServerNotActive,[Owner.ServerID]);
-  // Use this line to allow more then one client communicating with one server
-  // at the same time
-  // FStream:=TFileStream.Create(FFileName,fmOpenWrite+fmShareDenyNone);
-  FStream:=TFileStream.Create(FFileName,fmOpenWrite);
+  // Use the sharedenynone line to allow more then one client 
+  // communicating with one server at the same time
+  // see also mantis 15219
+  FStream:=TFileStream.Create(FFileName,fmOpenWrite+fmShareDenyNone);
+  // FStream:=TFileStream.Create(FFileName,fmOpenWrite);
 end;
 end;
 
 
 procedure TPipeClientComm.Disconnect;
 procedure TPipeClientComm.Disconnect;