refermain.h

《C++ Builder 5技术内幕》一书附带的程序源代码

//---------------------------------------------------------------------------
#ifndef ReferMainH
#define ReferMainH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <Menus.hpp>
#include <ToolWin.hpp>
#include <MPlayer.hpp>
#include "cspin.h"
#include "Refer.h"

//---------------------------------------------------------------------------
class TMainFormRefer : public TForm
{
  friend class TFormSearchedResults;
  friend class TDlgSearching;
__published:	// IDE-managed Components
    TMainMenu *MainMenu;
    TMenuItem *MenuFile;
    TMenuItem *MenuDatabase;
    TMenuItem *MenuItemFileNew;
    TMenuItem *N1;
    TMenuItem *MenuItemFileExit;
    TMenuItem *MenuRecord;
    TMenuItem *MenuItemFileOpen;
    TMenuItem *MenuItemFileSave;
    TMenuItem *MenuItemFileSaveAs;
    TMenuItem *MenuItemFilePrint;
    TMenuItem *N2;
    TMenuItem *MenuItemFilePrintSetup;
    TStatusBar *StatusBar;
    TImage *ImageBackground;
    TImageList *ImageListButtons;
    TLabel *LabelReferID;
    TEdit *EditReferID;
    TLabel *LabelCrossRefIndex;
    TEdit *EditIndex;
    TLabel *LabelAuthors;
    TEdit *EditAuthors;
    TLabel *LabelTitle;
    TEdit *EditTitle;
    TLabel *LabelReferType;
    TComboBox *ComboBoxReferType;
    TLabel *LabelBook;
    TEdit *EditBook;
    TLabel *LabelProceedings;
    TEdit *EditProceedings;
    TLabel *LabelConfPlace;
    TEdit *EditConferencePlace;
    TLabel *LabelConfDate;
    TEdit *EditConferenceDate;
    TLabel *LabelJournal;
    TEdit *EditJournal;
    TCSpinEdit *SpinEndPage;
    TCSpinEdit *SpinVolume;
    TCSpinEdit *SpinNumber;
    TCSpinEdit *SpinStartPage;
    TLabel *LabelEndPage;
    TLabel *LabelStartPage;
    TLabel *LabelNumber;
    TLabel *LabelVolume;
    TLabel *LabelPubYear;
    TCSpinEdit *SpinPubYear;
    TLabel *LabelPubMonth;
    TCSpinEdit *SpinPubMonth;
    TLabel *LabelKeywords;
    TEdit *EditKeywords;
    TLabel *LabelKeywodsNo;
    TEdit *EditKeywordsNo;
    TMemo *MemoAbstract;
    TLabel *LabelAbstract1;
    TToolBar *ToolBarMain;
    TToolButton *ToolButtonPageModify;
    TToolButton *ToolButtonDivider1;
    TToolButton *ToolButtonPageSearch;
    TToolButton *ToolButtonInsert;
    TToolButton *ToolButtonAppend;
    TToolButton *ToolButtonCriteria;
    TToolButton *ToolButtonDelete;
    TToolButton *ToolButtonDivider2;
    TToolButton *ToolButtonFirst;
    TToolButton *ToolButtonPrevious;
    TImageList *ImageListHotButtons;
    TImageList *ImageListDisableButtons;
    TToolButton *ToolButtonPack;
    TToolButton *ToolButtonNext;
    TLabel *LabelAbstract2;
    TToolButton *ToolButtonLast;
    TToolButton *ToolButtonOutput;
    TToolButton *ToolButtonSave;
    TToolButton *ToolButtonFind;
    TToolButton *ToolButtonChange;
    TLabel *LabelTechnicalReport;
    TEdit *EditTechnicalReport;
    TLabel *LabelNote;
    TEdit *EditNote;
    TMenuItem *MenuOptions;
    TMenuItem *MenuItemOptionsSearching;
    TMenuItem *MenuItemOptionsModifying;
    TMenuItem *N3;
    TMenuItem *MenuItemOptionsPageSearch;
    TMenuItem *MenuItemRecordFirst;
    TMenuItem *MenuItemRecordLast;
    TMenuItem *MenuItemRecordPrevious;
    TMenuItem *MenuItemRecordNext;
    TMenuItem *MenuItemOptionsPageModify;
    TMenuItem *MenuItemDatabaseAppend;
    TMenuItem *MenuItemDatabaseInsert;
    TMenuItem *MenuItemDatabaseChange;
    TMenuItem *MenuItemDatabaseDelete;
    TMenuItem *MenuItemDatabasePack;
    TMenuItem *MenuItemRecordCriteria;
    TMenuItem *MenuItemRecordFind;
    TMenuItem *MenuItemRecordSave;
    TMenuItem *MenuItemRecordOutput;
    TMenuItem *MenuHelp;
    TAnimate *AnimateCompass;
    TImage *ImageNaked;
    TMemo *MemoParser;
    TMenuItem *MenuItemHelpAbout;
    TMenuItem *MenuItemHelpContents;
    TMenuItem *MenuItemHelpIndex;
    TMenuItem *N4;
    TMenuItem *MenuItemHelpHomePage;
    TMenuItem *N5;
    TMenuItem *N6;
    TMenuItem *Customize1;
    TMenuItem *MenuItemRecordOpen;
    TMenuItem *N7;
    void __fastcall MenuItemFileExitClick(TObject *Sender);
    void __fastcall FormResize(TObject *Sender);
    void __fastcall FormCreate(TObject *Sender);

    void __fastcall ToolButtonPageModifyClick(TObject *Sender);
    void __fastcall ToolButtonPageSearchClick(TObject *Sender);
    void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
    void __fastcall ToolButtonFirstClick(TObject *Sender);
    void __fastcall ToolButtonNextClick(TObject *Sender);
    void __fastcall ToolButtonPreviousClick(TObject *Sender);
    void __fastcall ToolButtonLastClick(TObject *Sender);

    void __fastcall MenuItemRecordFirstClick(TObject *Sender);
    void __fastcall MenuItemRecordLastClick(TObject *Sender);
    void __fastcall MenuItemRecordPreviousClick(TObject *Sender);
    void __fastcall MenuItemRecordNextClick(TObject *Sender);
    void __fastcall EditIndexClick(TObject *Sender);
    void __fastcall EditIndexEnter(TObject *Sender);

    void __fastcall ComboBoxReferTypeClick(TObject *Sender);
    void __fastcall ComboBoxReferTypeEnter(TObject *Sender);
    void __fastcall EditAuthorsClick(TObject *Sender);
    void __fastcall EditAuthorsEnter(TObject *Sender);
    void __fastcall EditIndexExit(TObject *Sender);
    void __fastcall ComboBoxReferTypeExit(TObject *Sender);
    void __fastcall EditAuthorsExit(TObject *Sender);
    void __fastcall EditTitleClick(TObject *Sender);
    void __fastcall EditTitleEnter(TObject *Sender);
    void __fastcall EditTitleExit(TObject *Sender);
    void __fastcall EditBookClick(TObject *Sender);
    void __fastcall EditBookEnter(TObject *Sender);
    void __fastcall EditBookExit(TObject *Sender);
    void __fastcall EditJournalClick(TObject *Sender);
    void __fastcall EditJournalEnter(TObject *Sender);
    void __fastcall EditJournalExit(TObject *Sender);
    void __fastcall EditTechnicalReportClick(TObject *Sender);
    void __fastcall EditTechnicalReportEnter(TObject *Sender);
    void __fastcall EditTechnicalReportExit(TObject *Sender);
    void __fastcall EditNoteClick(TObject *Sender);
    void __fastcall EditNoteEnter(TObject *Sender);
    void __fastcall EditNoteExit(TObject *Sender);
    void __fastcall EditProceedingsClick(TObject *Sender);
    void __fastcall EditProceedingsEnter(TObject *Sender);
    void __fastcall EditProceedingsExit(TObject *Sender);
    void __fastcall EditConferencePlaceClick(TObject *Sender);
    void __fastcall EditConferencePlaceEnter(TObject *Sender);
    void __fastcall EditConferencePlaceExit(TObject *Sender);
    void __fastcall EditConferenceDateClick(TObject *Sender);
    void __fastcall EditConferenceDateEnter(TObject *Sender);
    void __fastcall EditConferenceDateExit(TObject *Sender);
    void __fastcall SpinVolumeExit(TObject *Sender);
    void __fastcall SpinNumberExit(TObject *Sender);
    void __fastcall SpinStartPageExit(TObject *Sender);
    void __fastcall SpinEndPageExit(TObject *Sender);
    void __fastcall SpinPubYearExit(TObject *Sender);
    void __fastcall SpinPubMonthExit(TObject *Sender);
    void __fastcall EditKeywordsClick(TObject *Sender);
    void __fastcall EditKeywordsEnter(TObject *Sender);
    void __fastcall EditKeywordsExit(TObject *Sender);
    void __fastcall MemoAbstractClick(TObject *Sender);
    void __fastcall MemoAbstractEnter(TObject *Sender);
    void __fastcall MemoAbstractExit(TObject *Sender);
    void __fastcall MenuItemOptionsPageSearchClick(TObject *Sender);
    void __fastcall MenuItemOptionsPageModifyClick(TObject *Sender);
    void __fastcall MenuItemOptionsSearchingClick(TObject *Sender);

    void __fastcall MenuItemOptionsModifyingClick(TObject *Sender);
    void __fastcall ToolButtonAppendClick(TObject *Sender);
    void __fastcall ToolButtonChangeClick(TObject *Sender);
    void __fastcall ToolButtonDeleteClick(TObject *Sender);
    void __fastcall ToolButtonInsertClick(TObject *Sender);
    void __fastcall ToolButtonPackClick(TObject *Sender);
    void __fastcall MenuItemHelpHomePageClick(TObject *Sender);
    void __fastcall MenuItemHelpAboutClick(TObject *Sender);
    void __fastcall ToolButtonCriteriaClick(TObject *Sender);
    void __fastcall ToolButtonFindClick(TObject *Sender);
private:	// User declarations
    AnsiString            m_asReferDatabaseName;
    AnsiString            m_asSoundFileName;
    bool                  m_bSearching;
    bool                  m_bSearched;
    bool                  m_bModified;
//    TReferRecModifying    m_rrModified;
    TStatus               m_eStatus;
    bool                  m_bWithParser;
//    TReplaceGrammer       m_rgReplace[];
//    TParserStream        *m_ppsParser;
    TReferenceStream     *m_prsReferenceStream;
    TReferDatabaseHeader  m_rdReferDBHeader;
    TReferRecord          m_rrWorkingReferRec;
    int                   m_nWorkingReferRec;
    TList                *m_prlReferList;
    int                   m_nSearchedReferRec;
    TList                *m_prlSearchedReferList;
private: // Added member functions.
    bool __fastcall     LoadToolButtonImage( TImageList *pDest, AnsiString asSrc );
    bool __fastcall     InitializeWorkspace();
    bool __fastcall     CopyToWorkspace( TList *prlReferList, int nWorkingRec );
    bool __fastcall     InsertAllReferRecToList();
    bool __fastcall     InitializeParser();
    System::AnsiString __fastcall ReplaceAbbereviations( System::AnsiString asOriginal );
    TReferRecord *     __fastcall CopyFromWorkspace();
public:		// User declarations
    void __fastcall     LoadAllToolButtonImages();
    void __fastcall     ShowWorkingReferRec();
//    virtual __fastcall ~TMainFormRefer(TComponent* Owner);
    __fastcall          TMainFormRefer(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TMainFormRefer *MainFormRefer;
//---------------------------------------------------------------------------
#endif