开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Delphi控件源码 > 查看源码
fcbutton.hpp
资源名称：qqdelphiprog.rar　[点击查看]
上传用户：hylc_2004
上传日期：2014-01-23
资源大小：46800k
文件大小：16k
源码类别：

Delphi控件源码

开发平台：

Delphi

fcbutton.hpp：源码内容
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 2002 by Borland Software Corporation
  3. // All rights reserved
  5. // (DO NOT EDIT: machine generated header) 'fcButton.pas' rev: 6.00
  7. #ifndef fcButtonHPP
  8. #define fcButtonHPP
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #pragma option push -Vx
  13. #include <fctext.hpp> // Pascal unit
  14. #include <Variants.hpp> // Pascal unit
  15. #include <ActnList.hpp> // Pascal unit
  16. #include <ImgList.hpp> // Pascal unit
  17. #include <Themes.hpp> // Pascal unit
  18. #include <DB.hpp> // Pascal unit
  19. #include <DBCtrls.hpp> // Pascal unit
  20. #include <TypInfo.hpp> // Pascal unit
  21. #include <fcChangeLink.hpp> // Pascal unit
  22. #include <fcBitmap.hpp> // Pascal unit
  23. #include <fcCommon.hpp> // Pascal unit
  24. #include <SysUtils.hpp> // Pascal unit
  25. #include <Consts.hpp> // Pascal unit
  26. #include <Math.hpp> // Pascal unit
  27. #include <Dialogs.hpp> // Pascal unit
  28. #include <Buttons.hpp> // Pascal unit
  29. #include <CommCtrl.hpp> // Pascal unit
  30. #include <StdCtrls.hpp> // Pascal unit
  31. #include <Graphics.hpp> // Pascal unit
  32. #include <Forms.hpp> // Pascal unit
  33. #include <Controls.hpp> // Pascal unit
  34. #include <Classes.hpp> // Pascal unit
  35. #include <Messages.hpp> // Pascal unit
  36. #include <Windows.hpp> // Pascal unit
  37. #include <SysInit.hpp> // Pascal unit
  38. #include <System.hpp> // Pascal unit
  40. //-- user supplied -----------------------------------------------------------
  42. namespace Fcbutton
  43. {
  44. //-- type declarations -------------------------------------------------------
  45. #pragma option push -b-
  46. enum TfcShadeStyle { fbsNormal, fbsRaised, fbsHighlight, fbsFlat };
  47. #pragma option pop
  49. #pragma option push -b-
  50. enum TfcButtonOption { boFocusable, boOverrideActionGlyph, boToggleOnUp, boFocusRect, boAutoBold };
  51. #pragma option pop
  53. typedef Set<TfcButtonOption, boFocusable, boAutoBold>  TfcButtonOptions;
  55. typedef TMetaClass* TfcCustomBitBtnClass;
  57. #pragma pack(push, 4)
  58. struct TfcRegionData
  59. {
  60. int dwSize;
  61. _RGNDATA *rgnData;
  62. } ;
  63. #pragma pack(pop)
  65. typedef TfcRegionData *PfcRegionData;
  67. class DELPHICLASS TfcOffsets;
  68. class DELPHICLASS TfcCustomBitBtn;
  69. class PASCALIMPLEMENTATION TfcOffsets : public Classes::TPersistent 
  70. {
  71. typedef Classes::TPersistent inherited;
  73. private:
  74. Controls::TWinControl* FControl;
  75. int FGlyphX;
  76. int FGlyphY;
  77. int FTextX;
  78. int FTextY;
  79. int FTextDownX;
  80. int FTextDownY;
  81. void __fastcall SetGlyphX(int Value);
  82. void __fastcall SetGlyphY(int Value);
  83. void __fastcall SetTextX(int Value);
  84. void __fastcall SetTextY(int Value);
  86. protected:
  87. virtual void __fastcall AssignTo(Classes::TPersistent* Dest);
  88. __property Controls::TWinControl* Control = {read=FControl};
  90. public:
  91. __fastcall TfcOffsets(TfcCustomBitBtn* Button);
  93. __published:
  94. __property int GlyphX = {read=FGlyphX, write=SetGlyphX, default=0};
  95. __property int GlyphY = {read=FGlyphY, write=SetGlyphY, default=0};
  96. __property int TextX = {read=FTextX, write=SetTextX, default=0};
  97. __property int TextY = {read=FTextY, write=SetTextY, default=0};
  98. __property int TextDownX = {read=FTextDownX, write=FTextDownX, default=1};
  99. __property int TextDownY = {read=FTextDownY, write=FTextDownY, default=1};
  100. public:
  101. #pragma option push -w-inl
  102. /* TPersistent.Destroy */ inline __fastcall virtual ~TfcOffsets(void) { }
  103. #pragma option pop
  105. };
  108. class DELPHICLASS TfcShadeColors;
  109. class PASCALIMPLEMENTATION TfcShadeColors : public Classes::TPersistent 
  110. {
  111. typedef Classes::TPersistent inherited;
  113. private:
  114. TfcCustomBitBtn* FButton;
  115. Graphics::TColor FBtnHighlight;
  116. Graphics::TColor FBtn3dLight;
  117. Graphics::TColor FBtnShadow;
  118. Graphics::TColor FBtnBlack;
  119. Graphics::TColor FBtnFocus;
  120. Graphics::TColor FShadow;
  121. void __fastcall SetBtn3DLight(Graphics::TColor Value);
  122. void __fastcall SetBtnBlack(Graphics::TColor Value);
  123. void __fastcall SetBtnHighlight(Graphics::TColor Value);
  124. void __fastcall SetBtnShadow(Graphics::TColor Value);
  125. void __fastcall SetBtnFocus(Graphics::TColor Value);
  126. void __fastcall SetShadow(Graphics::TColor Value);
  128. protected:
  129. virtual void __fastcall AssignTo(Classes::TPersistent* Dest);
  131. public:
  132. __fastcall TfcShadeColors(TfcCustomBitBtn* Button);
  134. __published:
  135. __property Graphics::TColor Btn3DLight = {read=FBtn3dLight, write=SetBtn3DLight, default=-16777194};
  136. __property Graphics::TColor BtnHighlight = {read=FBtnHighlight, write=SetBtnHighlight, default=-16777196};
  137. __property Graphics::TColor BtnShadow = {read=FBtnShadow, write=SetBtnShadow, default=-16777200};
  138. __property Graphics::TColor BtnBlack = {read=FBtnBlack, write=SetBtnBlack, default=0};
  139. __property Graphics::TColor BtnFocus = {read=FBtnFocus, write=SetBtnFocus, default=0};
  140. __property Graphics::TColor Shadow = {read=FShadow, write=SetShadow, default=0};
  141. public:
  142. #pragma option push -w-inl
  143. /* TPersistent.Destroy */ inline __fastcall virtual ~TfcShadeColors(void) { }
  144. #pragma option pop
  146. };
  149. class PASCALIMPLEMENTATION TfcCustomBitBtn : public Controls::TWinControl 
  150. {
  151. typedef Controls::TWinControl inherited;
  153. private:
  154. bool FActive;
  155. bool FAllowAllUp;
  156. bool FCancel;
  157. bool FDefault;
  158. bool FDown;
  159. Graphics::TBitmap* FGlyph;
  160. int FGroupIndex;
  161. bool FInMouseSendForMouseActivate;
  162. Buttons::TBitBtnKind FKind;
  163. Buttons::TButtonLayout FLayout;
  164. int FMargin;
  165. Controls::TModalResult FModalResult;
  166. Buttons::TNumGlyphs FNumGlyphs;
  167. HRGN FRegion;
  168. HRGN FLastRegion;
  169. TfcShadeColors* FShadeColors;
  170. TfcShadeStyle FShadeStyle;
  171. bool FShowFocusRect;
  172. int FSpacing;
  173. Buttons::TButtonStyle FStyle;
  174. Fctext::TfcCaptionText* FTextOptions;
  175. bool FSmoothFont;
  176. #pragma pack(push, 1)
  177. Types::TRect FGlyphRect;
  178. #pragma pack(pop)
  180. #pragma pack(push, 1)
  181. Types::TRect FTextRect;
  182. #pragma pack(pop)
  184. Classes::TNotifyEvent FOnMouseEnter;
  185. Classes::TNotifyEvent FOnMouseLeave;
  186. Classes::TNotifyEvent FOnSelChange;
  187. Classes::TNotifyEvent FOnSetName;
  188. Graphics::TCanvas* FCanvas;
  189. TfcOffsets* FOffsets;
  190. bool FModifiedGlyph;
  191. TfcButtonOptions FOptions;
  192. Classes::TList* FChangeLinks;
  193. Fcchangelink::TfcChangeLink* FChangeLink;
  194. bool FClicked;
  195. bool FInitialDown;
  196. Classes::TStringList* FEvents;
  197. bool FUseHalftonePalette;
  198. bool FShowDownAsUp;
  199. bool FHot;
  200. Dbctrls::TFieldDataLink* FDataLink;
  201. bool FDisableThemes;
  202. bool FStaticCaption;
  203. Buttons::TBitBtnKind __fastcall GetKind(void);
  204. void __fastcall SetAllowAllUp(bool Value);
  205. void __fastcall SetButtonDown(bool Value, bool CheckAllowAllUp, bool DoUpdateExclusive, bool DoInvalidate);
  206. void __fastcall SetDefault(bool Value);
  207. void __fastcall SetDown(bool Value);
  208. void __fastcall SetGlyph(Graphics::TBitmap* Value);
  209. void __fastcall SetGroupIndex(int Value);
  210. void __fastcall SetKind(Buttons::TBitBtnKind Value);
  211. void __fastcall SetLayout(Buttons::TButtonLayout Value);
  212. void __fastcall SetMargin(int Value);
  213. void __fastcall SetNumGlyphs(Buttons::TNumGlyphs Value);
  214. void __fastcall SetOptions(TfcButtonOptions Value);
  215. void __fastcall SetSpacing(int Value);
  216. void __fastcall SetShadeStyle(TfcShadeStyle Value);
  217. void __fastcall SetStyle(Buttons::TButtonStyle Value);
  218. HIDESBASE MESSAGE void __fastcall WMCancelMode(Messages::TWMNoParams &Message);
  219. MESSAGE void __fastcall CMGetDataLink(Messages::TMessage &Message);
  220. HIDESBASE MESSAGE void __fastcall CMDialogKey(Messages::TWMKey &Message);
  221. MESSAGE void __fastcall CMButtonPressed(Messages::TMessage &Message);
  222. HIDESBASE MESSAGE void __fastcall CMDialogChar(Messages::TWMKey &Message);
  223. HIDESBASE MESSAGE void __fastcall CMEnabledChanged(Messages::TMessage &Message);
  224. HIDESBASE MESSAGE void __fastcall CMFocusChanged(Controls::TCMFocusChanged &Message);
  225. HIDESBASE MESSAGE void __fastcall CMMouseEnter(Messages::TMessage &Message);
  226. HIDESBASE MESSAGE void __fastcall CMMouseLeave(Messages::TMessage &Message);
  227. MESSAGE void __fastcall CNDrawItem(Messages::TWMDrawItem &Message);
  228. MESSAGE void __fastcall CNMeasureItem(Messages::TWMMeasureItem &Message);
  229. HIDESBASE MESSAGE void __fastcall WMEraseBkgnd(Messages::TWMEraseBkgnd &Message);
  230. HIDESBASE MESSAGE void __fastcall WMLButtonDown(Messages::TWMMouse &Message);
  231. MESSAGE void __fastcall WMMouseActivate(Messages::TWMMouseActivate &Message);
  232. HIDESBASE MESSAGE void __fastcall WMSize(Messages::TWMSize &Message);
  233. HIDESBASE MESSAGE void __fastcall WMPaint(Messages::TWMPaint &Message);
  234. void __fastcall ProcessMouseUp(int X, int Y, bool AMouseInControl, bool AClicked);
  235. void __fastcall ProcessMouseDown(void);
  236. AnsiString __fastcall GetDataField();
  237. Db::TDataSource* __fastcall GetDataSource(void);
  238. void __fastcall SetDataField(const AnsiString Value);
  239. void __fastcall SetDataSource(Db::TDataSource* Value);
  241. protected:
  242. TfcRegionData FDownRegionData;
  243. TfcRegionData FRegionData;
  244. bool FSelected;
  245. bool DisableButton;
  246. Db::TField* __fastcall GetField(void);
  247. virtual AnsiString __fastcall GetDBCaption();
  248. DYNAMIC HPALETTE __fastcall GetPalette(void);
  249. DYNAMIC void __fastcall ActionChange(System::TObject* Sender, bool CheckDefaults);
  250. virtual void __fastcall AssignTo(Classes::TPersistent* Dest);
  251. virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
  252. virtual void __fastcall CreateWnd(void);
  253. virtual void __fastcall DestroyWnd(void);
  254. virtual void __fastcall DefineProperties(Classes::TFiler* Filer);
  255. virtual void __fastcall Loaded(void);
  256. DYNAMIC void __fastcall KeyDown(Word &Key, Classes::TShiftState Shift);
  257. DYNAMIC void __fastcall MouseDown(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
  258. DYNAMIC void __fastcall MouseMove(Classes::TShiftState Shift, int X, int Y);
  259. DYNAMIC void __fastcall MouseUp(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
  260. virtual void __fastcall SetName(const AnsiString Value);
  261. void __fastcall GetEvents(const AnsiString s);
  262. virtual TfcOffsets* __fastcall CreateOffsets(void);
  263. virtual HRGN __fastcall CreateRegion(bool DoImplementation, bool Down);
  264. virtual Types::TRect __fastcall CalcButtonLayout(Graphics::TCanvas* Canvas, const Types::TRect &Client, Types::TRect &TextRect, Types::TRect &GlyphRect, const tagSIZE &TextSize);
  265. virtual int __fastcall GlyphWidth(void);
  266. virtual bool __fastcall IsCustom(void);
  267. virtual bool __fastcall IsCustomCaption(void);
  268. bool __fastcall MouseInControl(int X, int Y, bool AndClicked);
  269. virtual bool __fastcall StoreRegionData(void);
  270. virtual void __fastcall ChangeButtonDown(void);
  271. virtual void __fastcall CleanUp(void);
  272. virtual void __fastcall ClearRegion(PfcRegionData ARgnData);
  273. virtual void __fastcall DrawButtonGlyph(Graphics::TCanvas* Canvas, const Types::TPoint &GlyphPos);
  274. virtual void __fastcall DrawButtonText(Graphics::TCanvas* Canvas, const Types::TRect &TextBounds);
  275. virtual void __fastcall DrawItem(const tagDRAWITEMSTRUCT &DrawItemStruct);
  276. virtual void __fastcall GetDrawBitmap(Fcbitmap::TfcBitmap* DrawBitmap, bool ForRegion, TfcShadeStyle ShadeStyle, bool Down);
  277. virtual void __fastcall GlyphChanged(System::TObject* Sender);
  278. virtual void __fastcall NotifyChange(void);
  279. virtual void __fastcall NotifyChanging(void);
  280. virtual void __fastcall NotifyLoaded(void);
  281. virtual void __fastcall Paint(void);
  282. virtual void __fastcall Redraw(void);
  283. virtual void __fastcall ReadRegionData(Classes::TStream* Stream);
  284. virtual void __fastcall ReadDownRegionData(Classes::TStream* Stream);
  285. virtual void __fastcall SaveRegion(unsigned NewRegion, bool Down);
  286. virtual void __fastcall SelChange(void);
  287. virtual void __fastcall WndProc(Messages::TMessage &Message);
  288. virtual void __fastcall WriteRegionData(Classes::TStream* Stream);
  289. virtual void __fastcall WriteDownRegionData(Classes::TStream* Stream);
  290. virtual void __fastcall UpdateExclusive(void);
  291. virtual bool __fastcall UseRegions(void);
  292. __property bool Active = {read=FActive, nodefault};
  293. __property Graphics::TCanvas* Canvas = {read=FCanvas};
  294. __property Types::TRect GlyphRect = {read=FGlyphRect};
  295. __property Types::TRect TextRect = {read=FTextRect};
  296. __property bool InitalDown = {read=FInitialDown, nodefault};
  297. __property bool Clicked = {read=FClicked, nodefault};
  298. virtual void __fastcall DataChange(System::TObject* Sender);
  299. virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation);
  301. public:
  302. Variant BasePatch;
  303. __property HRGN Region = {read=FRegion, nodefault};
  304. __fastcall virtual TfcCustomBitBtn(Classes::TComponent* AOwner);
  305. __fastcall virtual ~TfcCustomBitBtn(void);
  306. virtual void __fastcall ApplyRegion(void);
  307. virtual void __fastcall InvalidateNotRegion(const bool Erase);
  308. virtual Types::TRect __fastcall Draw(Graphics::TCanvas* Canvas);
  309. virtual bool __fastcall IsMultipleRegions(void);
  310. DYNAMIC void __fastcall Click(void);
  311. virtual void __fastcall SizeToDefault(void);
  312. virtual void __fastcall UpdateShadeColors(Graphics::TColor Color);
  313. virtual void __fastcall RegisterChanges(Fcchangelink::TfcChangeLink* Value);
  314. virtual void __fastcall UnRegisterChanges(Fcchangelink::TfcChangeLink* Value);
  315. virtual bool __fastcall GetTextEnabled(void);
  316. virtual void __fastcall AdjustBounds(void);
  317. __property bool ShowDownAsUp = {read=FShowDownAsUp, write=FShowDownAsUp, default=0};
  318. __property bool StaticCaption = {read=FStaticCaption, write=FStaticCaption, default=0};
  319. __property bool AllowAllUp = {read=FAllowAllUp, write=SetAllowAllUp, default=0};
  320. __property bool Cancel = {read=FCancel, write=FCancel, default=0};
  321. __property Caption  = {stored=IsCustomCaption};
  322. __property Color  = {default=-16777211};
  323. __property bool Default = {read=FDefault, write=SetDefault, default=0};
  324. __property bool Down = {read=FDown, write=SetDown, default=0};
  325. __property Font ;
  326. __property TfcOffsets* Offsets = {read=FOffsets, write=FOffsets};
  327. __property Graphics::TBitmap* Glyph = {read=FGlyph, write=SetGlyph, stored=IsCustom};
  328. __property int GroupIndex = {read=FGroupIndex, write=SetGroupIndex, default=0};
  329. __property Buttons::TBitBtnKind Kind = {read=GetKind, write=SetKind, default=0};
  330. __property Buttons::TButtonLayout Layout = {read=FLayout, write=SetLayout, default=0};
  331. __property int Margin = {read=FMargin, write=SetMargin, default=-1};
  332. __property Controls::TModalResult ModalResult = {read=FModalResult, write=FModalResult, default=0};
  333. __property Buttons::TNumGlyphs NumGlyphs = {read=FNumGlyphs, write=SetNumGlyphs, stored=IsCustom, default=1};
  334. __property TfcButtonOptions Options = {read=FOptions, write=SetOptions, default=0};
  335. __property bool Selected = {read=FSelected, nodefault};
  336. __property TfcShadeColors* ShadeColors = {read=FShadeColors, write=FShadeColors};
  337. __property TfcShadeStyle ShadeStyle = {read=FShadeStyle, write=SetShadeStyle, nodefault};
  338. __property bool SmoothFont = {read=FSmoothFont, write=FSmoothFont, default=0};
  339. __property Buttons::TButtonStyle Style = {read=FStyle, write=SetStyle, default=0};
  340. __property int Spacing = {read=FSpacing, write=SetSpacing, default=4};
  341. __property TabStop  = {default=0};
  342. __property Fctext::TfcCaptionText* TextOptions = {read=FTextOptions, write=FTextOptions};
  343. __property OnClick ;
  344. __property Classes::TNotifyEvent OnMouseEnter = {read=FOnMouseEnter, write=FOnMouseEnter};
  345. __property Classes::TNotifyEvent OnMouseLeave = {read=FOnMouseLeave, write=FOnMouseLeave};
  346. __property Classes::TNotifyEvent OnSelChange = {read=FOnSelChange, write=FOnSelChange};
  347. __property Classes::TNotifyEvent OnSetName = {read=FOnSetName, write=FOnSetName};
  348. __property bool UseHalftonePalette = {read=FUseHalftonePalette, write=FUseHalftonePalette, nodefault};
  349. __property bool Hot = {read=FHot, write=FHot, nodefault};
  350. __property AnsiString DataField = {read=GetDataField, write=SetDataField};
  351. __property Db::TDataSource* DataSource = {read=GetDataSource, write=SetDataSource};
  352. __property Dbctrls::TFieldDataLink* DataLink = {read=FDataLink};
  353. __property Db::TField* Field = {read=GetField};
  354. __property bool DisableThemes = {read=FDisableThemes, write=FDisableThemes, default=0};
  355. public:
  356. #pragma option push -w-inl
  357. /* TWinControl.CreateParented */ inline __fastcall TfcCustomBitBtn(HWND ParentWindow) : Controls::TWinControl(ParentWindow) { }
  358. #pragma option pop
  360. };
  363. //-- var, const, procedure ---------------------------------------------------
  364. #pragma error Unsupported symbol type (23, fcButton)
  365. static const Shortint DESIGN_KEY = 0x12;
  367. } /* namespace Fcbutton */
  368. using namespace Fcbutton;
  369. #pragma option pop // -w-
  370. #pragma option pop // -Vx
  372. #pragma delphiheader end.
  373. //-- end unit ----------------------------------------------------------------
  374. #endif // fcButton