⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 animatefrm.h

📁 这是书上的代码
💻 H
字号:
//---------------------------------------------------------------------------

#ifndef animatefrmH
#define animatefrmH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <Graphics.hpp>
#include "Trayicon.h"
#include <Menus.hpp>
#define IMAGECOUNT      6  //图片总数
//---------------------------------------------------------------------------
class TaForm : public TForm
{
__published:	// IDE-managed Components
        TImage *Image1;
        TImage *Image2;
        TImage *Image3;
        TImage *Image4;
        TImage *Image5;
        TImage *Image6;
        TTrayIcon *TrayIcon1;
        TPopupMenu *PopupMenu1;
        TMenuItem *mStart;
        TMenuItem *mEnd;
        TMenuItem *N3;
        TMenuItem *mClose;
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall mCloseClick(TObject *Sender);
        void __fastcall mStartClick(TObject *Sender);
        void __fastcall mEndClick(TObject *Sender);
        void __fastcall FormShow(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
private:	// User declarations
public:		// User declarations
        __fastcall TaForm(TComponent* Owner);
        void __fastcall ThreadDone(TObject *);
//制止重画窗口背景
        void    __fastcall OnWmBkgnd(TMessage &Msg) {Msg.Result=true;}
BEGIN_MESSAGE_MAP
    MESSAGE_HANDLER(WM_ERASEBKGND,TMessage,OnWmBkgnd);
END_MESSAGE_MAP(TForm);
        TImage  *Images[IMAGECOUNT];
        bool    End;  //动画结束标志
};

//---------------------------------------------------------------------------
extern PACKAGE TaForm *aForm;
//---------------------------------------------------------------------------
#endif

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -