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

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

Delphi控件源码

开发平台：

Delphi

fccolorcombo.hpp：源码内容
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1999 by Borland International
  3. // All rights reserved
  5. // (DO NOT EDIT: machine generated header) 'fcColorCombo.pas' rev: 5.00
  7. #ifndef fcColorComboHPP
  8. #define fcColorComboHPP
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #pragma option push -Vx
  13. #include <fcframe.hpp> // Pascal unit
  14. #include <Grids.hpp> // Pascal unit
  15. #include <Db.hpp> // Pascal unit
  16. #include <DBCtrls.hpp> // Pascal unit
  17. #include <fcCommon.hpp> // Pascal unit
  18. #include <fcCombo.hpp> // Pascal unit
  19. #include <Menus.hpp> // Pascal unit
  20. #include <StdCtrls.hpp> // Pascal unit
  21. #include <Dialogs.hpp> // Pascal unit
  22. #include <Forms.hpp> // Pascal unit
  23. #include <Controls.hpp> // Pascal unit
  24. #include <Graphics.hpp> // Pascal unit
  25. #include <Classes.hpp> // Pascal unit
  26. #include <SysUtils.hpp> // Pascal unit
  27. #include <Messages.hpp> // Pascal unit
  28. #include <Windows.hpp> // Pascal unit
  29. #include <SysInit.hpp> // Pascal unit
  30. #include <System.hpp> // Pascal unit
  32. //-- user supplied -----------------------------------------------------------
  34. namespace Fccolorcombo
  35. {
  36. //-- type declarations -------------------------------------------------------
  37. #pragma option push -b-
  38. enum TfcOwnerDrawState { odsChecked, odsComboBoxEdit, odsDefault, odsDisabled, odsFocus, odsGrayed, 
  39. odsSelected };
  40. #pragma option pop
  42. typedef Set<TfcOwnerDrawState, odsChecked, odsSelected>  TfcOwnerDrawStates;
  44. #pragma option push -b-
  45. enum TfcSortByOption { csoNone, csoByRGB, csoByIntensity, csoByName };
  46. #pragma option pop
  48. #pragma option push -b-
  49. enum TfcColorListBoxOption { ccoShowSystemColors, ccoShowColorNone, ccoShowCustomColors, ccoShowStandardColors, 
  50. ccoShowColorNames, ccoShowGreyScale, ccoGroupSystemColors };
  51. #pragma option pop
  53. typedef Set<TfcColorListBoxOption, ccoShowSystemColors, ccoGroupSystemColors>  TfcColorListBoxOptions
  54. ;
  56. #pragma option push -b-
  57. enum TfcColorDialogOption { cdoEnabled, cdoPreventFullOpen, cdoFullOpen, cdoSolidColor, cdoAnyColor 
  58. };
  59. #pragma option pop
  61. typedef Set<TfcColorDialogOption, cdoEnabled, cdoAnyColor>  TfcColorDialogOptions;
  63. typedef void __fastcall (__closure *TfcColorDialogEvent)(System::TObject* Sender, Dialogs::TColorDialog* 
  64. Dialog);
  66. typedef void __fastcall (__closure *TfcCloseColorDialogEvent)(System::TObject* Sender, Dialogs::TColorDialog* 
  67. Dialog, Forms::TModalResult MResult, bool &Accept);
  69. typedef void __fastcall (__closure *TfcAddNewColorEvent)(System::TObject* Sender, Graphics::TColor AColor
  70. , AnsiString &AColorName, bool &Accept);
  72. typedef void __fastcall (__closure *TfcOnFilterColorEvent)(System::TObject* Sender, Graphics::TColor 
  73. AColor, AnsiString AColorName, bool &Accept);
  75. class DELPHICLASS TfcColorListFiller;
  76. class PASCALIMPLEMENTATION TfcColorListFiller : public System::TObject 
  77. {
  78. typedef System::TObject inherited;
  80. private:
  81. TfcColorListBoxOptions FOptions;
  82. Classes::TStringList* FList;
  84. public:
  85. void __fastcall ColorCallbackProc(const AnsiString s);
  86. void __fastcall FillColorList(Classes::TStringList* &AList, TfcColorListBoxOptions AOptions, AnsiString 
  87. NoneString);
  88. public:
  89. #pragma option push -w-inl
  90. /* TObject.Create */ inline __fastcall TfcColorListFiller(void) : System::TObject() { }
  91. #pragma option pop
  92. #pragma option push -w-inl
  93. /* TObject.Destroy */ inline __fastcall virtual ~TfcColorListFiller(void) { }
  94. #pragma option pop
  96. };
  99. class DELPHICLASS TfcCustomColorList;
  100. class PASCALIMPLEMENTATION TfcCustomColorList : public Stdctrls::TCustomListBox 
  101. {
  102. typedef Stdctrls::TCustomListBox inherited;
  104. private:
  105. Classes::TAlignment FAlignment;
  106. Classes::TAlignment FColorAlignment;
  107. int FColorWidth;
  108. TfcColorListBoxOptions FOptions;
  109. Classes::TStringList* FCustomColors;
  110. Graphics::TColor FHighlightColor;
  111. Graphics::TColor FHighlightTextColor;
  112. Classes::TStringList* FAllColors;
  113. Graphics::TColor FSelectedColor;
  114. Graphics::TColor FOldSelectedColor;
  115. TfcSortByOption FSortByOption;
  116. Classes::TStringList* FTempColors;
  117. int FGreyScaleIncrement;
  118. AnsiString FNoneString;
  119. TfcAddNewColorEvent FOnAddNewColor;
  120. TfcOnFilterColorEvent FOnFilterColor;
  121. int FPrevItem;
  122. Windows::TPoint FLastPoint;
  123. bool FCloseOnUp;
  124. Classes::TList* ItemIDMap;
  125. bool FClickedInControl;
  126. bool FIgnoreMouseScroll;
  127. bool FListBoxUpdated;
  128. int FColorMargin;
  129. HIDESBASE MESSAGE void __fastcall WMNCHitTest(Messages::TWMNCHitTest &Message);
  130. HIDESBASE MESSAGE void __fastcall WMLButtonDown(Messages::TWMMouse &Message);
  131. HIDESBASE MESSAGE void __fastcall CNDrawItem(Messages::TWMDrawItem &Message);
  132. void __fastcall SetAlignment(Classes::TLeftRight Value);
  133. void __fastcall SetColorAlignment(Classes::TLeftRight Value);
  134. void __fastcall SetOptions(TfcColorListBoxOptions Value);
  135. void __fastcall SetColorWidth(int Value);
  136. void __fastcall SetColorMargin(int Value);
  137. void __fastcall SetSelectedColor(Graphics::TColor Value);
  138. void __fastcall SetNoneString(AnsiString Value);
  139. void __fastcall SetGreyScaleIncrement(int Value);
  140. void __fastcall SetSortBy(TfcSortByOption Value);
  141. void __fastcall SetCustomColors(Classes::TStringList* Value);
  142. Graphics::TColor __fastcall GetSelectedColor(void);
  143. int __fastcall GetEditRectHeight(void);
  144. HIDESBASE int __fastcall GetItemIndex(void);
  145. HIDESBASE void __fastcall SetItemIndex(int Value);
  146. Graphics::TColor __fastcall GetHighlightColor(void);
  147. Graphics::TColor __fastcall GetHighlightTextColor(void);
  148. HIDESBASE MESSAGE void __fastcall WMSize(Messages::TWMSize &Message);
  150. protected:
  151. virtual bool __fastcall AddToAllColors(AnsiString AName, AnsiString AValue);
  152. DYNAMIC void __fastcall Click(void);
  153. virtual void __fastcall CreateWnd(void);
  154. virtual void __fastcall CustomColorsChangeEvent(System::TObject* Sender);
  155. virtual bool __fastcall HasDuplicateNames(AnsiString &dup);
  156. virtual void __fastcall Loaded(void);
  157. DYNAMIC void __fastcall MouseMove(Classes::TShiftState Shift, int X, int Y);
  158. DYNAMIC void __fastcall MouseUp(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int 
  159. Y);
  160. virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
  162. public:
  163. Variant Patch;
  164. __fastcall virtual TfcCustomColorList(Classes::TComponent* AOwner);
  165. __fastcall virtual ~TfcCustomColorList(void);
  166. virtual void __fastcall InitColorList(void);
  167. virtual void __fastcall SortList(void);
  168. virtual void __fastcall UpdateItems(void);
  169. virtual void __fastcall DoDrawItem(Graphics::TCanvas* ACanvas, int Index, int CWidth, int CHeight, 
  170. const Windows::TRect &Rect, Windows::TOwnerDrawState State, AnsiString Text, Graphics::TColor AColor
  171. );
  172. virtual Graphics::TColor __fastcall ColorFromIndex(int Index);
  173. __property Graphics::TColor SelectedColor = {read=GetSelectedColor, write=SetSelectedColor, nodefault
  174. };
  175. __property Graphics::TColor OldSelectedColor = {read=FOldSelectedColor, write=FOldSelectedColor, nodefault
  176. };
  177. __property Classes::TStringList* AllColors = {read=FAllColors};
  178. __property Classes::TLeftRight Alignment = {read=FAlignment, write=SetAlignment, default=0};
  179. __property Classes::TLeftRight ColorAlignment = {read=FColorAlignment, write=SetColorAlignment, default=0
  180. };
  181. __property int ColorMargin = {read=FColorMargin, write=SetColorMargin, default=2};
  182. __property int ColorWidth = {read=FColorWidth, write=SetColorWidth, nodefault};
  183. __property Classes::TStringList* CustomColors = {read=FCustomColors, write=SetCustomColors};
  184. __property int GreyScaleIncrement = {read=FGreyScaleIncrement, write=SetGreyScaleIncrement, default=15
  185. };
  186. __property Graphics::TColor HighlightColor = {read=FHighlightColor, write=FHighlightColor, nodefault
  187. };
  188. __property Graphics::TColor HighlightTextColor = {read=FHighlightTextColor, write=FHighlightTextColor
  189. , nodefault};
  190. __property ItemIndex  = {read=GetItemIndex, write=SetItemIndex};
  191. __property AnsiString NoneString = {read=FNoneString, write=SetNoneString};
  192. __property TfcColorListBoxOptions Options = {read=FOptions, write=SetOptions, nodefault};
  193. __property TfcSortByOption SortBy = {read=FSortByOption, write=SetSortBy, default=0};
  194. __property TfcAddNewColorEvent OnAddNewColor = {read=FOnAddNewColor, write=FOnAddNewColor};
  195. __property TfcOnFilterColorEvent OnFilterColor = {read=FOnFilterColor, write=FOnFilterColor};
  196. public:
  198. #pragma option push -w-inl
  199. /* TWinControl.CreateParented */ inline __fastcall TfcCustomColorList(HWND ParentWindow) : Stdctrls::TCustomListBox(
  200. ParentWindow) { }
  201. #pragma option pop
  203. };
  206. class DELPHICLASS TfcColorList;
  207. class PASCALIMPLEMENTATION TfcColorList : public TfcCustomColorList 
  208. {
  209. typedef TfcCustomColorList inherited;
  211. __published:
  212. __property Anchors ;
  213. __property Constraints ;
  214. __property Align ;
  215. __property Alignment ;
  216. __property BorderStyle ;
  217. __property Color ;
  218. __property ColorAlignment ;
  219. __property ColorMargin ;
  220. __property ColorWidth ;
  221. __property Columns ;
  222. __property Ctl3D ;
  223. __property CustomColors ;
  224. __property DragCursor ;
  225. __property DragMode ;
  226. __property Enabled ;
  227. __property ExtendedSelect ;
  228. __property Font ;
  229. __property GreyScaleIncrement ;
  230. __property ImeMode ;
  231. __property ImeName ;
  232. __property IntegralHeight ;
  233. __property MultiSelect ;
  234. __property NoneString ;
  235. __property Options ;
  236. __property ParentCtl3D ;
  237. __property ParentFont ;
  238. __property ParentShowHint ;
  239. __property PopupMenu ;
  240. __property SelectedColor ;
  241. __property SortBy ;
  242. __property OnAddNewColor ;
  243. __property OnFilterColor ;
  244. __property OnClick ;
  245. __property OnContextPopup ;
  246. __property OnDblClick ;
  247. __property OnDragDrop ;
  248. __property OnDragOver ;
  249. __property OnEndDrag ;
  250. __property OnEnter ;
  251. __property OnExit ;
  252. __property OnKeyDown ;
  253. __property OnKeyPress ;
  254. __property OnKeyUp ;
  255. __property OnMouseDown ;
  256. __property OnMouseMove ;
  257. __property OnMouseUp ;
  258. __property OnStartDrag ;
  259. __property ParentColor ;
  260. __property ShowHint ;
  261. __property TabOrder ;
  262. __property Visible ;
  263. __property ItemHeight ;
  264. public:
  265. #pragma option push -w-inl
  266. /* TfcCustomColorList.Create */ inline __fastcall virtual TfcColorList(Classes::TComponent* AOwner)
  267.  : TfcCustomColorList(AOwner) { }
  268. #pragma option pop
  269. #pragma option push -w-inl
  270. /* TfcCustomColorList.Destroy */ inline __fastcall virtual ~TfcColorList(void) { }
  271. #pragma option pop
  273. public:
  274. #pragma option push -w-inl
  275. /* TWinControl.CreateParented */ inline __fastcall TfcColorList(HWND ParentWindow) : TfcCustomColorList(
  276. ParentWindow) { }
  277. #pragma option pop
  279. };
  282. class DELPHICLASS TfcColorListOptions;
  283. class DELPHICLASS TfcCustomColorCombo;
  284. #pragma option push -b-
  285. enum TfcColorComboDataType { ccdColorName, ccdColor };
  286. #pragma option pop
  288. class PASCALIMPLEMENTATION TfcCustomColorCombo : public Fccombo::TfcCustomCombo 
  289. {
  290. typedef Fccombo::TfcCustomCombo inherited;
  292. private:
  293. Classes::TAlignment FAlignment;
  294. bool FAutoDropDown;
  295. bool InAutoDropDown;
  296. Classes::TAlignment FColorAlignment;
  297. Dialogs::TColorDialog* FColorDialog;
  298. bool FShowMatchText;
  299. Classes::TStringList* FCustomColors;
  300. TfcColorList* FListbox;
  301. Graphics::TColor FSelectedColor;
  302. int FDropDownWidth;
  303. TfcColorListOptions* FColorListOptions;
  304. Stdctrls::TDrawItemEvent FOnDrawItem;
  305. TfcColorDialogEvent FOnInitColorDialog;
  306. TfcCloseColorDialogEvent FOnCloseColorDialog;
  307. TfcColorDialogOptions FColorDialogOptions;
  308. int FItemIndex;
  309. bool SkipDataChange;
  310. bool SkipTextChange;
  311. bool SkipDropDown;
  312. bool FCloseOnUp;
  313. int FOriginalIndex;
  314. Graphics::TColor FOriginalSelectedColor;
  315. int FSelectedItemIndex;
  316. TfcAddNewColorEvent FOnAddNewColor;
  317. TfcOnFilterColorEvent FOnFilterColor;
  318. bool SetModifiedInChangeEvent;
  319. void __fastcall SetAlignment(Classes::TLeftRight Value);
  320. void __fastcall SetColorAlignment(Classes::TLeftRight Value);
  321. void __fastcall SetCustomColors(Classes::TStringList* Value);
  322. void __fastcall SetItemIndex(int Value);
  323. void __fastcall SetSelectedColor(Graphics::TColor Value);
  324. void __fastcall CustomColorsChangeEvent(System::TObject* Sender);
  325. void __fastcall ListMouseUp(System::TObject* Sender, Controls::TMouseButton Button, Classes::TShiftState 
  326. Shift, int X, int Y);
  327. void __fastcall ListMouseDown(System::TObject* Sender, Controls::TMouseButton Button, Classes::TShiftState 
  328. Shift, int X, int Y);
  329. HIDESBASE MESSAGE void __fastcall CMExit(Messages::TWMNoParams &Message);
  330. HIDESBASE MESSAGE void __fastcall CMTextChanged(Messages::TMessage &Message);
  331. HIDESBASE MESSAGE void __fastcall CNCommand(Messages::TWMCommand &Message);
  332. HIDESBASE MESSAGE void __fastcall CNKeyDown(Messages::TWMKey &Message);
  333. HIDESBASE MESSAGE void __fastcall WMLButtonDblClk(Messages::TWMMouse &Message);
  334. HIDESBASE MESSAGE void __fastcall WMPaste(Messages::TMessage &Message);
  335. HIDESBASE MESSAGE void __fastcall WMSetFocus(Messages::TWMSetFocus &Message);
  336. AnsiString __fastcall GetSelectedColorString(void);
  337. void __fastcall SetSelectedColorString(AnsiString Value);
  338. void __fastcall UpdateSelectedColor(void);
  339. Classes::TLeftRight __fastcall GetEffectiveAlignment(void);
  341. protected:
  342. DYNAMIC void __fastcall Change(void);
  343. virtual void __fastcall AddNewColorEvent(System::TObject* Sender, Graphics::TColor AColor, AnsiString 
  344. &AColorName, bool &Accept);
  345. virtual void __fastcall OnFilterColorEvent(System::TObject* Sender, Graphics::TColor AColor, AnsiString 
  346. AColorName, bool &Accept);
  347. virtual Graphics::TColor __fastcall GetComboColor(int Index);
  348. virtual TfcColorComboDataType __fastcall GetComboDataType(void);
  349. virtual AnsiString __fastcall GetComboDisplayText(int Value);
  350. virtual Windows::TRect __fastcall GetTextRect(const Windows::TRect &ARect, bool Highlight);
  351. virtual void __fastcall ListBoxNeeded(void);
  352. virtual void __fastcall PaintToCanvas(Graphics::TCanvas* ACanvas, const Windows::TRect &Rect, bool 
  353. Highlight, bool GridPaint, AnsiString Text);
  354. virtual void __fastcall Paint(void);
  355. virtual void __fastcall CreateWnd(void);
  356. virtual void __fastcall DataChange(System::TObject* Sender);
  357. virtual bool __fastcall Editable(void);
  358. virtual bool __fastcall EditCanModify(void);
  359. virtual Controls::TWinControl* __fastcall GetDropDownControl(void);
  360. virtual Controls::TWinControl* __fastcall GetDropDownContainer(void);
  361. virtual int __fastcall GetItemCount(void);
  362. virtual tagSIZE __fastcall GetItemSize(void);
  363. virtual void __fastcall HideCaret(void);
  364. DYNAMIC void __fastcall KeyDown(Word &Key, Classes::TShiftState Shift);
  365. DYNAMIC void __fastcall KeyPress(char &Key);
  366. DYNAMIC void __fastcall KeyUp(Word &Key, Classes::TShiftState Shift);
  367. virtual int __fastcall GetIndentLeft(const Windows::TRect &Rect);
  368. virtual int __fastcall GetRightIndent(const Windows::TRect &Rect);
  369. virtual int __fastcall GetTopIndent(void);
  370. virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation
  371. );
  372. virtual void __fastcall DrawColorRect(Graphics::TCanvas* ACanvas, const Windows::TRect &Rect, Graphics::TColor 
  373. CurColor, bool Highlight);
  374. virtual void __fastcall SetComboText(AnsiString Value);
  375. virtual void __fastcall SetEditRect(void);
  376. virtual void __fastcall ShowCaret(void);
  377. virtual void __fastcall UpdateData(System::TObject* Sender);
  378. virtual void __fastcall WndProc(Messages::TMessage &Message);
  379. __property Stdctrls::TDrawItemEvent OnDrawItem = {read=FOnDrawItem, write=FOnDrawItem};
  381. public:
  382. __fastcall virtual TfcCustomColorCombo(Classes::TComponent* AOwner);
  383. __fastcall virtual ~TfcCustomColorCombo(void);
  384. virtual void __fastcall SelectAll(void);
  385. virtual void __fastcall CloseUp(bool Accept);
  386. AnsiString __fastcall ColorString(AnsiString s);
  387. bool __fastcall IsCustomColor(AnsiString s);
  388. virtual bool __fastcall IsDroppedDown(void);
  389. virtual void __fastcall DrawInGridCell(Graphics::TCanvas* ACanvas, const Windows::TRect &Rect, Grids::TGridDrawState 
  390. State);
  391. virtual void __fastcall DropDown(void);
  392. virtual bool __fastcall ExecuteColorDialog(void);
  393. bool __fastcall GetColorFromRGBString(AnsiString RGBString, Graphics::TColor &AColor);
  394. void __fastcall GetColorRectInfo(const Windows::TRect &Rect, int &AWidth, int &AHeight);
  395. virtual void __fastcall RefreshList(void);
  396. __property TfcColorList* ListBox = {read=FListbox};
  397. __property bool DroppedDown = {read=IsDroppedDown, nodefault};
  398. __property Graphics::TColor SelectedColor = {read=FSelectedColor, write=SetSelectedColor, nodefault
  399. };
  400. __property Classes::TLeftRight UnboundAlignment = {read=GetEffectiveAlignment, write=SetAlignment, 
  401. default=0};
  402. __property bool AutoDropDown = {read=FAutoDropDown, write=FAutoDropDown, default=0};
  403. __property ButtonStyle ;
  404. __property Classes::TLeftRight ColorAlignment = {read=FColorAlignment, write=SetColorAlignment, default=0
  405. };
  406. __property Dialogs::TColorDialog* ColorDialog = {read=FColorDialog, write=FColorDialog};
  407. __property TfcColorDialogOptions ColorDialogOptions = {read=FColorDialogOptions, write=FColorDialogOptions
  408. , default=2};
  409. __property TfcColorListOptions* ColorListOptions = {read=FColorListOptions, write=FColorListOptions
  410. };
  411. __property Classes::TStringList* CustomColors = {read=FCustomColors, write=SetCustomColors};
  412. __property AnsiString SelectedColorString = {read=GetSelectedColorString, write=SetSelectedColorString
  413. };
  414. __property int DropDownWidth = {read=FDropDownWidth, write=FDropDownWidth, default=0};
  415. __property int ItemIndex = {read=FItemIndex, write=SetItemIndex, nodefault};
  416. __property bool ShowMatchText = {read=FShowMatchText, write=FShowMatchText, default=1};
  417. __property TfcAddNewColorEvent OnAddNewColor = {read=FOnAddNewColor, write=FOnAddNewColor};
  418. __property TfcOnFilterColorEvent OnFilterColor = {read=FOnFilterColor, write=FOnFilterColor};
  419. __property TfcColorDialogEvent OnInitColorDialog = {read=FOnInitColorDialog, write=FOnInitColorDialog
  420. };
  421. __property TfcCloseColorDialogEvent OnCloseColorDialog = {read=FOnCloseColorDialog, write=FOnCloseColorDialog
  422. };
  423. public:
  424. #pragma option push -w-inl
  425. /* TWinControl.CreateParented */ inline __fastcall TfcCustomColorCombo(HWND ParentWindow) : Fccombo::TfcCustomCombo(
  426. ParentWindow) { }
  427. #pragma option pop
  429. };
  432. class PASCALIMPLEMENTATION TfcColorListOptions : public Classes::TPersistent 
  433. {
  434. typedef Classes::TPersistent inherited;
  436. private:
  437. TfcCustomColorCombo* FCombo;
  438. Graphics::TColor FColor;
  439. int FColorWidth;
  440. Graphics::TFont* FFont;
  441. int FGreyScaleIncrement;
  442. bool FIntegralHeight;
  443. int FItemHeight;
  444. TfcColorListBoxOptions FOptions;
  445. TfcSortByOption FSortByOption;
  446. AnsiString FNoneString;
  447. void __fastcall SetColor(Graphics::TColor Value);
  448. void __fastcall SetColorWidth(int Value);
  449. void __fastcall SetFont(Graphics::TFont* Value);
  450. void __fastcall SetGreyScaleIncrement(int Value);
  451. void __fastcall SetIntegralHeight(bool Value);
  452. void __fastcall SetItemHeight(int Value);
  453. void __fastcall SetNoneString(AnsiString Value);
  454. void __fastcall SetSortBy(TfcSortByOption Value);
  455. bool __fastcall StoreNoneString(void);
  457. protected:
  458. void __fastcall SetOptions(TfcColorListBoxOptions Value);
  460. __published:
  461. __fastcall TfcColorListOptions(TfcCustomColorCombo* AOwner);
  462. __fastcall virtual ~TfcColorListOptions(void);
  463. __property Graphics::TColor Color = {read=FColor, write=SetColor, default=-2147483643};
  464. __property int ColorWidth = {read=FColorWidth, write=SetColorWidth, default=0};
  465. __property Graphics::TFont* Font = {read=FFont, write=SetFont};
  466. __property int GreyScaleIncrement = {read=FGreyScaleIncrement, write=SetGreyScaleIncrement, default=10
  467. };
  468. __property bool IntegralHeight = {read=FIntegralHeight, write=SetIntegralHeight, default=1};
  469. __property int ItemHeight = {read=FItemHeight, write=SetItemHeight, default=16};
  470. __property AnsiString NoneString = {read=FNoneString, write=SetNoneString, stored=StoreNoneString};
  472. __property TfcColorListBoxOptions Options = {read=FOptions, write=SetOptions, default=24};
  473. __property TfcSortByOption SortBy = {read=FSortByOption, write=SetSortBy, default=0};
  474. };
  477. class DELPHICLASS TfcColorCombo;
  478. class PASCALIMPLEMENTATION TfcColorCombo : public TfcCustomColorCombo 
  479. {
  480. typedef TfcCustomColorCombo inherited;
  482. __published:
  483. __property Controller ;
  484. __property DisableThemes ;
  485. __property Anchors ;
  486. __property BiDiMode ;
  487. __property Constraints ;
  488. __property ParentBiDiMode ;
  489. __property DataField ;
  490. __property DataSource ;
  491. __property InfoPower ;
  492. __property UnboundAlignment ;
  493. __property AlignmentVertical ;
  494. __property AllowClearKey ;
  495. __property AutoDropDown ;
  496. __property AutoSelect ;
  497. __property AutoSize ;
  498. __property ShowButton ;
  499. __property BorderStyle ;
  500. __property ButtonStyle ;
  501. __property ButtonEffects ;
  502. __property ButtonGlyph ;
  503. __property ButtonWidth ;
  504. __property CharCase ;
  505. __property Color ;
  506. __property ColorAlignment ;
  507. __property ColorDialog ;
  508. __property ColorDialogOptions ;
  509. __property ColorListOptions ;
  510. __property CustomColors ;
  511. __property Ctl3D ;
  512. __property DragMode ;
  513. __property DragCursor ;
  514. __property DropDownCount ;
  515. __property DropDownWidth ;
  516. __property Enabled ;
  517. __property Frame ;
  518. __property Font ;
  519. __property ParentColor ;
  520. __property ParentCtl3D ;
  521. __property ParentFont ;
  522. __property ParentShowHint ;
  523. __property PopupMenu ;
  524. __property ReadOnly ;
  525. __property ShowHint ;
  526. __property ShowMatchText ;
  527. __property SelectedColor ;
  528. __property Style ;
  529. __property TabOrder ;
  530. __property TabStop ;
  531. __property Visible ;
  532. __property OnAddNewColor ;
  533. __property OnFilterColor ;
  534. __property OnChange ;
  535. __property OnClick ;
  536. __property OnContextPopup ;
  537. __property OnDblClick ;
  538. __property OnDragDrop ;
  539. __property OnDragOver ;
  540. __property OnDropDown ;
  541. __property OnCloseUp ;
  542. __property OnInitColorDialog ;
  543. __property OnCloseColorDialog ;
  544. __property OnEndDrag ;
  545. __property OnEnter ;
  546. __property OnExit ;
  547. __property OnKeyDown ;
  548. __property OnKeyPress ;
  549. __property OnKeyUp ;
  550. __property OnMouseEnter ;
  551. __property OnMouseLeave ;
  552. __property OnMouseDown ;
  553. __property OnMouseMove ;
  554. __property OnMouseUp ;
  555. __property OnStartDrag ;
  556. public:
  557. #pragma option push -w-inl
  558. /* TfcCustomColorCombo.Create */ inline __fastcall virtual TfcColorCombo(Classes::TComponent* AOwner
  559. ) : TfcCustomColorCombo(AOwner) { }
  560. #pragma option pop
  561. #pragma option push -w-inl
  562. /* TfcCustomColorCombo.Destroy */ inline __fastcall virtual ~TfcColorCombo(void) { }
  563. #pragma option pop
  565. public:
  566. #pragma option push -w-inl
  567. /* TWinControl.CreateParented */ inline __fastcall TfcColorCombo(HWND ParentWindow) : TfcCustomColorCombo(
  568. ParentWindow) { }
  569. #pragma option pop
  571. };
  574. //-- var, const, procedure ---------------------------------------------------
  575. static const Shortint ColorRectMargin = 0x2;
  577. } /* namespace Fccolorcombo */
  578. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  579. using namespace Fccolorcombo;
  580. #endif
  581. #pragma option pop // -w-
  582. #pragma option pop // -Vx
  584. #pragma delphiheader end.
  585. //-- end unit ----------------------------------------------------------------
  586. #endif // fcColorCombo