简单的问题，请问怎么样枚举进程的子进程？ ( 积分: 4 )

枚举进程我已经知道了，关键是怎么去枚举其子进程：
var
lppe: TProcessEntry32;
found : boolean;
Hand : THandle;
MainNode:TTreeNode;
begin
Hand := CreateToolhelp32Snapshot(TH32CS_SNAPALL,0);
found := Process32First(Hand,lppe);
while founddo
begin
MainNode:=tv_Process.Items.AddChild(nil,StrPas(lppe.szExeFile));
//就在这里，怎么样去列出这个进程的子进程啊？帮帮忙！
tv_Process.Items.AddChild(MainNode,{*****});
found := Process32Next(Hand,lppe);
end;
CloseHandle(Hand);

枚举进程我已经知道了，关键是怎么去枚举其子进程：
var
lppe: TProcessEntry32;
found : boolean;
Hand : THandle;
MainNode:TTreeNode;
begin
Hand := CreateToolhelp32Snapshot(TH32CS_SNAPALL,0);
found := Process32First(Hand,lppe);
while founddo
begin
MainNode:=tv_Process.Items.AddChild(nil,StrPas(lppe.szExeFile));
//就在这里，怎么样去列出这个进程的子进程啊？帮帮忙！
tv_Process.Items.AddChild(MainNode,{*****});
found := Process32Next(Hand,lppe);
end;
CloseHandle(Hand);

不知道,帮lz顶.
让我想起来windows优化大师的进程查看工具,那个列的就很详细.

好,帮顶


--------签名档---------------------------

比肩国内顶尖源码下载站点 -> 源码我爱你

http://www.source520.com
http://www.source520.net
80G源码电子书免费免注册下载,大量精辟技术文档库随时更新
******************************************************************
附:为了站点持续发展,现有本站近年来收藏的大量大型商业源码低价出售,
详情请进入以下链接查看:
http://www.source520.com/building_delphi.htm

浏览商业代码请从如下URL进入查看实物:
1.商业源码库1: ftp://source520see3:browse@61.152.199.245/
2.商业源码库2: ftp://source520see2:browse@61.152.199.245/