mainfrm.h

醫院管理 還不錯 醫院管理 還不錯 醫院管理 還不錯

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

#ifndef MainFrmH
#define MainFrmH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Menus.hpp>
#include <ExtCtrls.hpp>
#include <ComCtrls.hpp>
#include <DBCtrls.hpp>
#include <DBGrids.hpp>
#include <Grids.hpp>
#include <ADODB.hpp>
#include <Db.hpp>
#include <Dialogs.hpp>
#include <Buttons.hpp>
//---------------------------------------------------------------------------
class TfrmMain : public TForm
{
__published:	// IDE-managed Components
    TMainMenu *MainMenu1;
    TMenuItem *miSetup;
    TMenuItem *miSetHospital;
    TMenuItem *miLogonAccount;
    TMenuItem *miWorkInf;
    TMenuItem *miModiPersonalInf;
    TMenuItem *miLononPW;
    TMenuItem *miPersonalInf;
    TMenuItem *miSend;
    TMenuItem *miExport;
    TMenuItem *miExit;
    TMenuItem *miAbout;
    TPanel *Panel1;
    TStatusBar *stsMain;
    TDateTimePicker *dtpFndDate;
    TDataSource *dsEmployee;
    TADOQuery *qryEmployee;
    TDataSource *dsMedical;
    TPanel *Panel3;
    TDBGrid *grdClientInf;
    TSaveDialog *dlgSave;
    TButton *btnAllBill;
    TMenuItem *miSystemSetup;
    TMenuItem *N15;
    TMenuItem *N16;
    TMenuItem *N17;
    TPanel *Panel5;
    TPanel *Panel6;
    TPanel *Panel7;
    TLabel *Label1;
    TSplitter *Splitter1;
    TSplitter *Splitter2;
    TMenuItem *miLogonInf;
    TMenuItem *miTableMan;
    TMenuItem *miEmployeeInf;
    TPageControl *pcRecord;
    TTabSheet *TabSheet1;
    TTabSheet *TabSheet2;
    TSplitter *Splitter3;
    TDBGrid *grdExam;
    TDBMemo *DBMemo1;
    TSplitter *Splitter4;
    TDBMemo *mmoMedical;
    TDBGrid *grdMedical;
    TPopupMenu *pmEmployeeInf;
    TMenuItem *N19;
    TMenuItem *N20;
    TMenuItem *N21;
    TMenuItem *miLanguageSwitch;
    TMenuItem *miSimChinese;
    TMenuItem *miUSEnglish;
    TDBRichEdit *rtfRemark;
    TPopupMenu *PopupMenu1;
    TMenuItem *N25;
    TMenuItem *N26;
    TMenuItem *N27;
    TPopupMenu *pmExam;
    TMenuItem *MenuItem1;
    TMenuItem *MenuItem2;
    TMenuItem *MenuItem3;
    TMenuItem *miAddEmployee;
    TMenuItem *miModiEmployee;
    TMenuItem *miDeleEmployee;
    TMenuItem *miMedicalInf;
    TMenuItem *miAddMedical;
    TMenuItem *miModiMedical;
    TMenuItem *miDeleMedical;
    TMenuItem *miExam;
    TMenuItem *miAddExam;
    TMenuItem *miModiExam;
    TMenuItem *miDeleExam;
    TDataSource *dsExam;
    TPanel *Panel2;
    TSpeedButton *btnMedicalAdd;
    TSpeedButton *btnMedicalRemove;
    TComboBox *cboCondition;
    TEdit *edtValue;
    TButton *btnSearch;
    void __fastcall FormCreate(TObject *Sender);
    void __fastcall miAboutClick(TObject *Sender);
    void __fastcall miExitClick(TObject *Sender);
    void __fastcall FormCloseQuery(TObject *Sender, bool &CanClose);
    void __fastcall miSetHospitalClick(TObject *Sender);
    void __fastcall miLogonAccountClick(TObject *Sender);
    void __fastcall miWorkInfClick(TObject *Sender);
    void __fastcall miSendClick(TObject *Sender);
    void __fastcall N4Click(TObject *Sender);
    void __fastcall btnAddBillClick(TObject *Sender);
    void __fastcall dtpFndDateChange(TObject *Sender);
    void __fastcall FormShow(TObject *Sender);
    void __fastcall miLononPWClick(TObject *Sender);
    void __fastcall miPersonalInfClick(TObject *Sender);
    void __fastcall miTableManClick(TObject *Sender);
    void __fastcall N17Click(TObject *Sender);
    void __fastcall N19Click(TObject *Sender);
    void __fastcall N20Click(TObject *Sender);
    void __fastcall miSimChineseClick(TObject *Sender);
    void __fastcall miUSEnglishClick(TObject *Sender);
    void __fastcall btnAllBillClick(TObject *Sender);
    void __fastcall miAddEmployeeClick(TObject *Sender);
    void __fastcall miDeleEmployeeClick(TObject *Sender);
    void __fastcall miModiEmployeeClick(TObject *Sender);
    void __fastcall miAddMedicalClick(TObject *Sender);
    void __fastcall miAddExamClick(TObject *Sender);
    void __fastcall miDeleExamClick(TObject *Sender);
    void __fastcall miModiExamClick(TObject *Sender);
    void __fastcall miModiMedicalClick(TObject *Sender);
    void __fastcall btnMedicalAddClick(TObject *Sender);
    void __fastcall btnMedicalRemoveClick(TObject *Sender);
    void __fastcall miDeleMedicalClick(TObject *Sender);
    void __fastcall btnSearchClick(TObject *Sender);
    void __fastcall edtValueKeyPress(TObject *Sender, char &Key);
    void __fastcall grdClientInfCellClick(TColumn *Column);
    void __fastcall grdClientInfKeyUp(TObject *Sender, WORD &Key,
          TShiftState Shift);
    void __fastcall grdClientInfDblClick(TObject *Sender);

private:
    bool m_bSearch;
    bool OpenBill();
    void OpenGoodInf();
    void OpenExistBill();
    void ExportBillInf();
    bool AddEmployeeInf();
    bool ModiEmployeeInf();
    bool SwitchLang(int nLang);
    bool DeleteEmployee(int nEmployeeId);
    void __fastcall ExamAfterOpen(TDataSet * DataSet);
    void __fastcall MedicalAfterOpen(TDataSet * DataSet);
    void __fastcall EmployeeAfterOpen(TDataSet * DataSet);
    void DisplayDetail();
public:		// User declarations
    __fastcall TfrmMain(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmMain *frmMain;
//---------------------------------------------------------------------------
#endif