Unit1.h
上传用户:daoqigc
上传日期:2021-04-20
资源大小:2795k
文件大小:1k
源码类别:

RichEdit

开发平台:

Delphi

  1. //---------------------------------------------------------------------------
  2. #ifndef Unit1H
  3. #define Unit1H
  4. //---------------------------------------------------------------------------
  5. #include <vclClasses.hpp>
  6. #include <vclControls.hpp>
  7. #include <vclStdCtrls.hpp>
  8. #include <vclForms.hpp>
  9. #include "RVEdit.hpp"
  10. #include "RichView.hpp"
  11. #include "RVScroll.hpp"
  12. #include <vclExtCtrls.hpp>
  13. #include "RVStyle.hpp"
  14. #include "RVTable.hpp"
  15. #include <Graphics.hpp>
  16. //---------------------------------------------------------------------------
  17. class TForm1 : public TForm
  18. {
  19. __published: // IDE-managed Components
  20. TRichViewEdit *rve;
  21. TPanel *Panel1;
  22. TButton *Button1;
  23. TButton *Button2;
  24. TRVStyle *RVStyle1;
  25. void __fastcall FormCreate(TObject *Sender);
  26. void __fastcall rveChange(TObject *Sender);
  27. void __fastcall Button1Click(TObject *Sender);
  28. void __fastcall Button2Click(TObject *Sender);
  29. void __fastcall rvePaste(TCustomRichViewEdit *Sender, bool &DoDefault);
  30. private: // User declarations
  31.     TRVTableItemInfo* table;
  32.     void Calculate();
  33.     void __fastcall TForm1::OnCellEditing(TRVTableItemInfo* Sender, int Row, int Col,
  34.       bool Automatic, bool &AllowEdit);
  35. public: // User declarations
  36. __fastcall TForm1(TComponent* Owner);
  37. };
  38. //---------------------------------------------------------------------------
  39. extern TForm1 *Form1;
  40. //---------------------------------------------------------------------------
  41. #endif
  42.