Unit1.h
上传用户:daoqigc
上传日期:2021-04-20
资源大小:2795k
文件大小:2k
- //---------------------------------------------------------------------------
- #ifndef Unit1H
- #define Unit1H
- //---------------------------------------------------------------------------
- #include <vclClasses.hpp>
- #include <vclControls.hpp>
- #include <vclStdCtrls.hpp>
- #include <vclForms.hpp>
- #include <vclExtCtrls.hpp>
- #include "RVEdit.hpp"
- #include "RichView.hpp"
- #include "RVScroll.hpp"
- #include "RVStyle.hpp"
- #include "RVTable.hpp"
- #include "CRVFData.hpp"
- //---------------------------------------------------------------------------
- #define WM_SETCARETPOS (WM_APP+10)
- class TForm1 : public TForm
- {
- __published: // IDE-managed Components
- TImage *Image1;
- TImage *Image2;
- TImage *Image3;
- TRichViewEdit *RichViewEdit1;
- TRVStyle *RVStyle1;
- void __fastcall RichViewEdit1DragOver(TObject *Sender, TObject *Source, int X,
- int Y, TDragState State, bool &Accept);
- void __fastcall RichViewEdit1DragDrop(TObject *Sender, TObject *Source, int X,
- int Y);
- void __fastcall FormCreate(TObject *Sender);
- private: // User declarations
- void MoveCaretTo(int X, int Y);
- void __fastcall WMSetCaretPos(TMessage &Message);
- BEGIN_MESSAGE_MAP
- MESSAGE_HANDLER(WM_SETCARETPOS, TMessage, WMSetCaretPos)
- END_MESSAGE_MAP(TForm)
- public: // User declarations
- __fastcall TForm1(TComponent* Owner);
- };
- //---------------------------------------------------------------------------
- extern TForm1 *Form1;
- //---------------------------------------------------------------------------
- #endif