advsmartmessagebox.hpp

来自「TMSPack基本上涵盖了Delphi所有的基础控件」· HPP 代码 · 共 393 行 · 第 1/2 页

// Borland C++ Builder
// Copyright (c) 1995, 2005 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Advsmartmessagebox.pas' rev: 10.00

#ifndef AdvsmartmessageboxHPP
#define AdvsmartmessageboxHPP

#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 <Variants.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Stdctrls.hpp>	// Pascal unit
#include <Extctrls.hpp>	// Pascal unit
#include <Picturecontainer.hpp>	// Pascal unit
#include <Math.hpp>	// Pascal unit
#include <Advstyleif.hpp>	// Pascal unit

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

namespace Advsmartmessagebox
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TDisplayType { dtSequence, dtStackedInOut };
#pragma option pop

#pragma option push -b-
enum TDisplayStyle { dsFadeInOut, dsRollInOut };
#pragma option pop

#pragma option push -b-
enum TDisplayLocation { dlFixedPos, dlTopLeft, dlTopRight, dlTopCenter, dlBottomLeft, dlBottomRight, dlBottomCenter, dlCenter };
#pragma option pop

#pragma option push -b-
enum TGradientDirection { gdHorizontal, gdVertical };
#pragma option pop

#pragma option push -b-
enum TDisplayRelative { drScreen, drForm };
#pragma option pop

class DELPHICLASS TDefaultSmartMessage;
class PASCALIMPLEMENTATION TDefaultSmartMessage : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	Classes::TNotifyEvent FOnChange;
	Graphics::TColor FColor;
	Graphics::TColor FColorTo;
	bool FRounded;
	bool FShadow;
	Byte FOpacity;
	AnsiString FText;
	Graphics::TColor FMirrorColorTo;
	Graphics::TColor FMirrorColor;
	Graphics::TColor FBorderColor;
	Graphics::TFont* FFont;
	int FMarginY;
	int FMarginX;
	TGradientDirection FGradient;
	int FMaxDuration;
	int FMinDuration;
	void __fastcall SetBorderColor(const Graphics::TColor Value);
	void __fastcall SetColor(const Graphics::TColor Value);
	void __fastcall SetColorTo(const Graphics::TColor Value);
	void __fastcall SetFont(const Graphics::TFont* Value);
	void __fastcall SetMirrorColor(const Graphics::TColor Value);
	void __fastcall SetMirrorColorTo(const Graphics::TColor Value);
	void __fastcall SetOpacity(const Byte Value);
	void __fastcall SetRounded(const bool Value);
	void __fastcall SetShadow(const bool Value);
	void __fastcall SetText(const AnsiString Value);
	void __fastcall SetMarginX(const int Value);
	void __fastcall SetMarginY(const int Value);
	void __fastcall SetGradient(const TGradientDirection Value);
	void __fastcall SetMaxDuration(const int Value);
	void __fastcall SetMinDuration(const int Value);
	
protected:
	void __fastcall Changed(void);
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
	__property Graphics::TColor MirrorColor = {read=FMirrorColor, write=SetMirrorColor, nodefault};
	__property Graphics::TColor MirrorColorTo = {read=FMirrorColorTo, write=SetMirrorColorTo, nodefault};
	
public:
	__fastcall TDefaultSmartMessage(void);
	__fastcall virtual ~TDefaultSmartMessage(void);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	
__published:
	__property Graphics::TFont* Font = {read=FFont, write=SetFont};
	__property Graphics::TColor Color = {read=FColor, write=SetColor, default=16777215};
	__property Graphics::TColor ColorTo = {read=FColorTo, write=SetColorTo, default=12632256};
	__property TGradientDirection Gradient = {read=FGradient, write=SetGradient, default=1};
	__property int MarginX = {read=FMarginX, write=SetMarginX, default=6};
	__property int MarginY = {read=FMarginY, write=SetMarginY, default=6};
	__property Graphics::TColor BorderColor = {read=FBorderColor, write=SetBorderColor, default=8421504};
	__property bool Rounded = {read=FRounded, write=SetRounded, default=1};
	__property bool Shadow = {read=FShadow, write=SetShadow, default=0};
	__property Byte Opacity = {read=FOpacity, write=SetOpacity, default=230};
	__property AnsiString Text = {read=FText, write=SetText};
	__property int MaxDuration = {read=FMaxDuration, write=SetMaxDuration, nodefault};
	__property int MinDuration = {read=FMinDuration, write=SetMinDuration, nodefault};
};


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


typedef void __fastcall (__closure *TMsgClickEvent)(System::TObject* Sender, int Index);

class PASCALIMPLEMENTATION TAdvSmartMessageBox : public Classes::TComponent 
{
	typedef Classes::TComponent inherited;
	
private:
	Classes::TComponent* FOwner;
	TAdvSmartMessages* FMessages;
	TDefaultSmartMessage* FDefaultMessage;
	TDisplayLocation FDisplayLocation;
	TDisplayStyle FDisplayStyle;
	TDisplayType FDisplayType;
	int FDisplayOffsetY;
	int FDisplayOffsetX;
	Classes::TList* FMsgForms;
	int FDisplayMarginX;
	int FDisplayMarginY;
	Controls::TImageList* FImages;
	int FHoverLink;
	Picturecontainer::THTMLPictureCache* FImageCache;
	Picturecontainer::TPictureContainer* FContainer;
	bool FAutoDestroyMessage;
	int FDisplayPointX;
	int FDisplayPointY;
	TDisplayRelative FDisplayRelative;
	Advstyleif::TTMSStyle FStyle;
	TMsgClickEvent FOnClick;
	void __fastcall OnMessagesChanged(System::TObject* Sender);
	void __fastcall SetMessages(const TAdvSmartMessages* Value);
	void __fastcall SetDefaultMessage(const TDefaultSmartMessage* Value);
	void __fastcall SetDisplayLocation(const TDisplayLocation Value);
	void __fastcall SetDisplayStyle(const TDisplayStyle Value);
	void __fastcall SetDisplayType(const TDisplayType Value);
	void __fastcall SetDisplayOffsetX(const int Value);
	void __fastcall SetDisplayOffsetY(const int Value);
	void __fastcall SetImages(const Controls::TImageList* Value);
	AnsiString __fastcall GetVersion();
	void __fastcall SetVersion(const AnsiString Value);