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

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

Delphi控件源码

开发平台：

Delphi

fcdemorichedit.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) 'fcDemoRichEdit.pas' rev: 6.00
  7. #ifndef fcDemoRichEditHPP
  8. #define fcDemoRichEditHPP
  10. #pragma delphiheader begin
  11. #pragma option push -w-
  12. #pragma option push -Vx
  13. #include <Menus.hpp> // Pascal unit
  14. #include <ComCtrls.hpp> // Pascal unit
  15. #include <StdCtrls.hpp> // Pascal unit
  16. #include <Dialogs.hpp> // Pascal unit
  17. #include <Forms.hpp> // Pascal unit
  18. #include <Controls.hpp> // Pascal unit
  19. #include <Graphics.hpp> // Pascal unit
  20. #include <Classes.hpp> // Pascal unit
  21. #include <SysUtils.hpp> // Pascal unit
  22. #include <Messages.hpp> // Pascal unit
  23. #include <Windows.hpp> // Pascal unit
  24. #include <SysInit.hpp> // Pascal unit
  25. #include <System.hpp> // Pascal unit
  27. //-- user supplied -----------------------------------------------------------
  29. namespace Fcdemorichedit
  30. {
  31. //-- type declarations -------------------------------------------------------
  32. class DELPHICLASS TfcDemoRichEdit;
  33. class PASCALIMPLEMENTATION TfcDemoRichEdit : public Comctrls::TCustomRichEdit 
  34. {
  35. typedef Comctrls::TCustomRichEdit inherited;
  37. private:
  38. Classes::TStream* ReloadStream;
  39. bool UseReloadStream;
  41. protected:
  42. virtual void __fastcall GetLines(Classes::TStream* Stream);
  43. HIDESBASE virtual void __fastcall SetLines(Classes::TStream* Stream);
  44. virtual void __fastcall DefineProperties(Classes::TFiler* Filer);
  45. virtual void __fastcall CreateWnd(void);
  46. virtual void __fastcall DestroyWnd(void);
  48. public:
  49. __fastcall virtual ~TfcDemoRichEdit(void);
  51. __published:
  52. __property Align  = {default=0};
  53. __property Alignment  = {default=0};
  54. __property BorderStyle  = {default=1};
  55. __property Color  = {default=-16777211};
  56. __property Ctl3D ;
  57. __property DragCursor  = {default=-12};
  58. __property DragMode  = {default=0};
  59. __property Enabled  = {default=1};
  60. __property Font ;
  61. __property HideSelection  = {default=1};
  62. __property HideScrollBars  = {default=1};
  63. __property ImeMode  = {default=3};
  64. __property ImeName ;
  65. __property MaxLength  = {default=0};
  66. __property ParentColor  = {default=0};
  67. __property ParentCtl3D  = {default=1};
  68. __property ParentFont  = {default=1};
  69. __property ParentShowHint  = {default=1};
  70. __property PlainText  = {default=0};
  71. __property PopupMenu ;
  72. __property ReadOnly  = {default=0};
  73. __property ScrollBars  = {default=0};
  74. __property ShowHint ;
  75. __property TabOrder  = {default=-1};
  76. __property TabStop  = {default=1};
  77. __property Visible  = {default=1};
  78. __property WantTabs  = {default=0};
  79. __property WantReturns  = {default=1};
  80. __property WordWrap  = {default=1};
  81. __property OnChange ;
  82. __property OnDragDrop ;
  83. __property OnDragOver ;
  84. __property OnEndDrag ;
  85. __property OnEnter ;
  86. __property OnExit ;
  87. __property OnKeyDown ;
  88. __property OnKeyPress ;
  89. __property OnKeyUp ;
  90. __property OnMouseDown ;
  91. __property OnMouseMove ;
  92. __property OnMouseUp ;
  93. __property OnResizeRequest ;
  94. __property OnSelectionChange ;
  95. __property OnStartDrag ;
  96. __property OnProtectChange ;
  97. __property OnSaveClipboard ;
  98. public:
  99. #pragma option push -w-inl
  100. /* TCustomRichEdit.Create */ inline __fastcall virtual TfcDemoRichEdit(Classes::TComponent* AOwner) : Comctrls::TCustomRichEdit(AOwner) { }
  101. #pragma option pop
  103. public:
  104. #pragma option push -w-inl
  105. /* TWinControl.CreateParented */ inline __fastcall TfcDemoRichEdit(HWND ParentWindow) : Comctrls::TCustomRichEdit(ParentWindow) { }
  106. #pragma option pop
  108. };
  111. //-- var, const, procedure ---------------------------------------------------
  112. #pragma error Unsupported symbol type (23, fcDemoRichEdit)
  114. } /* namespace Fcdemorichedit */
  115. using namespace Fcdemorichedit;
  116. #pragma option pop // -w-
  117. #pragma option pop // -Vx
  119. #pragma delphiheader end.
  120. //-- end unit ----------------------------------------------------------------
  121. #endif // fcDemoRichEdit