⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 checkser.~cpp

📁 全面剖析酒店管理的内容
💻 ~CPP
字号:
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "CheckSer.h"
#include "CheckIn.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "Parent"
#pragma resource "*.dfm"
TfmCheckSer *fmCheckSer;
//---------------------------------------------------------------------------
__fastcall TfmCheckSer::TfmCheckSer(TComponent* Owner)
    : TfmParent(Owner)
{
    this->szCondition1 = "入住单号";
    this->szCondition2 = "消费内容";
    // 设置查询条件
    this->SetSeekEditStatus();
    Table1->Active = true;
    lblCount->Caption = "记录数: " + IntToStr(Table1->RecordCount) ;

}
//---------------------------------------------------------------------------
void __fastcall TfmCheckSer::btSelectClick(TObject *Sender)
{
    TfmCheckIn* pForm = new TfmCheckIn(Application);
    // 作为普通窗口
    pForm->FormStyle = fsNormal;
    pForm->Hide();
    // 不可以编辑房态
    pForm->m_nSelect = 0;
    // 数据不可以在这里编辑,设置按钮的Enable属性为false
    pForm->btNew->Enabled = false;
    pForm->btEdit->Enabled = false;
    pForm->btDelete->Enabled = false;
    pForm->btNew->Enabled = false;
    pForm->ShowModal();
    if(!pForm->Table1->FieldByName("入住单号")->IsNull )
        EditDBEdit2->Text= pForm->Table1->FieldByName("入住单号")->AsString;
    delete pForm;
}
//---------------------------------------------------------------------------
void __fastcall TfmCheckSer::btSaveClick(TObject *Sender)
{
    TfmParent::btSaveClick(Sender);
    TfmParent::BitBtn1Click(NULL);
}
//---------------------------------------------------------------------------

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -