在delphi 方法分类中，有种叫做消息（message），有关消息的详细内容请大家看《windows 程序设计》，这里我就不具体描述了，今天主要讲下，在delphi里，我们如何自定义消息。
delphi中,VCL已经处理了很多消息系统的细节，消息循环也封装到VCL的Forms单元里，我们去Forms单元，随便找一个消息声明看看：
我们来逐一分析下
procedure WMPaint(var Message: TWMPaint); message WM_PAINT;
1 方法名 WMPaint
2 参数 注意关键字 var,看看参数类型TWMPaint,这是delphi设置的一个特殊的TMessage,TMessage是对 windows的TMsg的映射。除了TWMPaint，还有很多 其他特殊的消息record,具体大家在单元里浏览下。如果我们自定义消息方法，一般就用TMessage。
3 message指示符，后面必须跟常量 WM_….。
以上3点构成了 delphi消息方法的基本3要素
