What is the best way kill several processes when one returns an error code

[JockoDundee 6]

Let’s say you are running 2 processes from a shared parent process.  If either of the child procs return an erroneous exit code, you need to kill the other one.

the following code does not work of course,  but what is the best way to do it?
I can think of some ugly ways involving watchdog processes, filesystem, clipboard etc, but....

Example()

Func Example()
   
   ;Obviously this doesn't work because RunWait "Waits"
   
    Local $i1 = RunWait("proc1.exe")
    Local $i2 = RunWait("proc2.exe")
    
    If $i1=-1 Then ProcessClose("proc2.exe") 
    If $i2=-1 Then ProcessClose("proc1.exe")
    
EndFunc

 

[water 2,300]

You could use IPC (Inter Process Communication) to send status codes from the child processes to the parent process. If any of the child processes sends an error status to the parent process the parent could send shutdown messages to the remaining child processes.

IPC UDFs are available in different flavours in the wiki.

[Dan_555 60]

Hmm, or use RunAs or ShellExecute to start and to capture the PID, then check in a loop if the proccess with the pid exists, with ProcessExists ?!

Edit: This should work if you need to close one process.

Edited September 16 by Dan_555