Editor.h 4.2 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124
  1. //---------------------------------------------------------------------------
  2. #ifndef EditorH
  3. #define EditorH
  4. //---------------------------------------------------------------------------
  5. #include <Classes.hpp>
  6. #include <Controls.hpp>
  7. #include <StdCtrls.hpp>
  8. #include <Forms.hpp>
  9. #include <ComCtrls.hpp>
  10. #include <ToolWin.hpp>
  11. #include <ActnList.hpp>
  12. #include <ImgList.hpp>
  13. #include <ExtCtrls.hpp>
  14. #include <StdActns.hpp>
  15. #include <Dialogs.hpp>
  16. #include <Menus.hpp>
  17. #include "TB2Dock.hpp"
  18. #include "TBX.hpp"
  19. #include "TB2Item.hpp"
  20. #include "TB2Toolbar.hpp"
  21. #include "TBXStatusBars.hpp"
  22. //---------------------------------------------------------------------------
  23. class TEditorForm : public TForm
  24. {
  25. __published:
  26. TActionList *EditorActions;
  27. TImageList *EditorImages;
  28. TAction *SaveAction;
  29. TTBXDock *TopDock;
  30. TTBXToolbar *ToolBar;
  31. TRichEdit *EditorMemo;
  32. TTBXStatusBar *StatusBar;
  33. TEditCut *EditCut;
  34. TEditCopy *EditCopy;
  35. TEditPaste *EditPaste;
  36. TEditSelectAll *EditSelectAll;
  37. TEditUndo *EditUndo;
  38. TEditDelete *EditDelete;
  39. TAction *PreferencesAction;
  40. TAction *CloseAction;
  41. TAction *FindAction;
  42. TAction *ReplaceAction;
  43. TAction *FindNextAction;
  44. TAction *GoToLineAction;
  45. TTBXItem *TBXItem1;
  46. TTBXItem *TBXItem2;
  47. TTBXSeparatorItem *TBXSeparatorItem1;
  48. TTBXItem *TBXItem3;
  49. TTBXItem *TBXItem4;
  50. TTBXItem *TBXItem5;
  51. TTBXItem *TBXItem6;
  52. TTBXItem *TBXItem7;
  53. TTBXItem *TBXItem8;
  54. TTBXSeparatorItem *TBXSeparatorItem2;
  55. TTBXItem *TBXItem9;
  56. TTBXSeparatorItem *TBXSeparatorItem3;
  57. TTBXItem *TBXItem10;
  58. TTBXItem *TBXItem11;
  59. TTBXItem *TBXItem12;
  60. TTBXSeparatorItem *TBXSeparatorItem4;
  61. TTBXItem *TBXItem13;
  62. TFindDialog *FindDialog;
  63. TReplaceDialog *ReplaceDialog;
  64. TTBXPopupMenu *EditorPopup;
  65. TTBXItem *Undo1;
  66. TTBXSeparatorItem *N1;
  67. TTBXItem *Cut1;
  68. TTBXItem *Copy1;
  69. TTBXItem *Paste1;
  70. TTBXItem *Delete1;
  71. TTBXSeparatorItem *N2;
  72. TTBXItem *SelectAll1;
  73. TTBXSeparatorItem *N3;
  74. TTBXItem *Find1;
  75. TTBXItem *Replace1;
  76. TTBXItem *Findnext1;
  77. TTBXItem *Gotolinenumber1;
  78. TTBXSeparatorItem *TBXSeparatorItem5;
  79. TTBXItem *TBXItem14;
  80. TAction *HelpAction;
  81. void __fastcall EditorActionsUpdate(TBasicAction *Action, bool &Handled);
  82. void __fastcall EditorActionsExecute(TBasicAction *Action,
  83. bool &Handled);
  84. void __fastcall FormCloseQuery(TObject *Sender, bool &CanClose);
  85. void __fastcall EditorMemoMouseUp(TObject *Sender, TMouseButton Button,
  86. TShiftState Shift, int X, int Y);
  87. void __fastcall EditorMemoKeyUp(TObject *Sender, WORD &Key,
  88. TShiftState Shift);
  89. void __fastcall EditorMemoChange(TObject *Sender);
  90. void __fastcall FindDialogFind(TObject *Sender);
  91. void __fastcall FormShow(TObject *Sender);
  92. void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
  93. private:
  94. AnsiString FFileName;
  95. TNotifyEvent FOnFileChanged;
  96. TNotifyEvent FOnWindowClose;
  97. TCustomForm * FParentForm;
  98. TFindDialog * FLastFindDialog;
  99. TPoint FCaretPos;
  100. bool FShowWindowButton;
  101. void __fastcall SetFileName(const AnsiString value);
  102. void __fastcall SetParentForm(TCustomForm * value);
  103. void __fastcall SetShowWindowButton(bool value);
  104. public:
  105. __fastcall TEditorForm(TComponent* Owner);
  106. virtual __fastcall ~TEditorForm();
  107. __property AnsiString FileName = { read = FFileName, write = SetFileName };
  108. __property TNotifyEvent OnFileChanged = { read = FOnFileChanged, write = FOnFileChanged };
  109. __property TNotifyEvent OnWindowClose = { read = FOnWindowClose, write = FOnWindowClose };
  110. __property TCustomForm * ParentForm = { read = FParentForm, write = SetParentForm };
  111. __property bool ShowWindowButton = { read = FShowWindowButton, write = SetShowWindowButton };
  112. protected:
  113. void __fastcall ApplyConfiguration();
  114. bool __fastcall CursorInUpperPart();
  115. void __fastcall Find();
  116. void __fastcall GoToLine();
  117. void __fastcall LoadFile();
  118. void __fastcall PositionFindDialog(bool VerticalOnly);
  119. void __fastcall StartFind(bool Find);
  120. void __fastcall UpdateControls();
  121. virtual void __fastcall CreateParams(TCreateParams & Params);
  122. };
  123. //---------------------------------------------------------------------------
  124. #endif