v2.0 2015-07-11
更新了V2.0 版本 发布在吾爱破解论坛 欢迎下载使用
http://www.52pojie.cn/thread-382769-1-1.html
--------------------------------------------------------------------------
v1.0 2013-06-23
用delphi编写 发布在吾爱破解论坛
http://www.52pojie.cn/thread-201353-1-1.html
![](https://i-blog.csdnimg.cn/blog_migrate/8f900a89c6347c561fdf2122f13be562.gif)
![](https://i-blog.csdnimg.cn/blog_migrate/961ddebeb323a10fe0623af514929fc1.gif)
unit super; interface uses windows, Messages, Tlhelp32; //----------------函数声明 function GetProcessId(strProcessName: string): Integer; //取进程ID function dkjc_OpenProcess_Z(nProcessID: Integer): Integer; //打开进程 function dnczs_ReadProcessMemoryInt(nProcessId:Integer;nMemoryAddress: Pointer): Integer; //读内存整数型 //----------------------------------------------------- implementation function GetProcessId(strProcessName: string): Integer; //函数名:Get Process ID //功能:获得指定进程的ID //参数:strProcessName*****进程名 //