--- Merging r45228 into '.':

U    packages/fcl-process/src/process.pp
U    packages/fcl-process/src/win/process.inc
--- Recording mergeinfo for merge of r45228 into '.':
 U   .

# revisions: 45228

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

packages/fcl-process/src/process.pp

@@ -26,7 +26,7 @@ Type
                     poUsePipes,poStderrToOutPut,
                     poNoConsole,poNewConsole,
                     poDefaultErrorMode,poNewProcessGroup,
-                    poDebugProcess,poDebugOnlyThisProcess,
+                    poDebugProcess,poDebugOnlyThisProcess,poDetached,
                     poPassInput,poRunIdle);
 
   TShowWindowOptions = (swoNone,swoHIDE,swoMaximize,swoMinimize,swoRestore,swoShow,

packages/fcl-process/src/win/process.inc

@@ -82,6 +82,9 @@ begin
       Result:=Result or DEBUG_ONLY_THIS_PROCESS;
     if poDefaultErrorMode in Options Then
       Result:=Result or CREATE_DEFAULT_ERROR_MODE;
+    if poDetached in Options Then
+      Result:=Result or DETACHED_PROCESS;
+
     result:=result or PriorityConstants[FProcessPriority];
     end;
 end;