advtoolbar.hpp

TMSPack基本上涵盖了Delphi所有的基础控件

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

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

#ifndef AdvtoolbarHPP
#define AdvtoolbarHPP

#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 <Math.hpp>	// Pascal unit
#include <Registry.hpp>	// Pascal unit
#include <Menus.hpp>	// Pascal unit
#include <Advmenus.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Imglist.hpp>	// Pascal unit
#include <Commctrl.hpp>	// Pascal unit
#include <Extctrls.hpp>	// Pascal unit
#include <Actnlist.hpp>	// Pascal unit
#include <Inifiles.hpp>	// Pascal unit
#include <Advglowbutton.hpp>	// Pascal unit
#include <Advgdip.hpp>	// Pascal unit
#include <Gdipicture.hpp>	// Pascal unit
#include <Advhintinfo.hpp>	// Pascal unit
#include <Typinfo.hpp>	// Pascal unit
#include <Advstyleif.hpp>	// Pascal unit
#include <Db.hpp>	// Pascal unit
#include <Axctrls.hpp>	// Pascal unit

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

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

#pragma option push -b-
enum TDockAlign { daLeft, daTop, daRight, daBottom };
#pragma option pop

#pragma option push -b-
enum TBackGroundDisplay { bdTile, bdCenter, bdStretch };
#pragma option pop

#pragma option push -b-
enum TDragGripStyle { dsDots, dsSingleLine, dsDoubleLine, dsFlatDots, dsNone };
#pragma option pop

#pragma option push -b-
enum TToolBarState { tsDocked, tsFloating, tsFixed };
#pragma option pop

#pragma option push -b-
enum TItemChangeAction { icRefresh, isResize };
#pragma option pop

#pragma option push -b-
enum TButtomItemStyle { bisButton, bisCheck };
#pragma option pop

#pragma option push -b-
enum TGlyphPosition { gpLeft, gpTop, gpRight, gpBottom };
#pragma option pop

#pragma option push -b-
enum TCaptionPosition { cpTop, cpBottom };
#pragma option pop

#pragma option push -b-
enum TCaptionButton { cbClose, cbMinimize, cbMaximize };
#pragma option pop

typedef Set<TCaptionButton, cbClose, cbMaximize>  TCaptionButtons;

#pragma option push -b-
enum TScrollArrow { saLeft, saTop, saRight, saBottom, saNone };
#pragma option pop

#pragma option push -b-
enum TArrowStyle { asSingle, asDouble, asWithLine };
#pragma option pop

#pragma option push -b-
enum TDockMode { dmAll, dmAllParentDockPanels, dmParentDockPanelOnly };
#pragma option pop

typedef Set<TDockAlign, daLeft, daBottom>  TDockableTo;

class DELPHICLASS TProForm;
class PASCALIMPLEMENTATION TProForm : public Forms::TCustomForm 
{
	typedef Forms::TCustomForm inherited;
	
public:
	#pragma option push -w-inl
	/* TCustomForm.Create */ inline __fastcall virtual TProForm(Classes::TComponent* AOwner) : Forms::TCustomForm(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCustomForm.CreateNew */ inline __fastcall virtual TProForm(Classes::TComponent* AOwner, int Dummy) : Forms::TCustomForm(AOwner, Dummy) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCustomForm.Destroy */ inline __fastcall virtual ~TProForm(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TProForm(HWND ParentWindow) : Forms::TCustomForm(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TProWinControl;
class PASCALIMPLEMENTATION TProWinControl : public Controls::TWinControl 
{
	typedef Controls::TWinControl inherited;
	
public:
	#pragma option push -w-inl
	/* TWinControl.Create */ inline __fastcall virtual TProWinControl(Classes::TComponent* AOwner) : Controls::TWinControl(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TProWinControl(HWND ParentWindow) : Controls::TWinControl(ParentWindow) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TWinControl.Destroy */ inline __fastcall virtual ~TProWinControl(void) { }
	#pragma option pop
	
};


class DELPHICLASS TProCustomGlowButton;
class PASCALIMPLEMENTATION TProCustomGlowButton : public Advglowbutton::TAdvCustomGlowButton 
{
	typedef Advglowbutton::TAdvCustomGlowButton inherited;
	
public:
	#pragma option push -w-inl
	/* TAdvCustomGlowButton.Create */ inline __fastcall virtual TProCustomGlowButton(Classes::TComponent* AOwner) : Advglowbutton::TAdvCustomGlowButton(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TAdvCustomGlowButton.Destroy */ inline __fastcall virtual ~TProCustomGlowButton(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TProCustomGlowButton(HWND ParentWindow) : Advglowbutton::TAdvCustomGlowButton(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TProControl;
class PASCALIMPLEMENTATION TProControl : public Controls::TControl 
{
	typedef Controls::TControl inherited;
	
public:
	#pragma option push -w-inl
	/* TControl.Create */ inline __fastcall virtual TProControl(Classes::TComponent* AOwner) : Controls::TControl(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TControl.Destroy */ inline __fastcall virtual ~TProControl(void) { }
	#pragma option pop
	
};


class DELPHICLASS TDbgList;
class PASCALIMPLEMENTATION TDbgList : public Classes::TList 
{
	typedef Classes::TList inherited;
	
public:
	void * operator[](int Index) { return Items[Index]; }
	
private:
	void * __fastcall GetItemsEx(int Index);
	void __fastcall SetItemsEx(int Index, const void * Value);
	
public:
	void __fastcall AssignList(Classes::TList* ListA);
	__property void * Items[int Index] = {read=GetItemsEx, write=SetItemsEx/*, default*/};
public:
	#pragma option push -w-inl
	/* TList.Destroy */ inline __fastcall virtual ~TDbgList(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TObject.Create */ inline __fastcall TDbgList(void) : Classes::TList() { }
	#pragma option pop
	
};


class DELPHICLASS TButtonAppearance;
class PASCALIMPLEMENTATION TButtonAppearance : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	Classes::TNotifyEvent FOnChange;
	Graphics::TColor FColorHot;
	Graphics::TColor FColorTo;
	Graphics::TColor FColor;
	Graphics::TColor FColorHotTo;
	Graphics::TColor FColorDownTo;
	Graphics::TColor FColorDown;
	Graphics::TColor FBorderDownColor;
	Graphics::TColor FBorderColor;
	Graphics::TColor FBorderHotColor;
	TGradientDirection FGradientDirection;
	Graphics::TColor FColorChecked;
	Graphics::TColor FColorCheckedTo;
	Graphics::TColor FCaptionTextColorChecked;
	Graphics::TColor FCaptionTextColor;
	Graphics::TColor FCaptionTextColorHot;
	Graphics::TColor FCaptionTextColorDown;
	Graphics::TColor FBorderCheckedColor;
	Graphics::TFont* FCaptionFont;
	TGlyphPosition FGlyphPosition;
	TGradientDirection FGradientDirectionDown;
	TGradientDirection FGradientDirectionHot;
	TGradientDirection FGradientDirectionChecked;
	bool FSystemFont;
	void __fastcall Change(void);
	void __fastcall SetBorderColor(const Graphics::TColor Value);
	void __fastcall SetColor(const Graphics::TColor Value);
	void __fastcall SetColorDown(const Graphics::TColor Value);
	void __fastcall SetColorDownTo(const Graphics::TColor Value);
	void __fastcall SetColorHot(const Graphics::TColor Value);
	void __fastcall SetColorHotTo(const Graphics::TColor Value);
	void __fastcall SetColorTo(const Graphics::TColor Value);
	void __fastcall SetGradientDirection(const TGradientDirection Value);
	void __fastcall SetColorChecked(const Graphics::TColor Value);
	void __fastcall SetColorCheckedTo(const Graphics::TColor Value);
	void __fastcall SetCaptionTextColor(const Graphics::TColor Value);
	void __fastcall SetCaptionTextColorDown(const Graphics::TColor Value);
	void __fastcall SetCaptionTextColorHot(const Graphics::TColor Value);
	void __fastcall SetCaptionTextColorChecked(const Graphics::TColor Value);
	void __fastcall SetBorderCheckedColor(const Graphics::TColor Value);
	void __fastcall SetCaptionFont(const Graphics::TFont* Value);
	void __fastcall SetGlyphPosition(const TGlyphPosition Value);
	void __fastcall SetGradientDirectionChecked(const TGradientDirection Value);
	void __fastcall SetGradientDirectionDown(const TGradientDirection Value);
	void __fastcall SetGradientDirectionHot(const TGradientDirection Value);
	void __fastcall SetSystemFont(const bool Value);
	
protected:
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
	__property TGlyphPosition GlyphPosition = {read=FGlyphPosition, write=SetGlyphPosition, default=0};
	
public:
	__fastcall TButtonAppearance(void);
	__fastcall virtual ~TButtonAppearance(void);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	
__published:
	__property Graphics::TColor Color = {read=FColor, write=SetColor, default=536870911};
	__property Graphics::TColor ColorTo = {read=FColorTo, write=SetColorTo, default=536870911};
	__property Graphics::TColor ColorChecked = {read=FColorChecked, write=SetColorChecked, default=14210516};
	__property Graphics::TColor ColorCheckedTo = {read=FColorCheckedTo, write=SetColorCheckedTo, default=536870911};
	__property Graphics::TColor ColorDown = {read=FColorDown, write=SetColorDown, default=11899525};
	__property Graphics::TColor ColorDownTo = {read=FColorDownTo, write=SetColorDownTo, default=536870911};