* add podetached. Follow up to mantis @32055 due to regression, see

   https://forum.lazarus.freepascal.org/index.php/topic,49631.0

git-svn-id: trunk@45228 -

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;