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

RichEdit

开发平台:

Delphi

  1. //---------------------------------------------------------------------------
  2. #ifndef PopupFrmH
  3. #define PopupFrmH
  4. //---------------------------------------------------------------------------
  5. #include <vclClasses.hpp>
  6. #include <vclControls.hpp>
  7. #include <vclStdCtrls.hpp>
  8. #include <vclForms.hpp>
  9. #include <vclExtCtrls.hpp>
  10. #include "RichView.hpp"
  11. #include "RVScroll.hpp"
  12. #include "RVStyle.hpp"
  13. //---------------------------------------------------------------------------
  14. class TfrmPopup : public TForm
  15. {
  16. __published: // IDE-managed Components
  17.     TPanel *Panel1;
  18.     TRichView *rv;
  19.     TRVStyle *rvs;
  20.     void __fastcall FormKeyPress(TObject *Sender, char &Key);
  21.     void __fastcall rvClick(TObject *Sender);
  22.     void __fastcall FormDeactivate(TObject *Sender);
  23.     void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
  24. private: // User declarations
  25.     void Build(int DemoNo);
  26.     void MoveToMouse();
  27. public: // User declarations
  28.     __fastcall TfrmPopup(TComponent* Owner);
  29.     void ShowTopic(int DemoNo);
  30. };
  31. //---------------------------------------------------------------------------
  32. extern TfrmPopup *frmPopup;
  33. //---------------------------------------------------------------------------
  34. #endif