例: メッセージ ハンドラのオーバーライド

提供: RAD Studio
移動先: 案内検索

ハンドラ メソッドのオーバーライド への移動


たとえば、あるコンポーネントの WM_PAINT メッセージ処理をオーバーライドするには、WMPaint メソッドを以下のように再宣言します。

 type
   TMyComponent = class(...)
   .
   .
   .
   procedure WMPaint(var Message: TWMPaint); message WM_PAINT;
 end;
 class PACKAGE TMyComponent : public TComponent
 {
 protected:
     void __fastcall WMPaint(TWMPaint* Message);
 BEGIN_MESSAGE_MAP
   MESSAGE_HANDLER(WM_PAINT, TWMPaint, WMPaint)
 END_MESSAGE_MAP(TComponent)
 };