65 lines
2.2 KiB
C++
65 lines
2.2 KiB
C++
//----------------------------------------------------------------------------
|
|
//Borland C++Builder
|
|
//Copyright (c) 1987, 1998 Borland International Inc. All Rights Reserved.
|
|
//----------------------------------------------------------------------------
|
|
//---------------------------------------------------------------------------
|
|
#ifndef traymainH
|
|
#define traymainH
|
|
//---------------------------------------------------------------------------
|
|
#include <Forms.hpp>
|
|
#include <StdCtrls.hpp>
|
|
#include <Controls.hpp>
|
|
#include <Classes.hpp>
|
|
#include <ExtCtrls.hpp>
|
|
#include <Menus.hpp>
|
|
#include <Buttons.hpp>
|
|
#include <Graphics.hpp>
|
|
#define MYWM_NOTIFY (WM_APP+100)
|
|
#define IDC_MYICON 1006
|
|
extern HINSTANCE g_hinst;
|
|
LRESULT IconDrawItem(LPDRAWITEMSTRUCT lpdi);
|
|
//---------------------------------------------------------------------------
|
|
class TTrayMainForm : public TForm
|
|
{
|
|
__published:
|
|
TPopupMenu *PopupMenu1;
|
|
TMenuItem *Properties1;
|
|
TMenuItem *ToggleState1;
|
|
TMenuItem *Shutdown1;
|
|
TMenuItem *N1;
|
|
TMenuItem *N2;
|
|
TMenuItem *Acercade1;
|
|
TImage *imagenOn;
|
|
TImage *imagenOFF;
|
|
TSpeedButton *BSalir;
|
|
TMenuItem *Estado1;
|
|
void __fastcall FormDestroy(TObject *Sender);
|
|
void __fastcall Properties1Click(TObject *Sender);
|
|
void __fastcall ToggleState1Click(TObject *Sender);
|
|
void __fastcall Shutdown1Click(TObject *Sender);
|
|
|
|
|
|
|
|
void __fastcall BSalirClick(TObject *Sender);
|
|
|
|
void __fastcall FormCreate(TObject *Sender);
|
|
private: // private user declarations
|
|
void __fastcall DrawItem(TMessage& Msg);
|
|
void __fastcall MyNotify(TMessage& Msg);
|
|
bool __fastcall TrayMessage(DWORD dwMessage);
|
|
HANDLE __fastcall IconHandle(void);
|
|
void __fastcall ToggleState(void);
|
|
PSTR __fastcall TipText(void);
|
|
bool Running;
|
|
public: // public user declarations
|
|
virtual __fastcall TTrayMainForm(TComponent* Owner);
|
|
BEGIN_MESSAGE_MAP
|
|
MESSAGE_HANDLER(WM_DRAWITEM,TMessage,DrawItem)
|
|
MESSAGE_HANDLER(MYWM_NOTIFY,TMessage,MyNotify)
|
|
END_MESSAGE_MAP(TForm)
|
|
};
|
|
//---------------------------------------------------------------------------
|
|
extern TTrayMainForm *TrayMainForm;
|
|
//---------------------------------------------------------------------------
|
|
#endif
|
|
|