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

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

Delphi控件源码

开发平台：

Delphi

fcImager.hpp：源码内容
  1. // Borland C++ Builder
  2. // Copyright (c) 1995, 1999 by Borland International
  3. // All rights reserved
  5. // (DO NOT EDIT: machine generated header) 'fcImager.pas' rev: 5.00
  7. #ifndef fcImagerHPP
  8. #define fcImagerHPP
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #pragma option push -Vx
  13. #include <StdCtrls.hpp> // Pascal unit
  14. #include <DBCtrls.hpp> // Pascal unit
  15. #include <Db.hpp> // Pascal unit
  16. #include <fcChangeLink.hpp> // Pascal unit
  17. #include <fcBitmap.hpp> // Pascal unit
  18. #include <fcCommon.hpp> // Pascal unit
  19. #include <Dialogs.hpp> // Pascal unit
  20. #include <Forms.hpp> // Pascal unit
  21. #include <Controls.hpp> // Pascal unit
  22. #include <Graphics.hpp> // Pascal unit
  23. #include <Classes.hpp> // Pascal unit
  24. #include <SysUtils.hpp> // Pascal unit
  25. #include <Messages.hpp> // Pascal unit
  26. #include <Windows.hpp> // Pascal unit
  27. #include <SysInit.hpp> // Pascal unit
  28. #include <System.hpp> // Pascal unit
  30. //-- user supplied -----------------------------------------------------------
  32. namespace Fcimager
  33. {
  34. //-- type declarations -------------------------------------------------------
  35. #pragma option push -b-
  36. enum TfcImagerDrawStyle { dsNormal, dsCenter, dsStretch, dsTile, dsProportional, dsProportionalCenter 
  37. };
  38. #pragma option pop
  40. class DELPHICLASS TfcRotate;
  41. class DELPHICLASS TfcBitmapOptions;
  42. class DELPHICLASS TfcAlphaBlend;
  43. class PASCALIMPLEMENTATION TfcAlphaBlend : public Classes::TPersistent 
  44. {
  45. typedef Classes::TPersistent inherited;
  47. private:
  48. TfcBitmapOptions* FBitmapOptions;
  49. Byte FAmount;
  50. Fcbitmap::TfcBitmap* FBitmap;
  51. bool FChanging;
  52. bool __fastcall GetTransparent(void);
  53. void __fastcall SetAmount(Byte Value);
  54. void __fastcall SetBitmap(Fcbitmap::TfcBitmap* Value);
  55. void __fastcall SetTransparent(bool Value);
  57. protected:
  58. virtual void __fastcall BitmapChanged(System::TObject* Sender);
  60. public:
  61. __fastcall TfcAlphaBlend(TfcBitmapOptions* BitmapOptions);
  62. __fastcall virtual ~TfcAlphaBlend(void);
  64. __published:
  65. __property Byte Amount = {read=FAmount, write=SetAmount, nodefault};
  66. __property Fcbitmap::TfcBitmap* Bitmap = {read=FBitmap, write=SetBitmap};
  67. __property bool Transparent = {read=GetTransparent, write=SetTransparent, nodefault};
  68. };
  71. class DELPHICLASS TfcWave;
  72. class PASCALIMPLEMENTATION TfcWave : public Classes::TPersistent 
  73. {
  74. typedef Classes::TPersistent inherited;
  76. private:
  77. TfcBitmapOptions* FBitmapOptions;
  78. int FXDiv;
  79. int FYDiv;
  80. int FRatio;
  81. bool FWrap;
  82. void __fastcall SetXDiv(int Value);
  83. void __fastcall SetYDiv(int Value);
  84. void __fastcall SetRatio(int Value);
  85. void __fastcall SetWrap(bool Value);
  87. public:
  88. __fastcall TfcWave(TfcBitmapOptions* BitmapOptions);
  90. __published:
  91. __property int XDiv = {read=FXDiv, write=SetXDiv, nodefault};
  92. __property int YDiv = {read=FYDiv, write=SetYDiv, nodefault};
  93. __property int Ratio = {read=FRatio, write=SetRatio, nodefault};
  94. __property bool Wrap = {read=FWrap, write=SetWrap, nodefault};
  95. public:
  96. #pragma option push -w-inl
  97. /* TPersistent.Destroy */ inline __fastcall virtual ~TfcWave(void) { }
  98. #pragma option pop
  100. };
  103. class PASCALIMPLEMENTATION TfcBitmapOptions : public Classes::TPersistent 
  104. {
  105. typedef Classes::TPersistent inherited;
  107. private:
  108. Classes::TComponent* FComponent;
  109. TfcAlphaBlend* FAlphaBlend;
  110. Graphics::TColor FColor;
  111. int FContrast;
  112. bool FEmbossed;
  113. Graphics::TColor FTintColor;
  114. int FGaussianBlur;
  115. bool FGrayScale;
  116. bool FHorizontallyFlipped;
  117. bool FInverted;
  118. int FLightness;
  119. TfcRotate* FRotation;
  120. int FSaturation;
  121. int FSharpen;
  122. int FSponge;
  123. bool FTile;
  124. bool FVerticallyFlipped;
  125. TfcWave* FWave;
  126. Classes::TNotifyEvent FOnChange;
  127. Graphics::TPicture* FOrigPicture;
  128. Fcbitmap::TfcBitmap* FDestBitmap;
  129. int FUpdateLock;
  130. void __fastcall SetColor(Graphics::TColor Value);
  131. void __fastcall SetBooleanProperty(int Index, bool Value);
  132. void __fastcall SetTintColor(Graphics::TColor Value);
  133. void __fastcall SetIntegralProperty(int Index, int Value);
  135. public:
  136. __fastcall TfcBitmapOptions(Classes::TComponent* AComponent);
  137. __fastcall virtual ~TfcBitmapOptions(void);
  138. virtual void __fastcall BeginUpdate(void);
  139. virtual void __fastcall Changed(void);
  140. void __fastcall EndUpdate(void);
  141. __property Fcbitmap::TfcBitmap* DestBitmap = {read=FDestBitmap, write=FDestBitmap};
  142. __property Graphics::TPicture* OrigPicture = {read=FOrigPicture, write=FOrigPicture};
  143. __property bool Tile = {read=FTile, write=FTile, nodefault};
  144. __property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
  146. __published:
  147. __property TfcAlphaBlend* AlphaBlend = {read=FAlphaBlend, write=FAlphaBlend};
  148. __property Graphics::TColor Color = {read=FColor, write=SetColor, nodefault};
  149. __property int Contrast = {read=FContrast, write=SetIntegralProperty, index=4, nodefault};
  150. __property bool Embossed = {read=FEmbossed, write=SetBooleanProperty, index=0, nodefault};
  151. __property Graphics::TColor TintColor = {read=FTintColor, write=SetTintColor, nodefault};
  152. __property int GaussianBlur = {read=FGaussianBlur, write=SetIntegralProperty, index=3, nodefault};
  153. __property bool GrayScale = {read=FGrayScale, write=SetBooleanProperty, index=2, nodefault};
  154. __property bool HorizontallyFlipped = {read=FHorizontallyFlipped, write=SetBooleanProperty, index=3
  155. , nodefault};
  156. __property bool Inverted = {read=FInverted, write=SetBooleanProperty, index=1, nodefault};
  157. __property int Lightness = {read=FLightness, write=SetIntegralProperty, index=0, nodefault};
  158. __property TfcRotate* Rotation = {read=FRotation, write=FRotation};
  159. __property int Saturation = {read=FSaturation, write=SetIntegralProperty, index=1, nodefault};
  160. __property int Sharpen = {read=FSharpen, write=SetIntegralProperty, index=5, nodefault};
  161. __property int Sponge = {read=FSponge, write=SetIntegralProperty, index=2, nodefault};
  162. __property bool VerticallyFlipped = {read=FVerticallyFlipped, write=SetBooleanProperty, index=4, nodefault
  163. };
  164. __property TfcWave* Wave = {read=FWave, write=FWave};
  165. };
  168. class PASCALIMPLEMENTATION TfcRotate : public Classes::TPersistent 
  169. {
  170. typedef Classes::TPersistent inherited;
  172. private:
  173. TfcBitmapOptions* FBitmapOptions;
  174. int FCenterX;
  175. int FCenterY;
  176. int FAngle;
  177. void __fastcall SetAngle(int Value);
  178. void __fastcall SetCenterX(int Value);
  179. void __fastcall SetCenterY(int Value);
  181. public:
  182. __fastcall TfcRotate(TfcBitmapOptions* BitmapOptions);
  184. __published:
  185. __property int CenterX = {read=FCenterX, write=SetCenterX, nodefault};
  186. __property int CenterY = {read=FCenterY, write=SetCenterY, nodefault};
  187. __property int Angle = {read=FAngle, write=SetAngle, nodefault};
  188. public:
  189. #pragma option push -w-inl
  190. /* TPersistent.Destroy */ inline __fastcall virtual ~TfcRotate(void) { }
  191. #pragma option pop
  193. };
  196. class DELPHICLASS TfcCustomImager;
  197. class PASCALIMPLEMENTATION TfcCustomImager : public Controls::TGraphicControl 
  198. {
  199. typedef Controls::TGraphicControl inherited;
  201. private:
  202. bool FAutoSize;
  203. TfcBitmapOptions* FBitmapOptions;
  204. TfcImagerDrawStyle FDrawStyle;
  205. bool FEraseBackground;
  206. bool FPreProcess;
  207. Fcbitmap::TfcBitmap* FWorkBitmap;
  208. Graphics::TPicture* FPicture;
  209. Classes::TList* FChangeLinks;
  210. bool FRespectPalette;
  211. bool FTransparent;
  212. Controls::TWinControl* FWinControl;
  213. Classes::TNotifyEvent FOnEnter;
  214. Classes::TNotifyEvent FOnExit;
  215. bool FFocusable;
  216. Controls::TKeyPressEvent FOnKeyPress;
  217. Controls::TKeyEvent FOnKeyDown;
  218. Controls::TKeyEvent FOnKeyUp;
  219. bool FTabStop;
  220. int FTabOrder;
  221. bool FFocused;
  222. bool FShowFocusRect;
  223. void __fastcall SetTabStop(bool value);
  224. void __fastcall SetTabOrder(int value);
  225. bool __fastcall GetRespectPalette(void);
  226. bool __fastcall GetSmoothStretching(void);
  227. bool __fastcall GetTransparent(void);
  228. Graphics::TColor __fastcall GetTransparentColor(void);
  229. HIDESBASE void __fastcall SetAutoSize(bool Value);
  230. void __fastcall SetDrawStyle(TfcImagerDrawStyle Value);
  231. void __fastcall SetEraseBackground(bool Value);
  232. void __fastcall SetPreProcess(bool Value);
  233. void __fastcall SetPicture(Graphics::TPicture* Value);
  234. void __fastcall SetRespectPalette(bool Value);
  235. void __fastcall SetSmoothStretching(bool Value);
  236. void __fastcall SetShowFocusRect(bool Value);
  237. void __fastcall SetTransparent(bool Value);
  238. void __fastcall SetTransparentColor(Graphics::TColor Value);
  239. void __fastcall NotifyChanges(void);
  240. void __fastcall SetFocusable(bool Value);
  242. protected:
  243. virtual Controls::TWinControl* __fastcall CreateImagerWinControl(void);
  244. virtual void __fastcall SetParent(Controls::TWinControl* Value);
  245. virtual void __fastcall BitmapOptionsChange(System::TObject* Sender);
  246. virtual void __fastcall BitmapChange(System::TObject* Sender);
  247. virtual void __fastcall UpdateAutoSize(void);
  248. virtual void __fastcall Loaded(void);
  249. virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation
  250. );
  251. virtual void __fastcall Paint(void);
  252. virtual void __fastcall WndProc(Messages::TMessage &Message);
  253. DYNAMIC void __fastcall MouseDown(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, 
  254. int Y);
  255. virtual void __fastcall KeyUp(Word &Key, Classes::TShiftState Shift);
  256. virtual void __fastcall KeyDown(Word &Key, Classes::TShiftState Shift);
  257. virtual void __fastcall KeyPress(char &Key);
  258. virtual void __fastcall DoEnter(void);
  259. virtual void __fastcall DoExit(void);
  260. __property bool EraseBackground = {read=FEraseBackground, write=SetEraseBackground, default=1};
  261. __property bool Focused = {read=FFocused, nodefault};
  263. public:
  264. bool UpdatingAutoSize;
  265. bool InSetBounds;
  266. Variant Patch;
  267. __fastcall virtual TfcCustomImager(Classes::TComponent* AOwner);
  268. __fastcall virtual ~TfcCustomImager(void);
  269. virtual bool __fastcall PictureEmpty(void);
  270. virtual void __fastcall Invalidate(void);
  271. virtual void __fastcall RegisterChanges(Fcchangelink::TfcChangeLink* ChangeLink);
  272. virtual void __fastcall Resized(void);
  273. virtual void __fastcall UpdateWorkBitmap(void);
  274. virtual void __fastcall UnRegisterChanges(Fcchangelink::TfcChangeLink* ChangeLink);
  275. virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight);
  276. virtual void __fastcall CopyToClipboard(void);
  277. virtual void __fastcall PasteFromClipboard(void);
  278. virtual void __fastcall CutToClipboard(void);
  279. virtual void __fastcall SetFocus(void);
  280. Graphics::TColor __fastcall GetColorAtPoint(int X, int Y);
  281. Windows::TRect __fastcall GetDrawRect(void);
  282. __property Align ;
  283. __property bool AutoSize = {read=FAutoSize, write=SetAutoSize, nodefault};
  284. __property TfcBitmapOptions* BitmapOptions = {read=FBitmapOptions, write=FBitmapOptions};
  285. __property TfcImagerDrawStyle DrawStyle = {read=FDrawStyle, write=SetDrawStyle, nodefault};
  286. __property bool PreProcess = {read=FPreProcess, write=SetPreProcess, nodefault};
  287. __property Graphics::TPicture* Picture = {read=FPicture, write=SetPicture};
  288. __property bool RespectPalette = {read=GetRespectPalette, write=SetRespectPalette, default=1};
  289. __property bool ShowFocusRect = {read=FShowFocusRect, write=SetShowFocusRect, default=0};
  290. __property bool SmoothStretching = {read=GetSmoothStretching, write=SetSmoothStretching, nodefault}
  291. ;
  292. __property bool Transparent = {read=GetTransparent, write=SetTransparent, nodefault};
  293. __property Graphics::TColor TransparentColor = {read=GetTransparentColor, write=SetTransparentColor
  294. , nodefault};
  295. __property Fcbitmap::TfcBitmap* WorkBitmap = {read=FWorkBitmap};
  296. __property bool Focusable = {read=FFocusable, write=SetFocusable, default=0};
  297. __property int TabOrder = {read=FTabOrder, write=SetTabOrder, nodefault};
  298. __property bool TabStop = {read=FTabStop, write=SetTabStop, default=0};
  299. __property Controls::TKeyPressEvent OnKeyPress = {read=FOnKeyPress, write=FOnKeyPress};
  300. __property Controls::TKeyEvent OnKeyDown = {read=FOnKeyDown, write=FOnKeyDown};
  301. __property Controls::TKeyEvent OnKeyUp = {read=FOnKeyUp, write=FOnKeyUp};
  302. __property Classes::TNotifyEvent OnEnter = {read=FOnEnter, write=FOnEnter};
  303. __property Classes::TNotifyEvent OnExit = {read=FOnExit, write=FOnExit};
  304. };
  307. class DELPHICLASS TfcImager;
  308. class PASCALIMPLEMENTATION TfcImager : public TfcCustomImager 
  309. {
  310. typedef TfcCustomImager inherited;
  312. __published:
  313. __property Align ;
  314. __property AutoSize ;
  315. __property BitmapOptions ;
  316. __property DrawStyle ;
  317. __property Picture ;
  318. __property PreProcess ;
  319. __property RespectPalette ;
  320. __property SmoothStretching ;
  321. __property Transparent ;
  322. __property TransparentColor ;
  323. __property Visible ;
  324. __property Focusable ;
  325. __property Anchors ;
  326. __property Constraints ;
  327. __property OnEndDock ;
  328. __property OnStartDock ;
  329. __property OnClick ;
  330. __property OnDblClick ;
  331. __property OnDragDrop ;
  332. __property OnDragOver ;
  333. __property OnEndDrag ;
  334. __property OnEnter ;
  335. __property OnExit ;
  336. __property OnMouseDown ;
  337. __property OnMouseMove ;
  338. __property OnMouseUp ;
  339. __property OnStartDrag ;
  340. __property TabOrder ;
  341. __property TabStop ;
  342. __property OnKeyPress ;
  343. __property OnKeyDown ;
  344. __property OnKeyUp ;
  345. public:
  346. #pragma option push -w-inl
  347. /* TfcCustomImager.Create */ inline __fastcall virtual TfcImager(Classes::TComponent* AOwner) : TfcCustomImager(
  348. AOwner) { }
  349. #pragma option pop
  350. #pragma option push -w-inl
  351. /* TfcCustomImager.Destroy */ inline __fastcall virtual ~TfcImager(void) { }
  352. #pragma option pop
  354. };
  357. class DELPHICLASS TfcDBCustomImager;
  358. class PASCALIMPLEMENTATION TfcDBCustomImager : public Controls::TCustomControl 
  359. {
  360. typedef Controls::TCustomControl inherited;
  362. private:
  363. bool FAutoSize;
  364. TfcBitmapOptions* FBitmapOptions;
  365. TfcImagerDrawStyle FDrawStyle;
  366. bool FPreProcess;
  367. Fcbitmap::TfcBitmap* FWorkBitmap;
  368. Graphics::TPicture* FPicture;
  369. Classes::TList* FChangeLinks;
  370. bool FRespectPalette;
  371. bool FTransparent;
  372. bool FInResized;
  373. bool __fastcall GetRespectPalette(void);
  374. bool __fastcall GetSmoothStretching(void);
  375. bool __fastcall GetTransparent(void);
  376. Graphics::TColor __fastcall GetTransparentColor(void);
  377. HIDESBASE void __fastcall SetAutoSize(bool Value);
  378. void __fastcall SetDrawStyle(TfcImagerDrawStyle Value);
  379. void __fastcall SetPreProcess(bool Value);
  380. void __fastcall SetPicture(Graphics::TPicture* Value);
  381. void __fastcall SetRespectPalette(bool Value);
  382. void __fastcall SetSmoothStretching(bool Value);
  383. void __fastcall SetTransparent(bool Value);
  384. void __fastcall SetTransparentColor(Graphics::TColor Value);
  385. Windows::TRect __fastcall GetDrawRect(void);
  386. void __fastcall NotifyChanges(void);
  387. HIDESBASE MESSAGE void __fastcall WMEraseBkgnd(Messages::TWMEraseBkgnd &Message);
  389. protected:
  390. virtual void __fastcall BitmapOptionsChange(System::TObject* Sender);
  391. virtual void __fastcall BitmapChange(System::TObject* Sender);
  392. virtual void __fastcall UpdateAutoSize(void);
  393. virtual void __fastcall Loaded(void);
  394. virtual void __fastcall Paint(void);
  395. HIDESBASE MESSAGE void __fastcall CMEnter(Messages::TWMNoParams &Message);
  396. HIDESBASE MESSAGE void __fastcall CMExit(Messages::TWMNoParams &Message);
  397. virtual void __fastcall CreateWnd(void);
  399. public:
  400. bool UpdatingAutoSize;
  401. bool InSetBounds;
  402. Variant Patch;
  403. __fastcall virtual TfcDBCustomImager(Classes::TComponent* AOwner);
  404. __fastcall virtual ~TfcDBCustomImager(void);
  405. virtual bool __fastcall PictureEmpty(void);
  406. Graphics::TColor __fastcall GetColorAtPoint(int X, int Y);
  407. virtual void __fastcall Invalidate(void);
  408. virtual void __fastcall RegisterChanges(Fcchangelink::TfcChangeLink* ChangeLink);
  409. virtual void __fastcall Resized(void);
  410. virtual void __fastcall UpdateWorkBitmap(void);
  411. virtual void __fastcall UnRegisterChanges(Fcchangelink::TfcChangeLink* ChangeLink);
  412. virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight);
  413. __property Align ;
  414. __property bool AutoSize = {read=FAutoSize, write=SetAutoSize, nodefault};
  415. __property TfcBitmapOptions* BitmapOptions = {read=FBitmapOptions, write=FBitmapOptions};
  416. __property TfcImagerDrawStyle DrawStyle = {read=FDrawStyle, write=SetDrawStyle, nodefault};
  417. __property bool PreProcess = {read=FPreProcess, write=SetPreProcess, nodefault};
  418. __property Graphics::TPicture* Picture = {read=FPicture, write=SetPicture};
  419. __property bool RespectPalette = {read=GetRespectPalette, write=SetRespectPalette, default=1};
  420. __property bool SmoothStretching = {read=GetSmoothStretching, write=SetSmoothStretching, nodefault}
  421. ;
  422. __property bool Transparent = {read=GetTransparent, write=SetTransparent, nodefault};
  423. __property Graphics::TColor TransparentColor = {read=GetTransparentColor, write=SetTransparentColor
  424. , nodefault};
  425. __property Fcbitmap::TfcBitmap* WorkBitmap = {read=FWorkBitmap};
  426. public:
  427. #pragma option push -w-inl
  428. /* TWinControl.CreateParented */ inline __fastcall TfcDBCustomImager(HWND ParentWindow) : Controls::TCustomControl(
  429. ParentWindow) { }
  430. #pragma option pop
  432. };
  435. #pragma option push -b-
  436. enum TfcImagerPictureType { fcptBitmap, fcptJpg, fcptMetafile, fcptIcon };
  437. #pragma option pop
  439. class DELPHICLASS TfcDBImager;
  440. typedef void __fastcall (__closure *TfcCalcPictureTypeEvent)(TfcDBImager* ImageControl, TfcImagerPictureType 
  441. &PictureType, AnsiString &GraphicClassName);
  443. class PASCALIMPLEMENTATION TfcDBImager : public TfcDBCustomImager 
  444. {
  445. typedef TfcDBCustomImager inherited;
  447. private:
  448. Dbctrls::TFieldDataLink* FDataLink;
  449. bool FPictureLoaded;
  450. bool FAutoDisplay;
  451. Forms::TFormBorderStyle FBorderStyle;
  452. TfcImagerPictureType FPictureType;
  453. TfcCalcPictureTypeEvent FOnCalcPictureType;
  454. void __fastcall SetPictureType(TfcImagerPictureType Value);
  455. void __fastcall SetBorderStyle(Forms::TBorderStyle Value);
  456. MESSAGE void __fastcall CMGetDataLink(Messages::TMessage &Message);
  457. void __fastcall DataChange(System::TObject* Sender);
  458. AnsiString __fastcall GetDataField(void);
  459. Db::TDataSource* __fastcall GetDataSource(void);
  460. Db::TField* __fastcall GetField(void);
  461. bool __fastcall GetReadOnly(void);
  462. void __fastcall SetReadOnly(bool Value);
  463. void __fastcall UpdateData(System::TObject* Sender);
  464. void __fastcall SetDataField(const AnsiString Value);
  465. void __fastcall SetDataSource(Db::TDataSource* Value);
  466. void __fastcall SetAutoDisplay(bool Value);
  467. HIDESBASE MESSAGE void __fastcall WMLButtonDown(Messages::TWMMouse &Message);
  468. HIDESBASE MESSAGE void __fastcall WMLButtonDblClk(Messages::TWMMouse &Message);
  469. HIDESBASE MESSAGE void __fastcall WMEraseBkgnd(Messages::TWMEraseBkgnd &Message);
  470. HIDESBASE MESSAGE void __fastcall CMExit(Messages::TWMNoParams &Message);
  472. protected:
  473. virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
  474. virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation
  475. );
  476. virtual void __fastcall LoadPicture(void);
  477. DYNAMIC void __fastcall KeyDown(Word &Key, Classes::TShiftState Shift);
  478. DYNAMIC void __fastcall KeyPress(char &Key);
  479. DYNAMIC void __fastcall DoExit(void);
  480. virtual void __fastcall Paint(void);
  481. virtual void __fastcall BitmapChange(System::TObject* Sender);
  482. DYNAMIC HPALETTE __fastcall GetPalette(void);
  483. DYNAMIC bool __fastcall PaletteChanged(bool Foreground);
  485. public:
  486. __fastcall virtual TfcDBImager(Classes::TComponent* AOwner);
  487. __fastcall virtual ~TfcDBImager(void);
  488. virtual void __fastcall CopyToClipboard(void);
  489. virtual void __fastcall PasteFromClipboard(void);
  490. virtual void __fastcall CutToClipboard(void);
  491. virtual void __fastcall DoCalcPictureType(TfcImagerPictureType &PictureType, AnsiString &GraphicClassName
  492. );
  493. DYNAMIC bool __fastcall ExecuteAction(Classes::TBasicAction* Action);
  494. DYNAMIC bool __fastcall UpdateAction(Classes::TBasicAction* Action);
  495. __property Db::TField* Field = {read=GetField};
  497. __published:
  498. __property Forms::TBorderStyle BorderStyle = {read=FBorderStyle, write=SetBorderStyle, default=1};
  499. __property AnsiString DataField = {read=GetDataField, write=SetDataField};
  500. __property Db::TDataSource* DataSource = {read=GetDataSource, write=SetDataSource};
  501. __property bool AutoDisplay = {read=FAutoDisplay, write=SetAutoDisplay, default=1};
  502. __property Ctl3D ;
  503. __property Color ;
  504. __property ParentCtl3D ;
  505. __property ParentColor ;
  506. __property TfcImagerPictureType PictureType = {read=FPictureType, write=SetPictureType, default=0};
  508. __property bool ReadOnly = {read=GetReadOnly, write=SetReadOnly, default=0};
  509. __property Align ;
  510. __property AutoSize ;
  511. __property BitmapOptions ;
  512. __property DrawStyle ;
  513. __property PreProcess ;
  514. __property RespectPalette ;
  515. __property SmoothStretching ;
  516. __property Transparent ;
  517. __property TransparentColor ;
  518. __property Visible ;
  519. __property Anchors ;
  520. __property Constraints ;
  521. __property OnEndDock ;
  522. __property OnStartDock ;
  523. __property OnClick ;
  524. __property TfcCalcPictureTypeEvent OnCalcPictureType = {read=FOnCalcPictureType, write=FOnCalcPictureType
  525. };
  526. __property OnDblClick ;
  527. __property OnDragDrop ;
  528. __property OnDragOver ;
  529. __property OnEndDrag ;
  530. __property OnMouseDown ;
  531. __property OnMouseMove ;
  532. __property OnMouseUp ;
  533. __property OnStartDrag ;
  534. __property TabOrder ;
  535. __property TabStop ;
  536. __property OnKeyPress ;
  537. __property OnKeyDown ;
  538. __property OnKeyUp ;
  539. __property OnEnter ;
  540. __property OnExit ;
  541. public:
  542. #pragma option push -w-inl
  543. /* TWinControl.CreateParented */ inline __fastcall TfcDBImager(HWND ParentWindow) : TfcDBCustomImager(
  544. ParentWindow) { }
  545. #pragma option pop
  547. };
  550. //-- var, const, procedure ---------------------------------------------------
  552. } /* namespace Fcimager */
  553. #if !defined(NO_IMPLICIT_NAMESPACE_USE)
  554. using namespace Fcimager;
  555. #endif
  556. #pragma option pop // -w-
  557. #pragma option pop // -Vx
  559. #pragma delphiheader end.
  560. //-- end unit ----------------------------------------------------------------
  561. #endif // fcImager