home *** CD-ROM | disk | FTP | other *** search
/ Chip 2002 May / Chip_2002-05_cd1.bin / chplus / cpp / 3 / RichEdit.exe / romain.h < prev   
C/C++ Source or Header  |  1998-02-09  |  5KB  |  152 lines
  1. //----------------------------------------------------------------------------
  2. //Borland C++Builder
  3. //Copyright (c) 1987, 1998 Borland International Inc. All Rights Reserved.
  4. //----------------------------------------------------------------------------
  5. //----------------------------------------------------------------------------
  6. #ifndef RomainH
  7. #define RomainH
  8. //----------------------------------------------------------------------------
  9. #include <Outline.hpp>
  10. #include <Grids.hpp>
  11. #include <Buttons.hpp>
  12. #include <ExtCtrls.hpp>
  13. #include <StdCtrls.hpp>
  14. #include <ComCtrls.hpp>
  15. #include <Menus.hpp>
  16. #include <Dialogs.hpp>
  17. #include <Forms.hpp>
  18. #include <Controls.hpp>
  19. #include <Graphics.hpp>
  20. #include <Classes.hpp>
  21. #include <SysUtils.hpp>
  22. #include <Messages.hpp>
  23. #include <Windows.hpp>
  24. #include <System.hpp>
  25. //----------------------------------------------------------------------------
  26. class TMainForm : public TForm
  27. {
  28. __published:
  29.     TPanel *SpeedBar;
  30.     TSpeedButton *OpenButton;
  31.     TSpeedButton *SaveButton;
  32.     TSpeedButton *PrintButton;
  33.     TSpeedButton *UndoButton;
  34.     TSpeedButton *CutButton;
  35.     TSpeedButton *CopyButton;
  36.     TSpeedButton *PasteButton;
  37.     TBevel *Bevel1;
  38.     TSpeedButton *BoldButton;
  39.     TSpeedButton *ItalicButton;
  40.     TSpeedButton *LeftAlign;
  41.     TSpeedButton *CenterAlign;
  42.     TSpeedButton *RightAlign;
  43.     TSpeedButton *UnderlineButton;
  44.     TSpeedButton *BulletsButton;
  45.     TComboBox *FontName;
  46.     TEdit *FontSize;
  47.     TUpDown *UpDown1;
  48.     TPanel *Ruler;
  49.     TLabel *FirstInd;
  50.     TLabel *LeftInd;
  51.     TBevel *RulerLine;
  52.     TLabel *RightInd;
  53.     TStatusBar *StatusBar;
  54.     TMainMenu *MainMenu;
  55.     TMenuItem *FileMenu;
  56.     TMenuItem *FileNew;
  57.     TMenuItem *FileOpen;
  58.     TMenuItem *FileSave;
  59.     TMenuItem *FileSaveAs;
  60.     TMenuItem *N1;
  61.     TMenuItem *FilePrint;
  62.     TMenuItem *N4;
  63.     TMenuItem *FileExit;
  64.     TMenuItem *EditMenu;
  65.     TMenuItem *EditUndo;
  66.     TMenuItem *N2;
  67.     TMenuItem *EditCut;
  68.     TMenuItem *EditCopy;
  69.     TMenuItem *EditPaste;
  70.     TMenuItem *N5;
  71.     TMenuItem *EditFont;
  72.     TMenuItem *HelpMenu;
  73.     TMenuItem *HelpContents;
  74.     TMenuItem *HelpSearch;
  75.     TMenuItem *HelpHowTo;
  76.     TMenuItem *N3;
  77.     TMenuItem *HelpAbout;
  78.     TOpenDialog *OpenDialog;
  79.     TSaveDialog *SaveDialog;
  80.     TPrintDialog *PrintDialog;
  81.     TFontDialog *FontDialog1;
  82.     TRichEdit *RichEdit1;
  83.         TMenuItem *Language1;
  84.         TMenuItem *US1;
  85.         TMenuItem *German1;
  86.         TMenuItem *Swedish1;
  87.     void __fastcall SelectionChange(TObject *Sender);
  88.     void __fastcall AlignClick(TObject *Sender);
  89.     void __fastcall FilePrintClick(TObject *Sender);
  90.     void __fastcall FileExitClick(TObject *Sender);
  91.     void __fastcall EditUndoClick(TObject *Sender);
  92.     void __fastcall EditCutClick(TObject *Sender);
  93.     void __fastcall EditCopyClick(TObject *Sender);
  94.     void __fastcall EditPasteClick(TObject *Sender);
  95.     void __fastcall HelpContentsClick(TObject *Sender);
  96.     void __fastcall HelpSearchClick(TObject *Sender);
  97.     void __fastcall HelpHowToClick(TObject *Sender);
  98.     void __fastcall HelpAboutClick(TObject *Sender);
  99.     void __fastcall RulerResize(TObject *Sender);
  100.     void __fastcall SelectFont(TObject *Sender);
  101.     void __fastcall FormCreate(TObject *Sender);
  102.     void __fastcall FileNewClick(TObject *Sender);
  103.     void __fastcall FileOpenClick(TObject *Sender);
  104.     void __fastcall FileSaveClick(TObject *Sender);
  105.     void __fastcall FileSaveAsClick(TObject *Sender);
  106.     void __fastcall FormResize(TObject *Sender);
  107.     void __fastcall FormPaint(TObject *Sender);
  108.     void __fastcall BoldButtonClick(TObject *Sender);
  109.     void __fastcall FontSizeChange(TObject *Sender);
  110.     void __fastcall FontNameChange(TObject *Sender);
  111.     void __fastcall UnderlineButtonClick(TObject *Sender);
  112.     void __fastcall ItalicButtonClick(TObject *Sender);
  113.     void __fastcall BulletsButtonClick(TObject *Sender);
  114.     void __fastcall FormCloseQuery(TObject *Sender, bool &CanClose);
  115.     void __fastcall RulerItemMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y);
  116.     void __fastcall RulerItemMouseMove(TObject *Sender, TShiftState Shift, int X, int Y);
  117.     void __fastcall FirstIndMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y);
  118.     void __fastcall LeftIndMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y);
  119.     void __fastcall RightIndMouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y);
  120.     void __fastcall FormActivate(TObject *Sender);
  121.         void __fastcall US1Click(TObject *Sender);
  122.         void __fastcall German1Click(TObject *Sender);
  123.         void __fastcall Swedish1Click(TObject *Sender);
  124.         void __fastcall FormDestroy(TObject *Sender);
  125. private:
  126.     AnsiString FFileName;
  127.     bool FUpdating;
  128.     int FDragOfs;
  129.     bool FDragging;
  130.     TTextAttributes *__fastcall CurrText(void);
  131.     void __fastcall GetFontNames(void);
  132.     void __fastcall SetFileName(const AnsiString FileName);
  133.     void __fastcall CheckFileSave(void);
  134.     void __fastcall SetupRuler(void);
  135.     void __fastcall SetEditRect(void);
  136.     void __fastcall ShowHint(TObject *Sender);
  137.  
  138. public:
  139.     virtual __fastcall TMainForm(TComponent *Owner);
  140. };
  141. //----------------------------------------------------------------------------
  142. class TCharsetObject : public TObject
  143. {
  144. public:
  145.     int Charset;
  146.     __fastcall TCharsetObject(int FCharset);
  147. };
  148. //----------------------------------------------------------------------------
  149. extern TMainForm *MainForm;
  150. //----------------------------------------------------------------------------
  151. #endif    
  152.