提供父进程PID，获取所有子进程PID（不提供子进程名称）

wuwenhao

提供父进程PID，获取所有子进程PID（不提供子进程名称）
求大佬给一个源码

算法艺术家

  

修复BUG  

子程序名	返回值类型	公开	备 注
取全部子进程ID
参数名	类 型	参考	可空	数组	备 注
父进程ID	整数型
返回子进程ID数组	整数型

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

清除数组 (返回子进程ID数组)
进程_枚举 (, ID组)
计次循环首 (取数组成员数 (ID组), i)
ID ＝ 进程_取父ID (到文本 (ID组 [i]))
如果真 (ID ＝ 父进程ID)
加入成员 (返回子进程ID数组, ID组 [i])

计次循环尾 ()

修复BUG  <br /> .版本 2<br /> <br /> .子程序 取全部子进程ID, , 公开<br /> .参数 父进程ID, 整数型<br /> .参数 返回子进程ID数组, 整数型, 参考 数组<br /> .局部变量 ID组, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 ID, 整数型<br /> <br /> 清除数组 (返回子进程ID数组)<br /> 进程_枚举 (, ID组)<br /> .计次循环首 (取数组成员数 (ID组), i)<br />     ID ＝ 进程_取父ID (到文本 (ID组 <i>))<br />     .如果真 (ID ＝ 父进程ID)<br />         加入成员 (返回子进程ID数组, ID组 <i>)<br />     .如果真结束<br /> <br /> .计次循环尾 ()

补充内容 (2025-3-1 23:05):
建议大佬发出来，让我们小白也学习学习

wtflxk

通过进程枚举
很轻松就做到了

samll88

可以用大漠的EnumProcess
调试输出 (大漠.EnumProcess (“e.exe”))

算法艺术家

  枚举所有进程 然后用进程_取父ID()取出它们的父进程ID，等于你提供的父进程ID的 就留下放数组里

算法艺术家

  

子程序名	返回值类型	公开	备 注
取全部子进程ID
参数名	类 型	参考	可空	数组	备 注
父进程ID	整数型
返回子进程ID数组	整数型

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

清除数组 (返回子进程ID数组)
进程_枚举 (, ID组)
计次循环首 (取数组成员数 (ID组), i)
进程_取父ID (到文本 (ID组 [i]))
如果真 (ID组 [i] ＝ 父进程ID)
加入成员 (返回子进程ID数组, ID组 [i])

计次循环尾 ()

.版本 2<br /> <br /> .子程序 取全部子进程ID<br /> .参数 父进程ID, 整数型<br /> .参数 返回子进程ID数组, 整数型, 参考 数组<br /> .局部变量 ID组, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> <br /> 清除数组 (返回子进程ID数组)<br /> 进程_枚举 (, ID组)<br /> .计次循环首 (取数组成员数 (ID组), i)<br />     进程_取父ID (到文本 (ID组 <i>))<br />     .如果真 (ID组 <i> ＝ 父进程ID)<br />         加入成员 (返回子进程ID数组, ID组 <i>)<br />     .如果真结束<br /> <br /> .计次循环尾 ()

补充内容 (2025-3-1 16:22):
ID ＝ 进程_取父ID (到文本 (ID组 ))   修复BUG。。。

算法艺术家

  

刚才那个是现写的 没测试不知道好使不，这个是论坛里之前别的大佬写的，你看看哪个好使

子程序名	返回值类型	公开	备 注
通过父PID取出所有子程序
参数名	类 型	参考	可空	数组	备 注
父_进程名	文本型				如：QQ.exe
接受返回的数组	进程信息

变量名	类 型	静态	数组	备 注
进程	进程信息		0
i
父pid

进程 ＝ 取系统进程列表 ()
计次循环首 (取数组成员数 (进程), i)
如果真 (到小写 (父_进程名) ＝ 到小写 (进程 [i].进程名称))
父pid ＝ 进程 [i].进程标识符
跳出循环 ()

计次循环尾 ()
计次循环首 (取数组成员数 (进程), i)
如果真 (父pid ＝ 进程 [i].父进程标识符)
加入成员 (接受返回的数组, 进程 [i])

计次循环尾 ()

i支持库列表	支持库注释
eAPI	应用接口支持库

刚才那个是现写的 没测试不知道好使不，这个是论坛里之前别的大佬写的，你看看哪个好使<br /> .版本 2<br /> .支持库 eAPI<br /> <br /> .子程序 通过父PID取出所有子程序<br /> .参数 父_进程名, 文本型, , 如：QQ.exe<br /> .参数 接受返回的数组, 进程信息, 参考 可空 数组<br /> .局部变量 进程, 进程信息, , "0"<br /> .局部变量 i<br /> .局部变量 父pid<br /> <br /> 进程 ＝ 取系统进程列表 ()<br /> .计次循环首 (取数组成员数 (进程), i)<br />     .如果真 (到小写 (父_进程名) ＝ 到小写 (进程 <i>.进程名称))<br />         父pid ＝ 进程 <i>.进程标识符<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (进程), i)<br />     .如果真 (父pid ＝ 进程 <i>.父进程标识符)<br />         加入成员 (接受返回的数组, 进程 <i>)<br />     .如果真结束<br /> <br /> .计次循环尾 ()