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 <vclDBGrids.hpp>
  10. #include "Grids.hpp"
  11. #include <vclExtCtrls.hpp>
  12. #include <vclDBTables.hpp>
  13. #include <vclDB.hpp>
  14. #include "RVReport.hpp"
  15. #include "PtblRV.hpp"
  16. #include "RVStyle.hpp"
  17. #include <Db.hpp>
  18. //---------------------------------------------------------------------------
  19. class TfrmMain : public TForm
  20. {
  21. __published: // IDE-managed Components
  22. TDBGrid *DBGrid1;
  23. TPanel *Panel1;
  24. TCheckBox *CheckBox1;
  25. TTable *Table1;
  26. TDataSource *DataSource1;
  27. TRVReportHelper *RVReportHelper1;
  28. TRVStyle *RVStyle1;
  29. void __fastcall FormCreate(TObject *Sender);
  30. void __fastcall DBGrid1DrawColumnCell(TObject *Sender, const TRect &Rect,
  31. int DataCol, TColumn *Column, TGridDrawState State);
  32. void __fastcall DBGrid1EditButtonClick(TObject *Sender);
  33. void __fastcall CheckBox1Click(TObject *Sender);
  34. private: // User declarations
  35.     int DefRowHeight;
  36.     void SetRowHeight();
  37.     bool IsRVFField(TField* Field);    
  38. public: // User declarations
  39. __fastcall TfrmMain(TComponent* Owner);
  40. };
  41. //---------------------------------------------------------------------------
  42. extern TfrmMain *frmMain;
  43. //---------------------------------------------------------------------------
  44. #endif
  45.