(okwary) 小叹的学习园地

与天斗?不够高~ 与地斗?不够阔 与人斗? 脸皮不够厚

  博客园 :: 首页 :: 博问 :: 闪存 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理 ::

(okwary) 小叹的学习园地


钩子(Hook)

 

Hook解释:

Hook是Windows中提供的一种用以替换DOS下“中断”的系统机制,中文译为“挂钩”或“钩子”。在对特定的系统事件进行hook后,一旦发生已hook事件,对该事件进行hook的程序就会受到系统的通知,这时程序就能在第一时间对该事件做出响应。

另一解释:

钩子(Hook),是Windows消息处理机制的一个平台,应用程序可以在上面设置子程以监视指定窗口的某种消息,而且所监视的窗口可以是其他进程所创建的。当消息到达后,在目标窗口处理函数之前处理它。钩子机制允许应用程序截获处理window消息或特定事件。

钩子实际上是一个处理消息的程序段,通过系统调用,把它挂入系统。每当特定的消息发出,在没有到达目的窗口前,钩子程序就先捕获该消息,亦即钩子函数先得到控制权。这时钩子函数即可以加工处理(改变)该消息,也可以不作处理而继续传递该消息,还可以强制结束消息的传递。

Hook原理

每一个Hook都有一个与之相关联的指针列表,称之为钩子链表,由系统来维护。这个列表的指针指向指定的,应用程序定义的,被Hook子程调用的回调函数,也就是该钩子的各个处理子程。当与指定的Hook类型关联的消息发生时,系统就把这个消息传递到Hook子程。一些Hook子程可以只监视消息,或者修改消息,或者停止消息的前进,避免这些消息传递到下一个Hook子程或者目的窗口。最近安装的钩子放在链的开始,而最早安装的钩子放在最后,也就是后加入的先获得控制权。

 

Windows 并不要求钩子函数的卸载顺序一定得和安装顺序相反。每当有一个钩子被卸载,Windows 便释放其占用的内存,并更新整个Hook链表。如果程序安装了钩子,但是在尚未卸载钩子之前就结束了,那么系统会自动为它做卸载钩子的操作。

钩子函数是一个应用程序定义的回调函数(CALLBACK Function),不能定义成某个类的成员函数,只能定义为普通的C函数。用以监视系统或某一特定类型的事件,这些事件可以是与某一特定线程关联的,也可以是系统中所有线程的事件。

 

钩子函数API

 

钩子函数必须按照以下的语法来定义:

LRESULT CALLBACK HookProc   //HookProc是应用程序自已定义的名字;

(

int nCode, //nCode参数是Hook代码;

WPARAM wParam, //Hook子程使用这个参数来确定任务;

LPARAM lParam    //这个参数的值依赖于Hook类型,每一种Hook都有自己的Hook代码特征字符集;

);  //wParam和lParam参数的值依赖于Hook代码,但是它们的典型值是包含了关于发送或者接收消息的信息。

 

安装钩子函数:

 
HHOOK SetWindowsHookEx(
int idHook, // 钩子的类型,即它处理的消息类型
HOOKPROC lpfn, // 钩子函数的地址指针。如果dwThreadId参数为0,或是一个由别的进程创建的线程的标识, lpfn必须指向DLL中的钩子子程。
HINSTANCE hMod, // 应用程序实例的句柄。标识包含lpfn所指的子程的DLL。如果dwThreadId 标识当前进程创建的一个线程, 而且子程代码位于当前进程,hMod必须为NULL。可以很简单的设定其为本应用程序的实例句柄。
DWORD dwThreadId // 与安装的钩子子程相关联的线程的标识符。如果为0,钩子子程与所有的线程关联,即为全局钩子。
);   //函数成功则返回钩子子程的句柄,失败返回NULL。
 
//钩子类型 idHook 选项:
WH_MSGFILTER       = -1; {线程级; 截获用户与控件交互的消息}
WH_JOURNALRECORD   = 0;  {系统级; 记录所有消息队列从消息队列送出的输入消息, 在消息从队列中清除时发生; 可用于宏记录}
WH_JOURNALPLAYBACK = 1;  {系统级; 回放由 WH_JOURNALRECORD 记录的消息, 也就是将这些消息重新送入消息队列}
WH_KEYBOARD        = 2;  {系统级或线程级; 截获键盘消息}
WH_GETMESSAGE      = 3;  {系统级或线程级; 截获从消息队列送出的消息}
WH_CALLWNDPROC     = 4;  {系统级或线程级; 截获发送到目标窗口的消息, 在 SendMessage 调用时发生}
WH_CBT             = 5;  {系统级或线程级; 截获系统基本消息, 譬如: 窗口的创建、激活、关闭、最大最小化、移动等等}
WH_SYSMSGFILTER    = 6;  {系统级; 截获系统范围内用户与控件交互的消息}
WH_MOUSE           = 7;  {系统级或线程级; 截获鼠标消息}
WH_HARDWARE        = 8;  {系统级或线程级; 截获非标准硬件(非鼠标、键盘)的消息}
WH_DEBUG           = 9;  {系统级或线程级; 在其他钩子调用前调用, 用于调试钩子}
WH_SHELL           = 10; {系统级或线程级; 截获发向外壳应用程序的消息}
WH_FOREGROUNDIDLE  = 11; {系统级或线程级; 在程序前台线程空闲时调用}
WH_CALLWNDPROCRET  = 12; {系统级或线程级; 截获目标窗口处理完毕的消息, 在 SendMessage 调用后发生}

 
卸掉钩子

 

UnHookWindowsHookEx(

HHOOK hhk;

);  //函数成功返回TRUE,否则返回FALSE;
 

传递钩子

 
LRESULT CallNextHookEx(
HHOOK hhk;     //hhk为当前钩子的句柄,由SetWindowsHookEx()函数返回。
int nCode;        //NCode为传给钩子过程的事件代码。
WPARAM wParam; //wParam和lParam 分别是传给钩子子程的wParam值,其具体含义与钩子类型有关。
LPARAM lParam;    //
);


 
系统钩子与线程钩子
 

SetWindowsHookEx()函数的最后一个参数决定了此钩子是系统钩子还是线程钩子。如果为0,此钩子是系统钩子,即为全局钩子。线程勾子用于监视指定线程的事件消息。线程勾子一般在当前线程或者当前线程派生的线程内。系统勾子监视系统中的所有线程的事件消息。因为系统勾子会影响系统中所有的应用程序,所以勾子函数必须放在独立的动态链接库(DLL) 中。系统自动将包含“钩子回调函数”的DLL映射到受钩子函数影响的所有进程的地址空间中,即将这个DLL注入了那些进程。

   几点说明:
(1)如果对于同一事件(如鼠标消息)既安装了线程勾子又安装了系统勾子,那么系统会自动先调用线程勾子,然后调用系统勾子。
(2)对同一事件消息可安装多个勾子处理过程,这些勾子处理过程形成了勾子链。当前勾子处理结束后应把勾子信息传递给下一个勾子函数。
(3)勾子特别是系统勾子会消耗消息处理时间,降低系统性能。只有在必要的时候才安装勾子,在使用完毕后要及时卸载。

 

Hook的应用模式

 

观察模式:

最为常用,像Windows提供的SetWindowHook就是典型地为这类应用准备的。而且这也是最普遍的用法。这个模式的特点是,在事情发生的时候,发出一个通知信息。观察者只可以查看过程中的信息,根据自己关心的内容处理自己的业务,但是不可以更改原来的流程。如全局钩子中,经常使用的鼠标消息、键盘消息的监视等应用。金山词霸屏幕取词的功能是一个典型的应用(具体技术可以参考此类文章)。

 

注入模式:

这个模式和观察模式最大的不一样的地方在于,注入的代码是为了扩展原始代码的功能业务。插件模式是此类模式的典型案例。不管瘦核心的插件系统(如Eclipse)还是胖核心的插件系统(如Delphi、Visual Studio等IDE环境),其对外提供的插件接口都是为了扩展本身系统的功能的。这种扩展的应用方式的典型特点,就是新的扩展代码和原来的代码会协调处理同类业务。

 

替换模式:

如果针对应用目的不同,可以叫修复模式或破解模式。前者是为了修改系统中的BUG,后者是为了破解原有系统的限制。很多黑客使用此种模式,将访问加密锁的DLL中的导出表,替换成自己的函数,这样跳过对软件的控制代码。这类应用的难点是,找出函数的参数。这类模式的特点是,原有的代码会被新的代码所替换。

 

前面三个是基本模式,还有很多和实际应用相关的模式。

 

集权模式:

此类模式的出现,大都是为了在全部系统中,统一处理某类事情。它的特点不在于注入的方式,而在于处理的模式。这个模式,大都应用到某类服务上,比如键盘服务,鼠标服务,打印机服务等等特定服务上。通过统一接管此类服务的访问,限制或者协调对服务的访问。比如键盘锁功能的实现,就是暂时关闭键盘的所有应用。

 

共享模式:

 

这类应用中,经常是为了获取对方的数据。必然我希望获取对方系统中,所有字符串的值。可以通过替换对方的内存管理器,导出所有字符串。这个应用比较特殊。不过其特点在于,目的是达到系统之间的数据共享。其实现,可能是观察模式,也可能是替换模式。

 
运行机制

 
1、钩子链表和钩子函数


每一个Hook都有一个与之相关联的指针列表,称之为钩子链表,由系统来维护。这个列表的指针指向指定的,应用程 序定义的,被Hook子程调用的回调函数,也就是该钩子的各个处理子程。当与指定的Hook类型关联的消息发生时,系统就把这个消息传递到Hook子程。 一些Hook子程可以只监视消息,或者修改消息,或者停止消息的前进,避免这些消息传递到下一个Hook子程或者目的窗口。最近安装的钩子放在链的开始, 而最早安装的钩子放在最后,也就是后加入的先获得控制权。

 
Windows 并不要求钩子函数的卸载顺序一定得和安装顺序相反。每当有一个钩子被卸载,Windows 便释放其占用的内存,并更新整个Hook链表。如果程序安装了钩子,但是在尚未卸载钩子之前就结束了,那么系统会自动为它做卸载钩子的操作。钩子子程是一个应用程序定义的回调函数(CALLBACK Function),不能定义成某个类的成员函数,只能定义为普通的C函数。用以监视系统或某一特定类型的事件,这些事件可以是与某一特定线程关联的,也可以是系统中所有线程的事件。

 
钩子子程必须按照以下的语法:
 
LRESULT CALLBACK HookProc  (int nCode,WPARAM wParam, LPARAM lParam);来声明钩子函数

 
2、钩子的安装与释放

 
使用API函数SetWindowsHookEx()把一个应用程序定义的钩子函数安装到钩子链表中。 SetWindowsHookEx()函数总是在Hook链的开头安装Hook函数。当指定类型的Hook监视的事件发生时,系统就调用与这个Hook关联的Hook链的开头的Hook函数。每一个Hook链中的Hook函数都决定是否把这个事件传递到下一个Hook函数。Hook函数传递事件到下一个 Hook函数需要调用CallNextHookEx函数。
 
以上所说的钩子函数与线程相关联是指在一钩子链表中发给该线程的消息同时发送给钩子子程,且被钩子子程先处理。
 
在钩子子程中调用得到控制权的钩子函数在完成对消息的处理后,如果想要该消息继续传递,那么它必须调用另外一个API函数CallNextHookEx来传递它,以执行钩子链表所指的下一个钩子函数。这个函数成功时返回钩子链中下一个钩子函数的返回值, 返回值的类型依赖于钩子的类型。这个函数的原型如下:
 
LRESULT CallNextHookEx(HHOOK hhk;int nCode;WPARAM wParam;LPARAM lParam);

 
钩子函数也可以通过直接返回TRUE来丢弃该消息,并阻止该消息的传递。 这样其他安装了钩子的应用程序将不会接收到钩子的通知而可能产生不正确的结果。
 
钩子在使用完之后需要用UnHookWindowsHookEx()卸载,否则会造成麻烦。释放钩子比较简单,UnHookWindowsHookEx()只有一个参数。函数原型如下:
 
UnHookWindowsHookEx(HHOOK hhk);  //函数成功返回TRUE,否则返回FALSE。

 
 
3、一些运行机制: 

在Win16环境中,DLL的全局数据对每个载入它的进程来说都是相同的;而在Win32环境中,情况却发生了变化,DLL函数中的代码所创建的任何对象(包括变量)都归调用它的线程或进程所有。当进程在载入DLL时,操作系统自动把DLL地址映射到该进程的私有空间,也就是进程的虚拟地址空间,而且也复制该DLL的全局数据的一份拷贝到该进程空间。也就是说每个进程所拥有的相同的DLL的全局数据,它们的名称相同,但其值却并不一定是相同的,而且是互不干涉的。
 
因此,在Win32环境下要想在多个进程中共享数据,就必须进行必要的设置。在访问同一个Dll的各进程 之间共享存储器是通过存储器映射文件技术实现的。也可以把这些需要共享的数据分离出来,放置在一个独立的数据段里,并把该段的属性设置为共享。必须给这些 变量赋初值,否则编译器会把没有赋初始值的变量放在一个叫未被初始化的数据段中。
 
#pragma data_seg预处理指令用于设置共享数据段。例如:
#pragma data_seg("SharedDataName")HHOOK hHook=NULL;
#pragma data_seg()
在#pragma data_seg("SharedDataName")和#pragma data_seg()之间的所有变量将被访问该Dll的所有进程看到和共享。再加上一条指令:
 
#pragma comment(linker,"/section:.SharedDataName,rws"),
 
那么这个数据节中的数据可以在所有DLL的实例之间共享。所有对这些数据的操作都针对同一个实例的,而不是在每个进程的地址空间中都有一份。
 
当进程隐式或显式调用一个动态库里的函数时,系统都要把这个动态库映射到这个进程的虚拟地址空间里(以下简称"地址空间")。这使得DLL成为进程的一部分,以这个进程的身份执行,使用这个进程的堆栈。
 

4、系统钩子与线程钩子

SetWindowsHookEx()函数的最后一个参数决定了此钩子是系统钩子还是线程钩子。
线程勾子用于监视指定线程的事件消息。线程勾子一般在当前线程或者当前线程派生的线程内。
系统勾子监视系统中的所有线程的事件消息。因为系统勾子会影响系统中所有的应用程序,所以勾子函数必须放在独立的动态链接库(DLL) 中。系统自动将包含"钩子回调函数"的DLL映射到受钩子函数影响的所有进程的地址空间中,即将这个DLL注入了那些进程。

几点说明:
(1)如果对于同一事件(如鼠标消息)既安装了线程勾子又安装了系统勾子,那么系统会自动先调用线程勾子,然后调用系统勾子。
(2)对同一事件消息可安装多个勾子处理过程,这些勾子处理过程形成了勾子链。当前勾子处理结束后应把勾子信息传递给下一个勾子函数。
(3)勾子特别是系统勾子会消耗消息处理时间,降低系统性能。只有在必要的时候才安装勾子,在使用完毕后要及时卸载。

 

钩子类型 (idHook 选项)

 

每一种类型的Hook可以使应用程序能够监视不同类型的系统消息处理机制。下面描述所有可以利用的Hook类型。

 

1、WH_CALLWNDPROCWH_CALLWNDPROCRET
 
(当调用SendMessage时系统调用WH_CALLWNDPROC钩子函数;当SendMessage的调用返回时,系统调用WH_CALLWNDPROCRET钩子函数)

 
WH_CALLWNDPROC类型的钩子专门用来截获通过SendMessage()函数发送到窗口的消息,不管是系统内部调用的SendMessage()函数还是用户进程中调用的SendMessage()函数。SendMessage()把消息直接交给窗口过程WndProc()来处理,WndProc()处理完消息后SendMessage()函数才返回(return   resultValue;);
 
如果设置了WH_CALLWNDPROC类型的钩子,则当SendMessage()把消息交给WndProc时,在WndProc尚未执行前,系统调用CallWndProc钩子函数,钩子函数执行后才执行窗口过程WndProc。
 
上面所说的“发送消息”与“寄送消息”相对应,发送消息是SendMessage(),寄送消息是PoseMessage(),PostMessage把消息发送到程序的消息队列,而不是直接交给窗口过程WndProc。寄送的消息由窗口过程WndProc自动到消息队列中去取,用GetMessage()函数。
 
一般来说,键盘消息与鼠标消息都是通过PostMessge函数寄送到程序消息队列中的,它是不可以截获发向窗口的键盘消息、鼠标消息的。
 
WH_CALLWNDPROCRET类型的钩子专门用来截获通过SendMessage()的调用返回时,系统调用CallWndProcCret钩子函数。
 
WH_CALLWNDPROC和WH_CALLWNDPROCRET 可以使你监视发送到窗口过程的消息。系统在消息发送到接收窗口过程之前调用WH_CALLWNDPROC 钩子函数,并且在窗口过程处理完消息之后调用WH_CALLWNDPROCRET钩子函数。WH_CALLWNDPROCRET传递指针到CWPRETSTRUCT结构,再传递到钩子函数。CWPRETSTRUCT结构包含了来自处理消息的窗口过程的返回值,同样也包括了与这个消息关联的消息参数。
 
typedef struct {

LRESULT lResult; //指定了窗体程序的返回值,该窗体程序处理由 message 值指定的消息。

LPARAM lParam; //指定消息的附加信息。附加的意义取决于message的值

WPARAM wParam; //指定消息的附加信息。附加的意义取决于message的值

UINT message; //指定消息

HWND hwnd; //处理由message的值指定的消息的窗体的窗体句柄

} CWPRETSTRUCT, *PCWPRETSTRUCT;


 
2、WH_CBT:(当基于计算机的训练(CBT)事件发生时)

 
在以下事件之前,系统都会调用WH_CBT 钩子函数,这些事件包括:

1. 激活,建立,销毁,最小化,最大化,移动,改变尺寸等窗口事件;
2. 完成系统指令;
3. 来自系统消息队列中的移动鼠标,键盘事件;
4. 设置输入焦点事件;
5. 同步系统消息队列事件。

钩子函数的返回值确定系统是否允许或者防止这些操作中的一个。

 
 
3、WH_DEBUG:(用来给钩子函数除错时)

 
在系统调用系统中与其他Hook关联的钩子函数之前,系统会调用WH_DEBUG 钩子函数。你可以使用这个钩子来决定是否允许系统调用与其他钩子关联的钩子函数。

 
4、WH_FOREGROUNDIDLE:(由WINDOWS自己使用,一般的应用程序很少使用)

 

当应用程序的前台线程处于空闲状态时,可以使用WH_FOREGROUNDIDLE 钩子函数执行低优先级的任务。当应用程序的前台线程大概要变成空闲状态时,系统就会调用WH_FOREGROUNDIDLE 钩子函数。

 

 
5、WH_GETMESSAGE:(当调用GetMessage 或 PeekMessage时)

 
应用程序使用WH_GETMESSAGE钩子函数来监视从GetMessage or PeekMessage函数返回的消息。
你可以使用WH_GETMESSAGE钩子函数去监视鼠标和键盘输入,以及其他发送到消息队列中的消息。

 

6、WH_JOURNALPLAYBACK:(当一个事件从系统的硬件输入队列中被请求时)
 

应用程序可以插入消息到系统消息队列。可以使用这个钩子函数回放通过使用WH_JOURNALRECORD记录下来的连续的鼠标和键盘事件。只要WH_JOURNALPLAYBACK Hook已经安装,正常的鼠标和键盘事件就是无效的。
WH_JOURNALPLAYBACK是全局Hook,它不能象线程特定Hook一样使用。
WH_JOURNALPLAYBACK Hook返回超时值,这个值告诉系统在处理来自回放Hook当前消息之前需要等待多长时间(毫秒)。这就使Hook可以控制实时事件的回放。
WH_JOURNALPLAYBACK是system-wide local hooks,它们不会被注射到任何行程位址空间。

 

7、WH_JOURNALRECORD:(当WINDOWS从硬件队列中获得消息时)
 

WH_JOURNALRECORD Hook用来监视和记录输入事件。典型的,可以使用这个Hook记录连续的鼠标和键盘事件,然后通过使用WH_JOURNALPLAYBACK Hook来回放。

WH_JOURNALRECORD Hook是全局Hook,它不能象线程特定Hook一样使用。

WH_JOURNALRECORD是system-wide local hooks,它们不会被注射到任何行程位址空间。

 
 

8、WH_KEYBOARD:(当调用GetMessage 或 PeekMessage 来从消息队列中查询WM_KEYUP 或 WM_KEYDOWN 消息时)
 

在应用程序中,WH_KEYBOARD 钩子用来监视WM_KEYDOWN 和 WM_KEYUP消息,这些消息通过GetMessage 或 PeekMessage返回。可以使用这个钩子来监视输入到消息队列中的键盘消息。

 

10、WH_MOUSE:(当调用GetMessage 或 PeekMessage 来从消息队列中查询鼠标事件消息时)

 

WH_MOUSE Hook监视从GetMessage 或者 PeekMessage 函数返回的鼠标消息。使用这个Hook监视输入到消息队列中的鼠标消息。

 
 
11、WH_HARDWARE:(当调用GetMessage 或 PeekMessage 来从消息队列种查询非鼠标、键盘消息时
 
  

 
12、WH_MSGFILTERWH_SYSMSGFILTER

 
(当对话框、菜单或滚动条要处理一个消息时。该钩子是局部的。它时为那些有自己的消息处理过程的控件对象设计的。WH_SYSMSGFILTER 和WH_MSGFILTER一样,只不过是系统范围的)

 
WH_MSGFILTER 和 WH_SYSMSGFILTER 钩子可以使我们用来监视菜单,滚动条,消息框,对话框消息并且发现用户使用ALT+TAB or ALT+ESC 组合键切换窗口。WH_MSGFILTER钩子只能监视传递到菜单,滚动条,消息框的消息,以及传递到通过安装了钩子函数的应用程序建立的对话框的消息;WH_SYSMSGFILTER钩子监视所有应用程序消息。

WH_MSGFILTER 和 WH_SYSMSGFILTER钩子使我们可以在模式循环期间过滤消息,这等价于在主消息循环中过滤消息。

通过调用CallMsgFilter function可以直接的调用WH_MSGFILTER钩子。通过使用这个函数,应用程序能够在模式循环期间使用相同的代码去过滤消息,如同在主消息循环里一样。

 
 
13、WH_SHELL:(当关于WINDOWS外壳事件发生时,譬如任务条需要重画它的按钮)

 

外壳应用程序可以使用WH_SHELL 钩子去接收重要的通知。当外壳应用程序是激活的并且当顶层窗口建立或者销毁时,系统调用WH_SHELL钩子函数。

WH_SHELL 共有5钟情况:
 
1. 只要有个top-level、unowned 窗口被产生、起作用、或是被摧毁;
2. 当Taskbar需要重画某个按钮;
3. 当系统需要显示关于Taskbar的一个程序的最小化形式;
4. 当目前的键盘布局状态改变;
5. 当使用者按Ctrl+Esc去执行Task Manager(或相同级别的程序)。

按照惯例,外壳应用程序都不接收WH_SHELL消息。所以,在应用程序能够接收WH_SHELL消息之前,应用程序必须调用SystemParametersInfo function注册它自己。

  

DLLs中的全局内存 

Windows规定

DLLs并不拥有它打开的任何文件或它分配的任何全局内存块。这些对象由直接或间接调用DLLs的应用程序拥有。这样,当应用程序中止时,它拥有的打开的文件自动关闭,它拥有的全局内存块自动释放。这就意味着保存在DLLs全局变量中的文件和全局内存块变量在DLLs没有被通知的情况下就变为非法。这将给其它使用该DLLs的应用程序造成困难。

为了避免出现这种情况,文件和全局内存块句柄不应作为DLLs的全局变量,而是作为DLLs中过程或函数的参数传递给DLLs使用。调用DLLs的应用程序应该负责对它们的维护。

但在特定情况下,DLLs也可以拥有自己的全局内存块。这些内存块必须用gmem_DDEShare属性进行分配。这样的内存块直到被DLLs显示释放或DLLs退出时都保持有效。

由DLLs管理的全局内存块是应用程序间进行数据传输的又一途径,下面我们将专门讨论这一问题。 

 

利用DLLs实现应用程序间的数据传输的步骤为:

1. 编写一个DLLs程序,其中拥有一个用gmem_DDEShare属性分配的全局内存块;

2. 服务器程序调用DLLs,向全局内存块写入数据;

3. 客户程序调用DLLs,从全局内存块读取数据。 


 

用于实现数据传输的DLLs与一般DLLs的编写基本相同,其中特别的地方是:

1. 定义一个全局变量句柄: 

var

hMem: THandle;

2. 定义一个过程,返回该全局变量的句柄。该过程要包含在exports子句中。如: 

function GetGlobalMem: THandle; export;

begin

Result := hMem;

end;

3. 在初始化代码中分配全局内存块:

程序清单如下: 

var

hMem: THandle;

begin

hMem := GlobalAlloc(gmem_MOVEABLE and gmem_DDEShare,num);

if hMem = 0 then

MessageDlg('Could not allocate memory',mtWarning,[mbOK],0);

end.

//num是一个预定义的常数。

Windows API函数GlobalAlloc用于从全局内存堆中分配一块内存,并返回该内存块的句柄。该函数包括两个参数,第一个参数用于设置内存块的分配标志。可以使用的分配标志如下表所示。

表10.3 全局内存块的分配标志

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
标 志 意 义
—————————————————————————————————

gmem_DDEShare 分配可由应用程序共享的内存

gmem_Discardable 分配可抛弃的内存(只与gmem_Moveable连用)

gmem_Fixed 分配固定内存

gmem_Moveable 分配可移动的内存

gmem_Nocompact 该全局堆中的内存不能被压缩或抛弃

gmem_Nodiscard 该全局堆中的内存不能被抛弃

gmem_NOT_Banked 分配不能被分段的内存

gmem_Notify 通知功能。当该内存被抛弃时调用GlobalNotify函数

gmem_Zeroinit 将所分配内存块的内容初始化为零

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 

 

 

 

posted on 2008-12-26 23:19  okwary  阅读(1463)  评论(0编辑  收藏  举报
ggg