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

📄 advalertwindow.hpp

📁 TMS component pack v4.2 for delphi
💻 HPP
📖 第 1 页 / 共 3 页
字号:
// CodeGear C++ Builder
// Copyright (c) 1995, 2007 by CodeGear
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Advalertwindow.pas' rev: 11.00

#ifndef AdvalertwindowHPP
#define AdvalertwindowHPP

#pragma delphiheader begin
#pragma option push
#pragma option -w-      // All warnings off
#pragma option -Vx      // Zero-length empty class member functions
#pragma pack(push,8)
#include <System.hpp>	// Pascal unit
#include <Sysinit.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Sysutils.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Extctrls.hpp>	// Pascal unit
#include <Picturecontainer.hpp>	// Pascal unit
#include <Math.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Menus.hpp>	// Pascal unit
#include <Registry.hpp>	// Pascal unit
#include <Advstyleif.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Advalertwindow
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TGradientDirection { gdHorizontal, gdVertical };
#pragma option pop

typedef void __fastcall (__closure *TAnchorClickEvent)(System::TObject* Sender, AnsiString Anchor, int index);

typedef void __fastcall (__closure *TDeleteMessageEvent)(System::TObject* Sender, int index);

typedef void __fastcall (__closure *TCanCloseEvent)(System::TObject* Sender, bool &CanClose);

typedef void __fastcall (__closure *TCanDeleteEvent)(System::TObject* Sender, int Index, bool &CanDelete);

typedef void __fastcall (__closure *TCustomPaintEvent)(System::TObject* Sender, Graphics::TCanvas* ACanvas, const Types::TRect &ARect, bool &DefaultPaint);

#pragma option push -b-
enum TAdvAlertWindowStyle { asOffice2003Blue, asOffice2003Silver, asOffice2003Olive, asOffice2003Classic, asOffice2007Luna, asOffice2007Obsidian, asWindowsXP, asWhidbey, asCustom, asOffice2007Silver };
#pragma option pop

class DELPHICLASS TMsgScroller;
class PASCALIMPLEMENTATION TMsgScroller : public System::TObject 
{
	typedef System::TObject inherited;
	
private:
	int FMin;
	int FMax;
	int FPosition;
	bool FVisible;
	Classes::TNotifyEvent FOnChange;
	void __fastcall SetMax(const int Value);
	void __fastcall SetMin(const int Value);
	void __fastcall SetPosition(const int Value);
	void __fastcall SetVisible(const bool Value);
	
public:
	__fastcall TMsgScroller(void);
	bool __fastcall CanGoForward(void);
	bool __fastcall CanGoBack(void);
	__property int Min = {read=FMin, write=SetMin, nodefault};
	__property int Max = {read=FMax, write=SetMax, nodefault};
	__property int Position = {read=FPosition, write=SetPosition, nodefault};
	__property bool Visible = {read=FVisible, write=SetVisible, nodefault};
	
__published:
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
public:
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~TMsgScroller(void) { }
	#pragma option pop
	
};


class DELPHICLASS TAlertWindow;
class DELPHICLASS TMsgCollection;
typedef void __fastcall (__closure *TOnDeleteItemEvent)(System::TObject* Sender, int Index);

class DELPHICLASS TMsgCollectionItem;
class PASCALIMPLEMENTATION TMsgCollection : public Classes::TCollection 
{
	typedef Classes::TCollection inherited;
	
public:
	TMsgCollectionItem* operator[](int Index) { return Items[Index]; }
	
private:
	Classes::TComponent* FOwner;
	Classes::TNotifyEvent FOnChange;
	TOnDeleteItemEvent FOnDeleteItem;
	HIDESBASE TMsgCollectionItem* __fastcall GetItem(int Index);
	HIDESBASE void __fastcall SetItem(int Index, const TMsgCollectionItem* Value);
	
public:
	__fastcall TMsgCollection(Classes::TComponent* AOwner);
	__property TMsgCollectionItem* Items[int Index] = {read=GetItem, write=SetItem/*, default*/};
	HIDESBASE TMsgCollectionItem* __fastcall Add(void);
	HIDESBASE TMsgCollectionItem* __fastcall Insert(int Index);
	DYNAMIC Classes::TPersistent* __fastcall GetOwner(void);
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
	__property TOnDeleteItemEvent OnDeleteItem = {read=FOnDeleteItem, write=FOnDeleteItem};
public:
	#pragma option push -w-inl
	/* TCollection.Destroy */ inline __fastcall virtual ~TMsgCollection(void) { }
	#pragma option pop
	
};


class PASCALIMPLEMENTATION TAlertWindow : public Controls::THintWindow 
{
	typedef Controls::THintWindow inherited;
	
private:
	Graphics::TColor FWindowColor;
	Graphics::TColor FWindowColorTo;
	TGradientDirection FGradientDir;
	Picturecontainer::THTMLPictureCache* FImageCache;
	Picturecontainer::TPictureContainer* FContainer;
	int FHoverLink;
	bool FHover;
	#pragma pack(push,1)
	Types::TRect FHoverRect;
	#pragma pack(pop)
	TAnchorClickEvent FOnAnchorClick;
	Controls::TImageList* FImages;
	bool FAutoHide;
	bool FAutoSize;
	int FBorderSize;
	bool FAlwaysOnTop;
	int FMarginY;
	int FMarginX;
	bool FHoverClose;
	bool FDownClose;
	bool FScrollLeftHover;
	bool FScrollLeftDown;
	bool FScrollRightHover;
	bool FScrollRightDown;
	bool FDeleteHover;
	bool FDeleteDown;
	Graphics::TColor FSelectedColor;
	bool FDragingStart;
	int FOldMouseX;
	int FOldMouseY;
	TMsgScroller* FMsgScroller;
	Classes::TNotifyEvent FOnMouseLeave;
	Classes::TStringList* FAlertMessages;
	Classes::TNotifyEvent FOnWindowMoved;
	AnsiString FHintNextBtn;
	AnsiString FHintPrevBtn;
	AnsiString FHintCloseBtn;
	Graphics::TColor FCaptionColorTo;
	Graphics::TColor FCaptionColor;
	AnsiString FOriginalHint;
	Graphics::TColor FBorderColor;
	Graphics::TColor FBtnHoverColor;
	Graphics::TColor FBtnDownColor;
	Graphics::TColor FBtnHoverColorTo;
	Graphics::TColor FBtnDownColorTo;
	Graphics::TBitmap* FGlyphNext;
	Graphics::TBitmap* FGlyphNextDisabled;
	Graphics::TBitmap* FGlyphPrev;
	Graphics::TBitmap* FGlyphPrevDisabled;
	Graphics::TBitmap* FGlyphDelete;
	bool FAutoDelete;
	bool FShowDelete;
	AnsiString FHintDeleteBtn;
	TDeleteMessageEvent FOnDeleteMessage;
	Classes::TNotifyEvent FOnClose;
	TCanCloseEvent FOnCanClose;
	Classes::TNotifyEvent FOnNextMessage;
	Classes::TNotifyEvent FOnPrevMessage;
	Graphics::TBitmap* FGlyphClose;
	int FMaxWidth;
	int FMaxHeight;
	AnsiString FPositionFormat;
	TMsgCollection* FAlertMessagesInfo;
	bool FShowPopup;
	AnsiString FHintPopupBtn;
	bool FPopupBtnDown;
	bool FPopupBtnHover;
	bool FScrollUpBtnDown;
	bool FScrollUpBtnHover;
	bool FScrollDnBtnDown;
	bool FScrollDnBtnHover;
	Graphics::TBitmap* FGlyphPopup;
	Graphics::TPicture* FBackground;
	Classes::TNotifyEvent FOnPopupbtnClick;
	int FScrollPos;
	bool FShowScrollUp;
	bool FShowScrollDn;
	bool FShowScrollers;
	Extctrls::TTimer* FTimer;
	Classes::TNotifyEvent FOnDestroy;
	TCustomPaintEvent FOnCustomPaint;
	bool FAutoHiding;
	Graphics::TColor FURLColor;
	Classes::TNotifyEvent FOnAlertClick;
	HIDESBASE MESSAGE void __fastcall WMEraseBkGnd(Messages::TMessage &Msg);
	HIDESBASE MESSAGE void __fastcall WMSetFocus(Messages::TWMSetFocus &Msg);
	HIDESBASE MESSAGE void __fastcall WMNCHitTest(Messages::TWMNCHitTest &Message);
	HIDESBASE MESSAGE void __fastcall CMMouseLeave(Messages::TMessage &Message);
	void __fastcall SetHover(const bool Value);
	void __fastcall SetAlwaysOnTop(const bool Value);
	void __fastcall SetAutoSizeEx(const bool Value);
	void __fastcall DrawTopBar(void);
	void __fastcall DrawCloseButton(void);
	void __fastcall DrawLeftScrollBtn(void);
	void __fastcall DrawRightScrollBtn(void);
	void __fastcall DrawScrollBtns(void);
	void __fastcall DrawDeleteBtn(void);
	void __fastcall DrawPopupBtn(void);
	void __fastcall DrawScrollUpBtn(void);

⌨️ 快捷键说明

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