双11狂欢大促

盲盒赢 定制羽绒服

开启惊喜盲盒，抽取你的专属好礼

— 惊喜奖品抢先看 —

超级年卡50元券

周边70元券

手机支架

一拖三数据线

雨伞

运动毛巾

电动牙刷

VIP月卡

机械键盘

定制羽绒服

超级年卡50元券

周边70元券

手机支架

一拖三数据线

雨伞

运动毛巾

电动牙刷

VIP月卡

机械键盘

定制羽绒服

进程，进程，还是进程问题！

2001-08-31 06:51:54 209 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

hnxrm 墨衍会员 · AI 创作全网分发关注 + 加入社区

F5 GTM DNS 实战指南：智能DNS的监控与健康检查机制本文深入解析F5 BIG-IP GTM智能DNS的核心机制，重点阐述其监控与探针两大功能如何协同工作。监控器负责深度检查服务器应用健康，确保服务可用性；探针则实时测量网络路径质量，实现基于延迟的智能流量调度。文章通过实战配置步骤，指导如何构建逻辑架构、建立iQuery通信、配置业务级健康检查及探针，从而构建高可用、高性能的全局负载均衡解决方案。阅读详情

如何获得一个程序中启动的另外的进程句柄（即除主进程之外的进程）？请各位大侠帮忙。

...全文

从零搭建企业网络：使用Packet Tracer模拟多区域OSPF组网全过程本文通过Cisco Packet Tracer模拟，详细演示了从零搭建一个典型企业多区域OSPF网络的完整流程。内容涵盖网络拓扑规划、IP地址设计、多区域划分原理，并提供了从设备初始化、接口配置到OSPF多区域核心配置与验证的详细步骤。文章旨在帮助网络学习者与IT支持人员通过动手实验，将理论知识转化为实际的配置与排障能力。阅读详情

hnxrm

Delphi 5,944 成员 262,941 内容

+ 关注 + 加入社区

切换为时间正序

hnxrm 2001-09-06

打赏
举报

看来是没人回答了，给分吧。

Tense 2001-09-03

打赏
举报

hnxrm 2001-09-03

打赏
举报

to qiandeng
有么？我好象没找到。
TO summernightrain(夏夜雨) 谢谢哦，过几天给你分。
UP

qiandeng 2001-09-02

打赏
举报

建议还是去看看msdn，应该有这样的函数

summernightrain 2001-09-01

打赏
举报

var
StartupInfo:TStartupInfo;
ProcessInfo:TProcessInformation;
procedure Run(App:String);
var
StartupInfo:TStartupInfo;
ProcessInfo:TProcessInformation;
begin
FillChar(StartupInfo,Sizeof(StartupInfo),#0);
StartupInfo.cb:=Sizeof(StartupInfo);
StartupInfo.dwFlags:=STARTF_USESHOWWINDOW;
if FileExists(GetPath(2)+'\'+App) then
CreateProcess(nil,pchar(GetPath(2)+'\'+App),nil,nil,false,CREATE_NEW_CONSOLE or NORMAL_PRIORITY_CLASS,nil,nil,StartupInfo,ProcessInfo);
end;

看上面的例子啦！！如果你是用的这种方法启动其它的进程，那么ProcessInfo中就包含了你要的东西（ProcessID）了，编个程序试试？？有什么问题再讨论！！

summernightrain 2001-09-01

打赏
举报

那就比较难了，从理论上讲你要看别的进程调用那了那些其它的进程，我想可以用Hook Api来做，具体就是拦截创建进程的那几个函数比如上面的CreateProcess。

hnxrm 2001-09-01

打赏
举报

to summernightrain(夏夜雨)
这个程序不是我编的,我要的是别人程序中启动其他进程的HANDLE.

hnxrm 2001-08-31

打赏
举报

我的意思不是要枚举系统中所有的进程再进行判断，是要一个程序中启动的其他进程的HNADLE。假设我已经知道这个程序的HANDLE。不过先谢了summernightrain(夏夜雨)　：）

summernightrain 2001-08-31

打赏
举报

下面是我的一个例子函数。
function TerminateExe(ExePath:String):Boolean; 一个结束例子进程的例子
var
ProListHandle,ProHandle:HWND;
ProStruct:PROCESSENTRY32; //目的就是要得到这结构，关于这结构可以查API帮助。
Found:Boolean;
begin
Result:=False;
ProListHandle:=CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS, 0);
ProStruct.dwSize:=Sizeof(ProStruct);
Found:=Process32First(ProListHandle,ProStruct);开始枚举所有进程
While Found do
begin

{ ProStruct 结构中就包含了进程的详细信息，其中的进程ID就是ProStruct.th32ProcessID
这个成员。}
if ProStruct.szExeFile=UpperCase(ExePath) then
begin
ProHandle:=OpenProcess(PROCESS_ALL_ACCESS,True,ProStruct.th32ProcessID);
If TerminateProcess(ProHandle,0) then
Result:=True
else
Result:=False;
end;
Found:=Process32Next(ProListHandle,ProStruct);
end;
end;

✦双11狂欢大促✦

进程，进程，还是进程问题！

相关推荐

双11狂欢大促