BusinessSkinForm 12.02 D5-XE10.2

// Borland C++ Builder // Copyright (c) 1995, 2002 by Borland Software Corporation // All rights reserved // (DO NOT EDIT: machine generated header) 'bsSkinCtrls.pas' rev: 6.00 #ifndef bsSkinCtrlsHPP #define bsSkinCtrlsHPP #pragma delphiheader begin #pragma option push -w- #pragma option push -Vx #include <ToolWin.hpp> // Pascal unit #include <bsUtils.hpp> // Pascal unit #include <bsSkinHint.hpp> // Pascal unit #include <ImgList.hpp> // Pascal unit #include <CommCtrl.hpp> // Pascal unit #include <ComCtrls.hpp> // Pascal unit #include <bsSkinMenus.hpp> // Pascal unit #include <StdCtrls.hpp> // Pascal unit #include <bsSkinData.hpp> // Pascal unit #include <ExtCtrls.hpp> // Pascal unit #include <Menus.hpp> // Pascal unit #include <Forms.hpp> // Pascal unit #include <Controls.hpp> // Pascal unit #include <Graphics.hpp> // Pascal unit #include <Classes.hpp> // Pascal unit #include <SysUtils.hpp> // Pascal unit #include <Messages.hpp> // Pascal unit #include <Windows.hpp> // Pascal unit #include <SysInit.hpp> // Pascal unit #include <System.hpp> // Pascal unit //-- user supplied ----------------------------------------------------------- namespace Bsskinctrls { //-- type declarations ------------------------------------------------------- #pragma pack(push, 1) struct TbsControlButton { Types::TRect R; bool MouseIn; bool Down; bool Visible; bool Enabled; } ; #pragma pack(pop) class DELPHICLASS TbsSkinWinControl; class PASCALIMPLEMENTATION TbsSkinWinControl : public Controls::TWinControl { typedef Controls::TWinControl inherited; protected: Bsskindata::TbsSkinData* FSD; virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation); virtual void __fastcall SetSkinData(Bsskindata::TbsSkinData* Value); public: virtual void __fastcall ChangeSkinData(void); __fastcall virtual ~TbsSkinWinControl(void); __fastcall virtual TbsSkinWinControl(Classes::TComponent* AOwner); __property Bsskindata::TbsSkinData* SkinData = {read=FSD, write=SetSkinData}; public: #pragma option push -w-inl /* TWinControl.CreateParented */ inline __fastcall TbsSkinWinControl(HWND ParentWindow) : Controls::TWinControl(ParentWindow) { } #pragma option pop }; class DELPHICLASS TbsSkinControl; class PASCALIMPLEMENTATION TbsSkinControl : public Controls::TCustomControl { typedef Controls::TCustomControl inherited; protected: bool FromWMPaint; Bsskindata::TbsSkinData* FSD; AnsiString FSkinDataName; HRGN FRgn; Classes::TNotifyEvent FOnMouseEnter; Classes::TNotifyEvent FOnMouseLeave; AnsiString FHintTitle; int FHintImageIndex; Imglist::TCustomImageList* FHintImageList; virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation); virtual void __fastcall GetSkinData(void); HIDESBASE MESSAGE void __fastcall WMMOVE(Messages::TWMMove &Msg); HIDESBASE MESSAGE void __fastcall WMEraseBkgnd(Messages::TWMEraseBkgnd &Msg); MESSAGE void __fastcall WMCHECKPARENTBG(Messages::TWMEraseBkgnd &Msg); HIDESBASE MESSAGE void __fastcall CMMouseLeave(Messages::TMessage &Message); HIDESBASE MESSAGE void __fastcall CMMouseEnter(Messages::TMessage &Message); HIDESBASE MESSAGE void __fastcall WMPaint(Messages::TWMPaint &Msg); virtual void __fastcall SetSkinDataName(AnsiString Value); virtual void __fastcall SetSkinData(Bsskindata::TbsSkinData* Value); virtual void __fastcall CreateControlDefaultImage(Graphics::TBitmap* B); virtual void __fastcall CreateControlSkinImage(Graphics::TBitmap* B); public: int FIndex; virtual void __fastcall Paint(void); virtual void __fastcall ChangeSkinData(void); virtual void __fastcall BeforeChangeSkinData(void); virtual void __fastcall AfterChangeSkinData(void); __fastcall virtual ~TbsSkinControl(void); __fastcall virtual TbsSkinControl(Classes::TComponent* AOwner); virtual void __fastcall CheckParentBackground(void); __published: __property AnsiString HintTitle = {read=FHintTitle, write=FHintTitle}; __property int HintImageIndex = {read=FHintImageIndex, write=FHintImageIndex, nodefault}; __property Imglist::TCustomImageList* HintImageList = {read=FHintImageList, write=FHintImageList}; __property Anchors = {default=3}; __property TabOrder = {default=-1}; __property Visible = {default=1}; __property Bsskindata::TbsSkinData* SkinData = {read=FSD, write=SetSkinData}; __property AnsiString SkinDataName = {read=FSkinDataName, write=SetSkinDataName}; __property Classes::TNotifyEvent OnMouseEnter = {read=FOnMouseEnter, write=FOnMouseEnter}; __property Classes::TNotifyEvent OnMouseLeave = {read=FOnMouseLeave, write=FOnMouseLeave}; public: #pragma option push -w-inl /* TWinControl.CreateParented */ inline __fastcall TbsSkinControl(HWND ParentWindow) : Controls::TCustomControl(ParentWindow) { } #pragma option pop }; class DELPHICLASS TbsSkinCustomControl; class PASCALIMPLEMENTATION TbsSkinCustomControl : public TbsSkinControl { typedef TbsSkinControl inherited; protected: bool FForceBackground; bool FDrawbackground; int FDefaultWidth; int FDefaultHeight; Graphics::TFont* FDefaultFont; bool FUseSkinFont; #pragma pack(push, 1) Types::TPoint LTPt; #pragma pack(pop) #pragma pack(push, 1) Types::TPoint RTPt; #pragma pack(pop) #pragma pack(push, 1) Types::TPoint LBPt; #pragma pack(pop) #pragma pack(push, 1) Types::TPoint RBPt; #pragma pack(pop) #pragma pack(push, 1) Types::TRect SkinRect; #pragma pack(pop) #pragma pack(push, 1) Types::TRect ClRect; #pragma pack(pop) #pragma pack(push, 1) Types::TPoint NewLTPoint; #pragma pack(pop) #pragma pack(push, 1) Types::TPoint NewRTPoint; #pragma pack(pop) #pragma pack(push, 1) Types::TPoint NewLBPoint; #pragma pack(pop) #pragma pack(push, 1) Types::TPoint NewRBPoint; #pragma pack(pop) #pragma pack(push, 1) Types::TRect NewClRect; #pragma pack(pop) Graphics::TBitmap* Picture; Graphics::TBitmap* MaskPicture; int ResizeMode; bool StretchEffect; Bsutils::TbsStretchType StretchType; bool LeftStretch; bool TopStretch; bool RightStretch; bool BottomStretch; void __fastcall OnDefaultFontChange(System::TObject* Sender); void __fastcall SetDefaultWidth(int Value); void __fastcall SetDefaultHeight(int Value); void __fastcall SetDefaultFont(Graphics::TFont* Value); virtual void __fastcall DefaultFontChange(void); Types::TRect __fastcall GetNewRect(const Types::TRect &R); int __fastcall GetResizeMode(void); virtual void __fastcall CalcSize(int &W, int &H); void __fastcall CreateSkinControlImage(Graphics::TBitmap* B, Graphics::TBitmap* SB, const Types::TRect &R); virtual void __fastcall GetSkinData(void); void __fastcall CreateControlRegion(void); virtual void __fastcall SetControlRegion(void); virtual void __fastcall CreateControlDefaultImage(Graphics::TBitmap* B); virtual void __fastcall CreateControlSkinImage(Graphics::TBitmap* B); int __fastcall GetRealClientWidth(void); int __fastcall GetRealClientHeight(void); int __fastcall GetRealClientLeft(void); int __fastcall GetRealClientTop(void); void __fastcall CheckControlsBackground(void); public: __fastcall virtual TbsSkinCustomControl(Classes::TComponent* AOwner); __fastcall virtual ~TbsSkinCustomControl(void); virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight); virtual void __fastcall ChangeSkinData(void); __property Types::TRect RealClientRect = {read=NewClRect}; __property int RealClientWidth = {read=GetRealClientWidth, nodefault}; __property int RealClientHeight = {read=GetRealClientHeight, nodefault}; __property int RealClientLeft = {read=GetRealClientLeft, nodefault}; __property int RealClientTop = {read=GetRealClientTop, nodefault}; virtual void __fastcall Paint(void); __property bool ForcebackGround = {rea