★怎样知道什么消息对应什么字符常量？

Question

比如我想改一个消息的处理过程，可是我怎样知道这个消息对应的字符常量呢？
比如说：我想在form1上的button1重画的时候发出声音messagebeep(0);如何作到呢？请给出完整的代码，并解释！谢谢！！
我刚接触消息，有点蒙。

Answer 1

要截获特点的消息并这些执行自己的代码，可以这样处理：procedure WMPAINT(var Msg: TWMPaint); message WM_PAINT;
procedure TForm1.WMPAINT(var Msg: TWMPaint);
begin
  inherited;   {执行默认处理过程}
  Beep;        {要执行的代码}end;