📄 ritj.cpp
字号:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "RiTj.h"
#include "DM1.h"
#include "Wait.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFormRiTj *FormRiTj;
//---------------------------------------------------------------------------
__fastcall TFormRiTj::TFormRiTj(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TFormRiTj::FormShow(TObject *Sender)
{
DateTimePicker1->DateTime = Now();
DateTimePicker2->DateTime = Now();
}
//---------------------------------------------------------------------------
void __fastcall TFormRiTj::BitBtnTjClick(TObject *Sender)
{
if (DateTimePicker2->Date < DateTimePicker1->Date)
{
ShowMessage("结束时间不能大于开始时间!");
DateTimePicker2->SetFocus();
BitBtnTj->Tag = 0;
return;
}
DataModal1->ADOStoredProcTianTj->Parameters->ParamByName("@date")->Value = DateTimePicker1->Date.FormatString("yyyy-mm-dd");
DataModal1->ADOStoredProcTianTj->Parameters->ParamByName("@enddate")->Value = DateTimePicker2->Date.FormatString("yyyy-mm-dd");
TFormWait *FormWait = new TFormWait(this);
FormWait->ProgressBar1->Visible = false;
FormWait->Caption = "正在进行统计,请稍候。。。";
FormWait->Show();
try
{
DataModal1->ADOStoredProcTianTj->ExecProc();
}
catch(Exception &exception)
{
FormWait->Close();
delete FormWait;
ShowMessage("统计出错!\n出错原因:" + exception.Message);
BitBtnTj->Tag = 0;
return;
}
FormWait->Close();
delete FormWait;
ShowMessage("统计完成!");
BitBtnTj->Tag = 1;
}
//---------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -