求个易语言创建子进程并返回子进程id的例子

打开心灵的窗

求个易语言创建子进程并返回子进程id的例子


补充内容 (2021-3-12 15:51):
详细问题是:火绒剑查看创建出的进程信息上面显示有父进程，父进程是它的调用者，调用者进程结束后它会自动结束。这个api需要返回子进程id

补充内容 (2021-3-12 17:13):
父进程被强制关子进程也要跟着关闭

波哥野结衣

子进程本来就是独立的
主进程关闭时 自己关闭子进程就好了

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_窗口1
变量名	类 型	数组	备 注
集_子进程数组	整数型	0

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
进程id	整数型

进程id ＝ 创建子进程 ()
如果真 (进程id ＞ 0)
加入成员 (集_子进程数组, 进程id)

子程序名	返回值类型	公开	备 注
创建子进程	整数型

变量名	类 型	静态	数组	备 注
si	STARTUPINFOA
pi	PROCESS_INFORMATION

GetStartupInfoA (si)
si.dwFlags ＝ 0
si.wShowWindow ＝ #SW_HIDE
如果真 (CreateProcessA ( #NULL, “notepad.exe”, #NULL, #NULL, 真, #CREATE_NO_WINDOW, #NULL, #NULL, si, pi) ＞ 0)
CloseHandle (pi.hProcess)
CloseHandle (pi.hThread)
返回 (pi.dwProcessId)
返回 (-1)

子程序名	返回值类型	公开	备 注
_窗口1_可否被关闭	逻辑型

变量名	类 型	静态	数组	备 注
i	整数型
hProcess	整数型

计次循环首 (取数组成员数 (集_子进程数组), i)
hProcess ＝ OpenProcess ( #PROCESS_TERMINATE, 假, 集_子进程数组 [i])
如果真 (hProcess ＞ 0)
TerminateProcess (hProcess, 0)
CloseHandle (hProcess)

计次循环尾 ()
返回 (真)

数据类型名	公开	备 注
STARTUPINFOA
成员名	类 型	传址	数组	备 注
cb	整数型
lpReserved	文本型
lpDesktop	文本型
lpTitle	文本型
dwX	整数型
dwY	整数型
dwXSize	整数型
dwYSize	整数型
dwXCountChars	整数型
dwYCountChars	整数型
dwFillAttribute	整数型
dwFlags	整数型
wShowWindow	短整数型
cbReserved2	短整数型
lpReserved2	整数型
hStdInput	整数型
hStdOutput	整数型
hStdError	整数型

数据类型名	公开	备 注
PROCESS_INFORMATION
成员名	类 型	传址	数组	备 注
hProcess	整数型
hThread	整数型
dwProcessId	整数型
dwThreadId	整数型

DLL命令名	返回值类型	公开	备 注
GetStartupInfoA
DLL库文件名:
kernel32
在DLL库中对应命令名:
GetStartupInfoA
参数名	类 型	传址	数组	备 注
lpStartupInfo	STARTUPINFOA

DLL命令名	返回值类型	公开	备 注
CreateProcessA	整数型
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
CreateProcessA
参数名	类 型	传址	数组	备 注
lpApplicationName	整数型
lpCommandLine	文本型
lpProcessAttributes	整数型
lpThreadAttributes	整数型
bInheritHandles	逻辑型
dwCreationFlags	整数型
lpEnvironment	整数型
lpCurrentDriectory	整数型
lpStartupInfo	STARTUPINFOA
lpProcessInformation	PROCESS_INFORMATION

DLL命令名	返回值类型	公开	备 注
CloseHandle	逻辑型		关闭打开的对象句柄
DLL库文件名:
Kernel32
在DLL库中对应命令名:
CloseHandle
参数名	类 型	传址	数组	备 注
hObject	整数型			要关闭的对象句柄

DLL命令名	返回值类型	公开	备 注
OpenProcess	整数型		返回现有进程对象的句柄
DLL库文件名:
kernel32
在DLL库中对应命令名:
OpenProcess
参数名	类 型	传址	数组	备 注
dwDesiredAccess	整数型			指定对进程对象的访问。对于支持安全检查的操作系统，将针对目标进程的任何安全描述符检查此访问。
bInheritHandle	逻辑型			指定返回的句柄是否可以由当前进程创建的新进程继承。如果为真，则该句柄是可继承的。
dwProcessId	整数型			指定要打开的进程的进程标识符。

DLL命令名	返回值类型	公开	备 注
TerminateProcess	整数型		终止指定进程及其所有线程。返回非零值代表成功。0代表失败。
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
TerminateProcess
参数名	类 型	传址	数组	备 注
hProcess	整数型			指定要中断进程的句柄. 该句柄可以由 OpenProcess得到.
uExitCode	整数型			进程和其所有线程的退出代码

常量名称	常量值	公 开	备 注
SW_HIDE	0
NULL	0
CREATE_NO_WINDOW	134217728
PROCESS_TERMINATE	1

.版本 2<br /> <br /> .程序集 窗口程序集_窗口1<br /> .程序集变量 集_子进程数组, 整数型, , "0"<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 进程id, 整数型<br /> <br /> 进程id ＝ 创建子进程 ()<br /> .如果真 (进程id ＞ 0)<br />     加入成员 (集_子进程数组, 进程id)<br /> .如果真结束<br /> <br /> <br /> .子程序 创建子进程, 整数型<br /> .局部变量 si, STARTUPINFOA<br /> .局部变量 pi, PROCESS_INFORMATION<br /> <br /> GetStartupInfoA (si)<br /> si.dwFlags ＝ 0<br /> si.wShowWindow ＝ #SW_HIDE<br /> .如果真 (CreateProcessA (#NULL, “notepad.exe”, #NULL, #NULL, 真, #CREATE_NO_WINDOW, #NULL, #NULL, si, pi) ＞ 0)<br />     CloseHandle (pi.hProcess)<br />     CloseHandle (pi.hThread)<br />     返回 (pi.dwProcessId)<br /> .如果真结束<br /> 返回 (-1)<br /> <br /> <br /> .子程序 _窗口1_可否被关闭, 逻辑型<br /> .局部变量 i, 整数型<br /> .局部变量 hProcess, 整数型<br /> <br /> .计次循环首 (取数组成员数 (集_子进程数组), i)<br />     hProcess ＝ OpenProcess (#PROCESS_TERMINATE, 假, 集_子进程数组 <i>)<br />     .如果真 (hProcess ＞ 0)<br />         TerminateProcess (hProcess, 0)<br />         CloseHandle (hProcess)<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 返回 (真)<br /> <br /> <br /> <br /> .数据类型 STARTUPINFOA<br />     .成员 cb, 整数型<br />     .成员 lpReserved, 文本型<br />     .成员 lpDesktop, 文本型<br />     .成员 lpTitle, 文本型<br />     .成员 dwX, 整数型<br />     .成员 dwY, 整数型<br />     .成员 dwXSize, 整数型<br />     .成员 dwYSize, 整数型<br />     .成员 dwXCountChars, 整数型<br />     .成员 dwYCountChars, 整数型<br />     .成员 dwFillAttribute, 整数型<br />     .成员 dwFlags, 整数型<br />     .成员 wShowWindow, 短整数型<br />     .成员 cbReserved2, 短整数型<br />     .成员 lpReserved2, 整数型<br />     .成员 hStdInput, 整数型<br />     .成员 hStdOutput, 整数型<br />     .成员 hStdError, 整数型<br /> <br /> .数据类型 PROCESS_INFORMATION<br />     .成员 hProcess, 整数型<br />     .成员 hThread, 整数型<br />     .成员 dwProcessId, 整数型<br />     .成员 dwThreadId, 整数型<br /> <br /> <br /> .DLL命令 GetStartupInfoA, , "kernel32", "GetStartupInfoA"<br />     .参数 lpStartupInfo, STARTUPINFOA<br /> <br /> .DLL命令 CreateProcessA, 整数型, "kernel32.dll", "CreateProcessA"<br />     .参数 lpApplicationName, 整数型<br />     .参数 lpCommandLine, 文本型<br />     .参数 lpProcessAttributes, 整数型<br />     .参数 lpThreadAttributes, 整数型<br />     .参数 bInheritHandles, 逻辑型<br />     .参数 dwCreationFlags, 整数型<br />     .参数 lpEnvironment, 整数型<br />     .参数 lpCurrentDriectory, 整数型<br />     .参数 lpStartupInfo, STARTUPINFOA<br />     .参数 lpProcessInformation, PROCESS_INFORMATION<br /> <br /> .DLL命令 CloseHandle, 逻辑型, "Kernel32", "CloseHandle", , 关闭打开的对象句柄<br />     .参数 hObject, 整数型, , 要关闭的对象句柄<br /> <br /> .DLL命令 OpenProcess, 整数型, "kernel32", "OpenProcess", , 返回现有进程对象的句柄<br />     .参数 dwDesiredAccess, 整数型, , 指定对进程对象的访问。对于支持安全检查的操作系统，将针对目标进程的任何安全描述符检查此访问。<br />     .参数 bInheritHandle, 逻辑型, , 指定返回的句柄是否可以由当前进程创建的新进程继承。如果为真，则该句柄是可继承的。<br />     .参数 dwProcessId, 整数型, , 指定要打开的进程的进程标识符。<br /> <br /> .DLL命令 TerminateProcess, 整数型, "kernel32.dll", "TerminateProcess", , 终止指定进程及其所有线程。返回非零值代表成功。0代表失败。<br />     .参数 hProcess, 整数型, , 指定要中断进程的句柄. 该句柄可以由 OpenProcess得到.<br />     .参数 uExitCode, 整数型, , 进程和其所有线程的退出代码<br /> <br /> <br /> <br /> <br /> .常量 SW_HIDE, "0"<br /> .常量 NULL, "0"<br /> .常量 CREATE_NO_WINDOW, "134217728"<br /> .常量 PROCESS_TERMINATE, "1"

大司命

  

进程_创建 (, , , )

.版本 2<br /> 进程_创建 (, , , )

返回就是进程ID~

阿顺

打开心灵的窗

阿顺 发表于 2021-3-12 15:31

这个api我试过，创建出来的进程并不是调用者的子进程，火绒查看就是一个单独的进程，调用者进程结束后它还是存在，不受调用者的影响

打开心灵的窗

大司命 发表于 2021-3-12 15:24
.版本 2
进程_创建 (, , , )

这个api我试过，创建出来的进程并不是调用者的子进程，火绒查看就是一个单独的进程，调用者进程结束后它还是存在，不受调用者的影响

a87249594

本来就不瘦影响…

波哥野结衣

波哥野结衣 发表于 2021-3-12 16:16
子进程本来就是独立的
主进程关闭时 自己关闭子进程就好了

最后一张图无视，传错了欸

打开心灵的窗

波哥野结衣 发表于 2021-3-12 16:16
子进程本来就是独立的
主进程关闭时 自己关闭子进程就好了

试了下，还是不行，火绒那里看不到父进程

波哥野结衣

打开心灵的窗 发表于 2021-3-12 17:14
试了下，还是不行，火绒那里看不到父进程

怎么就看不到了
截图就是火绒的欸

看好了 这是谷歌浏览器的 ，谷歌浏览器本身就是多进程 主进程ID = 876 下面的子进程任务ID 均为876


然后运行测试程序，主进程ID = 17024 下面的notepad.exe是我自己创建的子进程  程任务ID 均为17024


你该不会认为只有子进程名称和父进程名称一致才叫子进程吧？？？？
你要一样的也可以，先把程序编译出来，程序名 test.exe 那不就一样看么