recordreport.cpp

来自「BCB 级联表的设计源代码。有需要的朋友可以看看。BCB这个东西不知道还有人用么」· C++ 代码 · 共 37 行

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

#include <vcl.h>
#pragma hdrstop

#include "RecordReport.h"
#include "Database.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfrmRecordReport *frmRecordReport;
//---------------------------------------------------------------------------
__fastcall TfrmRecordReport::TfrmRecordReport(TComponent* Owner)
        : TForm(Owner)
{
}                         
//---------------------------------------------------------------------------
void __fastcall TfrmRecordReport::QRExpr2Print(TObject *sender,
      AnsiString &Value)
{
        Value = DateTimeToStr(Now());
}
//---------------------------------------------------------------------------
void __fastcall TfrmRecordReport::QRSysData2Print(TObject *sender,
      AnsiString &Value)
{
        Value = "第 " + Value + " 页";
}
//---------------------------------------------------------------------------
void __fastcall TfrmRecordReport::QRSysData1Print(TObject *sender,
      AnsiString &Value)
{
        Value = "打印时间：" + FormatDateTime("yyyy-mm-dd hh:nn:ss", Now());
}
//---------------------------------------------------------------------------