(C++ VCL) TApplication

Class defined in Forms.hpp for handling higher-level stuff on the application, e.g. handling windows messages.

The example below shows how to use TApplication to trap all windows messages:

//Place an TApplicationEvents and TRichEdit on the Form
__fastcall TForm1::TForm1(TComponent* Owner)
  : TForm(Owner)
{
  Application->OnMessage = ApplicationEvents1->OnMessage;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ApplicationEvents1Message(tagMSG &Msg,
      bool &)
{
  if (Msg.message==0) return;
  RichEdit1->Lines->Add( IntToStr(Msg.lParam) + '\t' + IntToStr(Msg.wParam));
}
//---------------------------------------------------------------------------

Code links

'TApplication' links

?C++ CLX
Pascal VCL
Pascal CLX

last edited (November 18, 2006) by bilderbikkel, Number of views: 2412, Current Rev: 2 (Diff)

[Edit this page] [Page history] [What links here] [Discuss this topic] [Printer Friendly]