zwzgood的专栏

program Project4;uses  Windows,  Messages;type  TWndMethod = procedure(var Message: TMessage) of object;{这句类型声明的意思是：TWndMethod 是一种过程类型，它指向一个接收 TMessage 类型参数的过程，但它不是一般的静态过程，它是对象相关(object related)的。

构造一个通用的回调Thunk.(把回调函数指向对象的方法)最近又看到了VCL代码中的MakeObjectInstance函数,实际上是一段WndProc的Thunk代码.再一次感叹VCL设计之精巧,效率之高.不喜欢MFC的消息映射方式,MFC的消息映射虽然好理解,但是是采用查表方式效率实在是太低了.VCL的MakeObjectInstance可以说是VCL Windows系统的灵魂所在,效率极高.

program Project3;uses  Windows,  Messages;type  TWndMethod = procedure(var Message: TMessage) of object;{这句类型声明的意思是：TWndMethod 是一种过程类型，它指向一个接收 TMessage 类型参数的过程，但它不是一般的静态过程，它是对象相关(object related)的。