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

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

Delphi控件源码

开发平台：

Delphi

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