unit1.cpp

《bcb深度历险》 电子书

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
  ModifyTrayIcon(NIM_ADD);        
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Exit1Click(TObject *Sender)
{
  Close();        
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
  ModifyTrayIcon(NIM_DELETE);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ModifyTrayIcon(DWORD Action)
{
  TNotifyIconData NIData;

  NIData.cbSize = sizeof(TNotifyIconData);
  NIData.uID = 0;
  NIData.uFlags = NIF_MESSAGE | NIF_ICON | NIF_TIP;
  NIData.hWnd = Handle;
  // 璝祇ネヴ