bb88 发表于 2011-8-7 11:15:49

驱动新手献礼：LzOpenProcess之D版

我是驱动新手，但是我在Delphi和VB的应用层开发方面都有很多年经验
看到炉子LzOpenProcess之VB版，于是将代码翻译为Delphi，测试通过
各位大大要是觉得我算是用心了，请赐予我一点声望吧

**** Hidden Message *****

kofkyokkk 发表于 2013-1-17 21:59:17

function ZwQueryInformationProcess(ProcessHandle: THANDLE; ProcessInformationClass: ULONG; ProcessInformation: PVOID; ProcessInformationLength: ULONG; ReturnLength: PULONG): NTSTATUS; stdcall; external 'ntdll.dll';
function ZwQuerySystemInformation(SystemInformationClass: SYSTEM_INFORMATION_CLASS; SystemInformation: PVOID; SystemInformationLength: ULONG; lpReturnLength: PULONG): NTSTATUS; stdcall; external 'ntdll.dll';
function ZwDuplicateObject(SourceProcessHandle: THANDLE; SourceHandle: THANDLE; TargetProcessHandle: THANDLE; TargetHandle: PHANDLE; DesiredAccess: ACCESS_MASK; Attributes: ULONG; Options: ULONG): NTSTATUS; stdcall; external 'ntdll.dll';
function ZwOpenProcess(ProcessHandle: PHandle; DesiredAccess: ACCESS_MASK; ObjectAttributes: PObjectAttributes; ClientId: PClientId): NTSTATUS; stdcall; external 'ntdll.dll';

alt0816 发表于 2014-10-2 17:30:39

好东西 强烈支持！！

pk1380000 发表于 2015-3-20 11:19:27

噶哈咔咔咔咔啦

q449325163 发表于 2015-6-18 21:07:50

我要源码，找了好久了

thyzkw 发表于 2015-8-17 18:53:58

谢谢 谢谢分享

thyzkw 发表于 2015-8-17 18:54:12

谢谢 谢谢分享 噶哈咔咔咔咔啦

dx5200 发表于 2015-8-27 16:55:48

谢谢 谢谢分享 噶哈咔咔咔咔啦

qq412158094 发表于 2019-3-28 14:32:14

支持楼主，支持看流星社区，以后我会经常来！

qq412158094 发表于 2019-3-28 16:30:32

支持楼主，支持看流星社区，以后我会经常来！
页: [1] 2
查看完整版本: 驱动新手献礼：LzOpenProcess之D版