WinAPI: GetModuleHandle - 获取一个模块(exe 或 dll)的句柄
2008-04-01 13:48
295 查看
定义:
举例:
GetModuleHandle( lpModuleName: PChar {模块名; 只能是映射到当前进程的模块} ): HMODULE; {返回模块句柄; 0 表示失败}
举例:
//获取当前模块的句柄 var s: string; h: Cardinal; begin {先取得模块名} s := Application.ExeName; s := ExtractFileName(s); {获取参数只要模块名就够了; 不需要路径(测试中有路径也可以)} h := GetModuleHandle(PChar(s)); ShowMessage(IntToStr(h)); {4194304} end; //用 nil 做参数即可获取当前模块的句柄 var h: Cardinal; begin h := GetModuleHandle(nil); ShowMessage(IntToStr(h)); {4194304} end; //获取系统骨干模块 Gdi32.dll 的句柄 var h: Cardinal; begin h := GetModuleHandle('Gdi32.dll'); ShowMessage(IntToStr(h)); {2012151808} end; //能不能获取记事本的句柄? var h: Cardinal; begin h := GetModuleHandle('notepad.exe'); ShowMessage(IntToStr(h)); {0; 失败} {因为当前进程和记事本的进程是相互独立的; } {如果用能够冲破进程、面向全局的 dll 应该可以.} end;
相关文章推荐
- unix--Tripwire 应用
- 接口小用
- 利用Delphi和金山词霸制作批量单词翻译
- C#冒泡法 斐波那契
- C#中的where子句
- 通过指点操作获得窗口句柄
- Nonblocking I/O
- 很好很八卦
- 庆祝博客开通
- Thread Basics(thread synchronization&Asynchronization) -part two
- 传输文件例子的核心代码
- UNIX系统终极安装-Aix篇
- 正则表达式的语法
- 指针的常见的内存错误以及对策
- 桶装水行业的信息化-思考(一)
- 找回丢失的root口令
- 不用控件用函数实现发Emai
- 用DOS命令破除UNIX管理员口令
- 一些奇怪的 unix 指令名字的由来
- 清除代理服务器上的cache记录