IsExecutingInSeparateProcess
| IsExecutingInSeparateProcess (Функции среды) | |||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||
Функция возвращает 1, если текущая программа исполняется в процессе, созданном функцией InitializeSeparateProcess. Также может получить идентификатор процесса, заданный при его создании.
Синтаксис
IsExecutingInSeparateProcess(<Идентификатор процесса (STRING)>):<Результат 0 или 1 (INT)>
Аргументы
<Идентификатор процесса (STRING)>- (возможен аргумент-переменная (ByRef)) (необязательный аргумент) Аргумент может возвращать идентификатор процесса, который передавался процессу в момент вызова InitializeSeparateProcess.
Возвращаемое значение
Функция возвращает числовое значение.
Примеры
Function ИсполнитьВДругомПроцессе(ByRef спДанные)
СтрИмя:="";
спДанные["ПодчиненныйПроцесс"]:=IsExecutingInSeparateProcess(СтрИмя);
спДанные["ИмяПодчиненногоПроцесса"]:=СтрИмя;
EndFunction
аПроцесс:=Mutex.InitializeSeparateProcess("Уникальное имя");
спДанные:=List.Create();
аПроцесс.InterProcessExecuteFunction("ИсполнитьВДругомПроцессе",спДанные);
//Подчиненный процесс: 1
//Имя подчиненного процесса: Уникальное имя
Message("Подчиненный процесс: "+спДанные["ПодчиненныйПроцесс"]);
Message("Имя подчиненного процесса: "+спДанные["ИмяПодчиненногоПроцесса"]);
спДанные:=List.Create();
ИсполнитьВДругомПроцессе(спДанные);
//Подчиненный процесс: 0
//Имя подчиненного процесса:
Message("Подчиненный процесс: "+спДанные["ПодчиненныйПроцесс"]);
Message("Имя подчиненного процесса: "+спДанные["ИмяПодчиненногоПроцесса"]);