main.~cpp

全面剖析酒店管理的内容

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

#include <vcl.h>
#pragma hdrstop

#include "Main.h"
#include "RoomType.h"
#include "Room.h"
#include "PreOrder.h"
#include "RoomStatus.h"
#include "CheckIn.h"
#include "CheckSer.h"
#include "CheckOut.h"

//---------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfmMain *fmMain;

// 数据库开发经典案例解析  清华大学出版社
//---------------------------------------------------------
__fastcall TfmMain::TfmMain(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------
// 注意该函数为自定义函数，应该在h头文件中添加相应的申明
//public:		// User declarations
//判断子窗体是否存在
//TForm* FormExist(AnsiString szCaption);

TForm* TfmMain::FormExist(AnsiString szCaption)
{
    for(int i=0; i<this->MDIChildCount; i++)
    {
        TForm *pForm = this->MDIChildren[i];
        if(pForm->Caption == szCaption)
            return pForm;   // 已存在窗体,返回该窗体
    }
    return NULL;    // 不存在窗体,返回空值
}
//---------------------------------------------------------
void __fastcall TfmMain::mnuExitClick(TObject *Sender)
{
    Application->Terminate();
}
//-------------------------------------------------------------
void __fastcall TfmMain::mnuRoomTypeClick(TObject *Sender)
{
    // 客房类别设置
    TForm *pForm = FormExist("客房类别设置");
    // 如果已存在则激活，否则新建一个字窗体
    if(pForm)
        pForm->SetFocus();
    else
        pForm = new TfmRoomType(Application);
    pForm->Show();
}
//-------------------------------------------------------------
void __fastcall TfmMain::mnuRoomClick(TObject *Sender)
{
    // 客房信息设置
    TForm *pForm = FormExist("客房信息设置");
    // 如果已存在则激活，否则新建一个字窗体
    if(pForm)
        pForm->SetFocus();
    else
        pForm = new TfmRoom(Application);
    pForm->Height = 530;
    pForm->Show();
}
//---------------------------------------------------------------------------
void __fastcall TfmMain::mmuPreOrderClick(TObject *Sender)
{
    // 预定管理
    TForm *pForm = FormExist("预定管理");
    // 如果已存在则激活，否则新建一个字窗体
    if(pForm)
        pForm->SetFocus();
    else
        pForm = new TfmPreOrder(Application);
    pForm->Height = 530;
    pForm->Show();
}
//---------------------------------------------------------------------------
void __fastcall TfmMain::mnuCheckInClick(TObject *Sender)
{
    // 入住管理
    TForm *pForm = FormExist("入住管理");
    // 如果已存在则激活，否则新建一个字窗体
    if(pForm)
        pForm->SetFocus();
    else
        pForm = new TfmCheckIn(Application);
    pForm->Height = 530;
    pForm->Show();
}
//---------------------------------------------------------------------------
void __fastcall TfmMain::mnuCheckSerClick(TObject *Sender)
{
    // 消费记帐
    TForm *pForm = FormExist("消费记帐");
    // 如果已存在则激活，否则新建一个字窗体
    if(pForm)
        pForm->SetFocus();
    else
        pForm = new TfmCheckSer(Application);
    pForm->Height = 530;
    pForm->Show();
}
//---------------------------------------------------------------------------
void __fastcall TfmMain::mnuCheckOutClick(TObject *Sender)
{
    // 收银退房管理
    TForm *pForm = FormExist("收银退房");
    // 如果已存在则激活，否则新建一个字窗体
    if(pForm)
        pForm->SetFocus();
    else
        pForm = new TfmCheckOut(Application);
    pForm->Height = 530;
    pForm->Show();
}
//---------------------------------------------------------------------------
void __fastcall TfmMain::mnuRoomStautsClick(TObject *Sender)
{
    // 房态图管理
    TForm *pForm = FormExist("房态图");
    // 如果已存在则激活，否则新建一个字窗体
    if(pForm)
        pForm->SetFocus();
    else
        pForm = new TfmRoomStatus(Application);
    // 可以编辑房态
    ((TfmRoomStatus*)pForm)->SetSelect(1);
    pForm->Height = 530;
    pForm->Show();
}
//---------------------------------------------------------------------------