在消息处理中SHOWMESSAGE出错(0分)

procedure TForm1.WMActivate(var Msg: TWMACTIVATE);<br>begin<br>&nbsp; if Msg.Active=WA_INACTIVE then<br>&nbsp; begin<br>&nbsp; Form1.Label1.Caption:='Inactive';<br>&nbsp; Form1.Label2.Caption:='None';<br>&nbsp; end;<br>&nbsp; if Msg.Active=WA_CLICKACTIVE then<br>&nbsp; begin<br>&nbsp; Form1.Label2.Caption:='Active';<br>&nbsp; Form1.Label1.Caption:='None';<br>&nbsp; end;<br>&nbsp; showmessage('The Form is being activating.');<br>end;<br>&nbsp; 以上代码发生异常，为什么呢？？

改用 messagebox 试试.

为什么用SHOWMESSAGE不行呢？？？？

接受答案了.