mainedit.~h

用C++ builer 实现的关于文件操作经典实例 里面有所有工程需要的源代码

//---------------------------------------------------------------------------

#ifndef MainEditH
#define MainEditH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <Dialogs.hpp>
#include <ImgList.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include <ExtCtrls.hpp>
const AnsiString HistoryListName="history";
const int MaxHistoryFile=5;
const int HistoryAddPos=9;
//---------------------------------------------------------------------------
class TMainEditForm : public TForm
{
__published:	// IDE-managed Components
        TStatusBar *StatusBar;
        TOpenDialog *OpenDialog;
        TMainMenu *MainMenu1;
        TMenuItem *File;
        TMenuItem *New1;
        TMenuItem *Open1;
        TMenuItem *TopS;
        TMenuItem *Exit1;
        TMenuItem *Help1;
        TMenuItem *About1;
        TSaveDialog *SaveDialog;
        TPrintDialog *PrintDialog;
        TPrinterSetupDialog *PrinterSetupDialog1;
        TRichEdit *RichEdit1;
        TToolBar *ToolBar1;
        TToolButton *NewButton;
        TToolButton *OpenButton;
        TToolButton *SaveButton;
        TToolButton *PrintButton;
        TToolButton *Space1Button;
        TToolButton *CutButton;
        TToolButton *CopyButton;
        TToolButton *PasteButton;
        TToolButton *UndoButton;
        TToolButton *BoldButton;
        TToolButton *ItalicButton;
        TToolButton *UnderlineButton;
        TToolButton *LeftButton;
        TToolButton *Space4Button;
        TToolButton *CenterButton;
        TToolButton *RightButton;
        TToolButton *Space2Button;
        TMenuItem *Edit1;
        TMenuItem *Replace1;
        TMenuItem *FindNext;
        TMenuItem *Find1;
        TMenuItem *N3;
        TMenuItem *SelectAll1;
        TMenuItem *Delete1;
        TMenuItem *Paste1;
        TMenuItem *Copy1;
        TMenuItem *Cut1;
        TMenuItem *N4;
        TMenuItem *Undo1;
        TMenuItem *O1;
        TMenuItem *Font1;
        TMenuItem *N5;
        TMenuItem *SaveAs1;
        TMenuItem *Save1;
        TMenuItem *N1;
        TMenuItem *Print1;
        TMenuItem *PrintSet1;
        TMenuItem *N7;
        TImageList *ImageList1;
        TToolButton *BulletsButton;
        TToolButton *Space3Button;
        TFindDialog *FindDialog1;
        TReplaceDialog *ReplaceDialog1;
        TFontDialog *FontDialog1;
        TToolBar *ToolBar2;
        TComboBox *FontName;
        TEdit *FontSize;
        TUpDown *UpDown1;
        TToolButton *Space7Button;
        TToolButton *FontButton;
        TToolButton *Space5Button;
        TToolButton *ColorButton;
        TToolButton *Space6Button;
        TColorDialog *ColorDialog;
        TMenuItem *Display;
        TMenuItem *Tool1;
        TMenuItem *Tool2;
        TMenuItem *Status1;
        void __fastcall NewButtonClick(TObject *Sender);
        void __fastcall OpenButtonClick(TObject *Sender);
        void __fastcall SaveAs1Click(TObject *Sender);
        void __fastcall SaveButtonClick(TObject *Sender);
        void __fastcall PrintButtonClick(TObject *Sender);
        void __fastcall UndoButtonClick(TObject *Sender);
        void __fastcall SelectAll1Click(TObject *Sender);
        void __fastcall Delete1Click(TObject *Sender);
        void __fastcall Find1Click(TObject *Sender);
        void __fastcall FindNextClick(TObject *Sender);
        void __fastcall Replace1Click(TObject *Sender);
        void __fastcall FontNameChange(TObject *Sender);
        void __fastcall BoldButtonClick(TObject *Sender);
        void __fastcall ItalicButtonClick(TObject *Sender);
        void __fastcall UnderlineButtonClick(TObject *Sender);
        void __fastcall BulletsButtonClick(TObject *Sender);
        void __fastcall CutButtonClick(TObject *Sender);
        void __fastcall CopyButtonClick(TObject *Sender);
        void __fastcall PasteButtonClick(TObject *Sender);
        void __fastcall LeftButtonClick(TObject *Sender);
        void __fastcall FontSizeChange(TObject *Sender);
        void __fastcall RichEdit1Change(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
        void __fastcall FontButtonClick(TObject *Sender);
        void __fastcall ColorButtonClick(TObject *Sender);
        void __fastcall Exit1Click(TObject *Sender);
        void __fastcall FindDialog1Find(TObject *Sender);
        void __fastcall ReplaceDialog1Replace(TObject *Sender);
        void __fastcall Tool1Click(TObject *Sender);
        void __fastcall Tool2Click(TObject *Sender);
        void __fastcall Status1Click(TObject *Sender);
        void __fastcall RichEdit1MouseMove(TObject *Sender,
          TShiftState Shift, int X, int Y);
        void __fastcall PrintSet1Click(TObject *Sender);
private:	// User declarations
        bool isNamed;
        AnsiString cFileName;
        void __fastcall ShowPos();

        TMenuItem *BottomS;
        TStringList *HistoryList;
        int ShowHistoryFiles;
        void BuildHistory(TMenuItem *FileMenu);
        void __fastcall HistoryItemClick(TObject *Sender);

public:		// User declarations
        __fastcall TMainEditForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TMainEditForm *MainEditForm;
//---------------------------------------------------------------------------
#endif