📄 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();
}
//---------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -