목록에 내용에 happymin 님이 쓰신 글 있어서  copy 해서 올립니다.

happymin 님이 쓰신 글 :
: 이렇게 해보면 어떨까요?
:
: __fastcall TAboutBox::TAboutBox(TComponent* AOwner)
:   : TForm(AOwner)
: {
:     Application->OnMessage = AppMessage; }
: //---------------------------------------------------------------------
:
: void __fastcall TAboutBox::AppMessage(tagMSG &Msg, bool &Handled)
: {
:      if(Msg.message == WM_LBUTTONDOWN || Msg.message == WM_LBUTTONDBLCLK) {
:         Handled= true;
:      }
: }
: //---------------------------------------------------------------------------
: void __fastcall TAboutBox::OKButtonClick(TObject *Sender)
: {
:     ShowMessage("AAA");
: }
: //---------------------------------------------------------------------------
:



초보자 님이 쓰신 글 :
: 이미지를 로드하여 표시하는 중에 마우스 클릭 이벤트를 막고 싶습니다.
: 폼의 버튼이나 패널, 그리드, 이미지 배경 등을 마우스로 클릭할 수 없도록 하고 싶습니다.
:
:   TWndMethod FOriginalProc; //2010-06-23
:   bool bAnalysisFormEventLockFlag ;
: ---------------------------------------------------------------------------------------------------
: // 폼에서 Ctrl + z 키를 누르면
:   if( Shift.Contains(ssCtrl) && (Key == 'Z' || Key == 'z') )
:   {
:       //event lock
:       bAnalysisFormEventLockFlag = true;
:       FOriginalProc = FormAnalysis->WindowProc;
:       FormAnalysis->WindowProc = AnalysisFormEventLock;
:    
:       //이미지 로드 ...
:   }
:
: void __fastcall TFormAnalysis::AnalysisFormEventLock( TMessage &msg )
: {
:
:   if( (bAnalysisFormEventLockFlag == true) &&( msg.Msg == MK_RBUTTON || msg.Msg ==MK_LBUTTON))
:     return;
:
:   FOriginalProc(msg);
: }
:
:
: 일시 중지는 하나  클릭메시지가 계속 실행 됩니다.
:
: 고수님 방식좀 알려주세요