[Процессы] Откуда запущен процесс

#include <GUIConstantsEx.au3>

$IniFile = StringTrimRight ( @ScriptFullPath, 3 ) & 'ini'									; путь к ini-файлу
$RegPath = 'HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run'								; раздел реестра, отвечающий за автозагрузку

;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
;			ЗАПУСК БЕЗ ini-ФАЙЛА	   ;
;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

If Not FileExists ( $IniFile ) Then																; если ini файла нет, будем его создавать

   GUICreate ( 'Test', 250, 165 )
   GUISetBkColor(0x00E0FFFF)

   $AutoRunCheckBox = GUICtrlCreateCheckbox ( 'Автозагрузка программы', 10, 10, 230, 20 )
   GUICtrlSetTip ( $AutoRunCheckBox, 'Требуется ли помещать программу в автозагрузку?' )

   $PauseCombo = GUICtrlCreateCombo ( '', 10, 100, 230, 20 )
   GUICtrlSetData ( -1,"Пауза, с|10|20|30|40|50|60|70|80|90|100|110|120","Пауза, с" )
   GUICtrlSetTip ( $PauseCombo, 'Время задержки между стартом программы и началом работы' )

   $OKButton = GUICtrlCreateButton ( 'Готово', 10, 130, 230, 20 )

   GUISetState ()

   While 1
	  $Msg = GUIGetMsg ()																		; получаем сообщение от GUI
	  Select
		 Case $Msg = $OKButton																	; если нажата кнопка ГОТОВО
			$AutoRun = GUICtrlRead ( $AutoRunCheckBox )											; читаем состояния элементов
			$Pause = GUICtrlRead ( $PauseCombo )
		 
			Select
			   Case $AutoRun = $GUI_CHECKED														; автозагрузка выбрана
				  RegWrite ( $RegPath, "Test", "REG_SZ", '"' & @ScriptFullPath & '" -delay' )	; добавляем скрипт в автозагрузку
				  If $Pause = 'Пауза, с' Then													; тогда и пауза должна быть выбрана
					 MsgBox ( 0, 'Test', 'Укажите время паузы.' )								; ... сообщаем об этом и...
					 ContinueLoop																; ... ждём, пока выберут
				  Else																			; если пауза выбрана,..
					 IniWrite ( $IniFile, "MAIN", "Pause", $Pause )								; ... заносим её в ini
				  EndIf

			   Case $AutoRun = $GUI_UNCHECKED													; автозагрузка не выбрана
				  RegDelete ( $RegPath, "Test" )												; удаляем запись в реестре
				  If $Pause = 'Пауза, с' Then													; если пауза не выбрана,..
					 IniWrite ( $IniFile, "MAIN", "Pause", '0' )								; ... заносим в ini просто ноль
				  Else																			; если пауза выбрана,..
					 IniWrite ( $IniFile, "MAIN", "Pause", $Pause )								; ... заносим в ini выбранное значение
				  EndIf
			EndSelect
		 
			Sleep ( 100 )
			Run ( @ScriptFullPath )																; перезапускаем скрипт
			Exit																				; выходим
	  
		 Case $Msg = $GUI_EVENT_CLOSE
			Exit
	  EndSelect		 
   WEnd
EndIf

;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
;			ЗАПУСК ПРИ НАЛИЧИИ ini-ФАЙЛА	   ;
;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

$Pause = IniRead ( $IniFile, "MAIN", "Pause", 60 )											; считываем данные из ini-файла

If $CmdLine[0] <> 0 And $CmdLine[1] = '-delay' Then											; если командная строка есть и в ней параметр
   TrayTip ( "Test", "Ожидание...", 120, 2 )												; выводим сообщение
   Sleep ( 1000 * Number ( $Pause ) )														; пауза после загрузки Windows
EndIf

;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
;			РАБОТА ПРОГРАММЫ				   ;
;@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@

TrayTip ( "Test", 'Программа работает, работает, работает...', 30, 1 )						; сообщаем радостную весть
Sleep ( 7000 )
TrayTip ( "Test", 'Закончила работать.', 2, 1 )
Sleep ( 2000 )
Exit