?? custominpring.cpp
字號:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "CustomInPring.h"
#include "DataMoudle.h"
#include "Main.h"
#include "CustomIn.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TCustomInPringForm *CustomInPringForm;
//---------------------------------------------------------------------------
__fastcall TCustomInPringForm::TCustomInPringForm(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TCustomInPringForm::FormShow(TObject *Sender)
{
QRLabel5->Caption=MainForm->CustomInRoomNo;
QRLabel10->Caption=MainForm->TheCompany+" 旅客入住報表";
AnsiString SQL;
SQL="select a.name ,a.sex ,a.passtype,a.passNumber,b.endtime,b.starttime ,c.cost from custom a,orders b,cost c where c.orderno=b.orderno and a.customid=b.customid and b.orderno="+QuotedStr(MainForm->CustomInOrderNo);
ADOQuery1->Active=false;
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add(SQL);
ADOQuery1->Active=true;
// QuickRep1->Preview();
}
//---------------------------------------------------------------------------
void __fastcall TCustomInPringForm::FormClose(TObject *Sender,
TCloseAction &Action)
{
Action=caFree;
}
//---------------------------------------------------------------------------
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -