    ______________391

BEGIN_MESSAGE_MAP

MESSAGE_HANDLER(parameter!, parameter?, parameter3)

END_MESSAGE_MAP

 BEGIN_MESSAGE_MAP    ,
 END_MESSAGE_MAP   ,    
 MESSAGE_HANDLER     . 
 MESSAGE_HANDLER     , -
    ,     -.

        -
  Windows . , WM_CLOSE.   -
    ,      -
         -
    . , T,WMClose.   -
      ,    -
   ,     -
  Result,   .  -
    ,       -
    WM_    On. ,
OnClose.

       PMess2   
Form2  PMessI    WM_CLOSE,  
    Forml.      Formi 
PMess2    Form2  PMessI  Labell,   
 ,   ,     -
.        ( 
 Form2;  Forml        Form2 
Forml):

//  U2Messl.h

class TForm2 : public TForm

<

published:     // IDE-managed Components
TLabel *Labell;

private:         // User declarations

void _fastcall OnClose(TWMCloses Messages-
public:           // User declarations
_fastcall TForm2(TComponent* Owner);

BEGIN_MESSAGE_MAP

MESSAGE_HANDLER(WM__CLOSE, TWMClose, OnClose)
END_MESSAGE_MAP(TComponent)
};

//

//  U2Messl.cpp

void _fastcall TForm2::OnClose(TWMClose& a)
{
Label2->Caption = "! !";

if (MessageDlgPos("  . ?",
mtConf inflation, TMsgDIgButtons ()  mbYes mbNo  inbCancel,
0,BoundsRect.Left,BoundsRect.Bottom) == mrYes)
Closet) ;

else Label2->Caption = "He !";

a.Result = 0;

}

     U2Messl.h   public   , 
   WM_CLOSE.     -