home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Internet 2000 May / MICD_2000_05.iso / CBuilder5 / INSTALL / DATA1.CAB / Program_Built_Files / Include / Vcl / buttons.hpp < prev    next >
C/C++ Source or Header  |  2000-02-01  |  9KB  |  238 lines
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1999 by Borland International
  3. // All rights reserved
  4.  
  5. // (DO NOT EDIT: machine generated header) 'Buttons.pas' rev: 5.00
  6.  
  7. #ifndef ButtonsHPP
  8. #define ButtonsHPP
  9.  
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #pragma option push -Vx
  13. #include <Menus.hpp>    // Pascal unit
  14. #include <Commctrl.hpp>    // Pascal unit
  15. #include <ExtCtrls.hpp>    // Pascal unit
  16. #include <StdCtrls.hpp>    // Pascal unit
  17. #include <Graphics.hpp>    // Pascal unit
  18. #include <Forms.hpp>    // Pascal unit
  19. #include <Controls.hpp>    // Pascal unit
  20. #include <Classes.hpp>    // Pascal unit
  21. #include <Messages.hpp>    // Pascal unit
  22. #include <Windows.hpp>    // Pascal unit
  23. #include <SysInit.hpp>    // Pascal unit
  24. #include <System.hpp>    // Pascal unit
  25.  
  26. //-- user supplied -----------------------------------------------------------
  27.  
  28. namespace Buttons
  29. {
  30. //-- type declarations -------------------------------------------------------
  31. #pragma option push -b-
  32. enum TButtonLayout { blGlyphLeft, blGlyphRight, blGlyphTop, blGlyphBottom };
  33. #pragma option pop
  34.  
  35. #pragma option push -b-
  36. enum TButtonState { bsUp, bsDisabled, bsDown, bsExclusive };
  37. #pragma option pop
  38.  
  39. #pragma option push -b-
  40. enum TButtonStyle { bsAutoDetect, bsWin31, bsNew };
  41. #pragma option pop
  42.  
  43. typedef Shortint TNumGlyphs;
  44.  
  45. class DELPHICLASS TSpeedButton;
  46. class PASCALIMPLEMENTATION TSpeedButton : public Controls::TGraphicControl 
  47. {
  48.     typedef Controls::TGraphicControl inherited;
  49.     
  50. private:
  51.     int FGroupIndex;
  52.     void *FGlyph;
  53.     bool FDown;
  54.     bool FDragging;
  55.     bool FAllowAllUp;
  56.     TButtonLayout FLayout;
  57.     int FSpacing;
  58.     bool FTransparent;
  59.     int FMargin;
  60.     bool FFlat;
  61.     bool FMouseInControl;
  62.     void __fastcall GlyphChanged(System::TObject* Sender);
  63.     void __fastcall UpdateExclusive(void);
  64.     Graphics::TBitmap* __fastcall GetGlyph(void);
  65.     void __fastcall SetGlyph(Graphics::TBitmap* Value);
  66.     TNumGlyphs __fastcall GetNumGlyphs(void);
  67.     void __fastcall SetNumGlyphs(TNumGlyphs Value);
  68.     void __fastcall SetDown(bool Value);
  69.     void __fastcall SetFlat(bool Value);
  70.     void __fastcall SetAllowAllUp(bool Value);
  71.     void __fastcall SetGroupIndex(int Value);
  72.     void __fastcall SetLayout(TButtonLayout Value);
  73.     void __fastcall SetSpacing(int Value);
  74.     void __fastcall SetTransparent(bool Value);
  75.     void __fastcall SetMargin(int Value);
  76.     void __fastcall UpdateTracking(void);
  77.     HIDESBASE MESSAGE void __fastcall WMLButtonDblClk(Messages::TWMMouse &Message);
  78.     HIDESBASE MESSAGE void __fastcall CMEnabledChanged(Messages::TMessage &Message);
  79.     MESSAGE void __fastcall CMButtonPressed(Messages::TMessage &Message);
  80.     MESSAGE void __fastcall CMDialogChar(Messages::TWMKey &Message);
  81.     HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &Message);
  82.     MESSAGE void __fastcall CMTextChanged(Messages::TMessage &Message);
  83.     MESSAGE void __fastcall CMSysColorChange(Messages::TMessage &Message);
  84.     HIDESBASE MESSAGE void __fastcall CMMouseEnter(Messages::TMessage &Message);
  85.     HIDESBASE MESSAGE void __fastcall CMMouseLeave(Messages::TMessage &Message);
  86.     
  87. protected:
  88.     TButtonState FState;
  89.     DYNAMIC void __fastcall ActionChange(System::TObject* Sender, bool CheckDefaults);
  90.     DYNAMIC HPALETTE __fastcall GetPalette(void);
  91.     virtual void __fastcall Loaded(void);
  92.     DYNAMIC void __fastcall MouseDown(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, 
  93.         int Y);
  94.     DYNAMIC void __fastcall MouseMove(Classes::TShiftState Shift, int X, int Y);
  95.     DYNAMIC void __fastcall MouseUp(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int 
  96.         Y);
  97.     virtual void __fastcall Paint(void);
  98.     __property bool MouseInControl = {read=FMouseInControl, nodefault};
  99.     
  100. public:
  101.     __fastcall virtual TSpeedButton(Classes::TComponent* AOwner);
  102.     __fastcall virtual ~TSpeedButton(void);
  103.     DYNAMIC void __fastcall Click(void);
  104.     
  105. __published:
  106.     __property Action ;
  107.     __property bool AllowAllUp = {read=FAllowAllUp, write=SetAllowAllUp, default=0};
  108.     __property Anchors ;
  109.     __property BiDiMode ;
  110.     __property Constraints ;
  111.     __property int GroupIndex = {read=FGroupIndex, write=SetGroupIndex, default=0};
  112.     __property bool Down = {read=FDown, write=SetDown, default=0};
  113.     __property Caption ;
  114.     __property Enabled ;
  115.     __property bool Flat = {read=FFlat, write=SetFlat, default=0};
  116.     __property Font ;
  117.     __property Graphics::TBitmap* Glyph = {read=GetGlyph, write=SetGlyph};
  118.     __property TButtonLayout Layout = {read=FLayout, write=SetLayout, default=0};
  119.     __property int Margin = {read=FMargin, write=SetMargin, default=-1};
  120.     __property TNumGlyphs NumGlyphs = {read=GetNumGlyphs, write=SetNumGlyphs, default=1};
  121.     __property ParentFont ;
  122.     __property ParentShowHint ;
  123.     __property ParentBiDiMode ;
  124.     __property PopupMenu ;
  125.     __property ShowHint ;
  126.     __property int Spacing = {read=FSpacing, write=SetSpacing, default=4};
  127.     __property bool Transparent = {read=FTransparent, write=SetTransparent, default=1};
  128.     __property Visible ;
  129.     __property OnClick ;
  130.     __property OnDblClick ;
  131.     __property OnMouseDown ;
  132.     __property OnMouseMove ;
  133.     __property OnMouseUp ;
  134. };
  135.  
  136.  
  137. #pragma option push -b-
  138. enum TBitBtnKind { bkCustom, bkOK, bkCancel, bkHelp, bkYes, bkNo, bkClose, bkAbort, bkRetry, bkIgnore, 
  139.     bkAll };
  140. #pragma option pop
  141.  
  142. class DELPHICLASS TBitBtn;
  143. class PASCALIMPLEMENTATION TBitBtn : public Stdctrls::TButton 
  144. {
  145.     typedef Stdctrls::TButton inherited;
  146.     
  147. private:
  148.     Graphics::TCanvas* FCanvas;
  149.     void *FGlyph;
  150.     TButtonStyle FStyle;
  151.     TBitBtnKind FKind;
  152.     TButtonLayout FLayout;
  153.     int FSpacing;
  154.     int FMargin;
  155.     bool IsFocused;
  156.     bool FModifiedGlyph;
  157.     void __fastcall DrawItem(const tagDRAWITEMSTRUCT &DrawItemStruct);
  158.     void __fastcall SetGlyph(Graphics::TBitmap* Value);
  159.     Graphics::TBitmap* __fastcall GetGlyph(void);
  160.     TNumGlyphs __fastcall GetNumGlyphs(void);
  161.     void __fastcall SetNumGlyphs(TNumGlyphs Value);
  162.     void __fastcall GlyphChanged(System::TObject* Sender);
  163.     bool __fastcall IsCustom(void);
  164.     bool __fastcall IsCustomCaption(void);
  165.     void __fastcall SetStyle(TButtonStyle Value);
  166.     void __fastcall SetKind(TBitBtnKind Value);
  167.     TBitBtnKind __fastcall GetKind(void);
  168.     void __fastcall SetLayout(TButtonLayout Value);
  169.     void __fastcall SetSpacing(int Value);
  170.     void __fastcall SetMargin(int Value);
  171.     MESSAGE void __fastcall CNMeasureItem(Messages::TWMMeasureItem &Message);
  172.     MESSAGE void __fastcall CNDrawItem(Messages::TWMDrawItem &Message);
  173.     HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &Message);
  174.     HIDESBASE MESSAGE void __fastcall CMEnabledChanged(Messages::TMessage &Message);
  175.     HIDESBASE MESSAGE void __fastcall WMLButtonDblClk(Messages::TWMMouse &Message);
  176.     
  177. protected:
  178.     DYNAMIC void __fastcall ActionChange(System::TObject* Sender, bool CheckDefaults);
  179.     virtual void __fastcall CreateHandle(void);
  180.     virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
  181.     DYNAMIC HPALETTE __fastcall GetPalette(void);
  182.     virtual void __fastcall SetButtonStyle(bool ADefault);
  183.     
  184. public:
  185.     __fastcall virtual TBitBtn(Classes::TComponent* AOwner);
  186.     __fastcall virtual ~TBitBtn(void);
  187.     DYNAMIC void __fastcall Click(void);
  188.     
  189. __published:
  190.     __property Action ;
  191.     __property Anchors ;
  192.     __property BiDiMode ;
  193.     __property Cancel  = {stored=IsCustom, default=0};
  194.     __property Caption  = {stored=IsCustomCaption};
  195.     __property Constraints ;
  196.     __property Default  = {stored=IsCustom, default=0};
  197.     __property Enabled ;
  198.     __property Graphics::TBitmap* Glyph = {read=GetGlyph, write=SetGlyph, stored=IsCustom};
  199.     __property TBitBtnKind Kind = {read=GetKind, write=SetKind, default=0};
  200.     __property TButtonLayout Layout = {read=FLayout, write=SetLayout, default=0};
  201.     __property int Margin = {read=FMargin, write=SetMargin, default=-1};
  202.     __property ModalResult  = {stored=IsCustom, default=0};
  203.     __property TNumGlyphs NumGlyphs = {read=GetNumGlyphs, write=SetNumGlyphs, stored=IsCustom, default=1
  204.         };
  205.     __property ParentShowHint ;
  206.     __property ParentBiDiMode ;
  207.     __property ShowHint ;
  208.     __property TButtonStyle Style = {read=FStyle, write=SetStyle, default=0};
  209.     __property int Spacing = {read=FSpacing, write=SetSpacing, default=4};
  210.     __property TabOrder ;
  211.     __property TabStop ;
  212.     __property Visible ;
  213.     __property OnEnter ;
  214.     __property OnExit ;
  215. public:
  216.     #pragma option push -w-inl
  217.     /* TWinControl.CreateParented */ inline __fastcall TBitBtn(HWND ParentWindow) : Stdctrls::TButton(ParentWindow
  218.         ) { }
  219.     #pragma option pop
  220.     
  221. };
  222.  
  223.  
  224. //-- var, const, procedure ---------------------------------------------------
  225. extern PACKAGE Windows::TRect __fastcall DrawButtonFace(Graphics::TCanvas* Canvas, const Windows::TRect 
  226.     &Client, int BevelWidth, TButtonStyle Style, bool IsRounded, bool IsDown, bool IsFocused);
  227.  
  228. }    /* namespace Buttons */
  229. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  230. using namespace Buttons;
  231. #endif
  232. #pragma option pop    // -w-
  233. #pragma option pop    // -Vx
  234.  
  235. #pragma delphiheader end.
  236. //-- end unit ----------------------------------------------------------------
  237. #endif    // Buttons
  238.