📄 bookdue.cpp
字号:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "BookDue.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "Parent"
#pragma resource "*.dfm"
TfmBookDue *fmBookDue;
//---------------------------------------------------------------------------
__fastcall TfmBookDue::TfmBookDue(TComponent* Owner)
: TfmParent(Owner)
{
this->szCondition1 = "读者编号";
this->szCondition2 = "读者条码";
this->szCondition3 = "图书编号";
// 设置查询条件
this->SetSeekEditStatus();
// 和以前的窗体不一样,我们在这里打开Table1
Table1->Active = true;
// 设置过虑条件
TDateTime dt;
dt = dt.CurrentDate();
m_szFilter = "状态='未还' and 应还时间<'";
m_szFilter += dt.DateString() + "'";
Table1->Filtered = false;
Table1->Filter = m_szFilter;
Table1->Filtered = true;
lblCount->Caption = "记录数: " + IntToStr(Table1->RecordCount) ;
}
//---------------------------------------------------------------------------
void __fastcall TfmBookDue::BitBtn1Click(TObject *Sender)
{
// 注意这里的代码
// 因为DBGrid只显示没有归还的数据
// 所以要继承搜索按钮
// 添加filter属性
TfmParent::BitBtn1Click(Sender);
AnsiString szFilter;
szFilter = Table1->Filter;
if(szFilter.Length()>0)
szFilter += " and ";
szFilter += m_szFilter;
Table1->Filtered = false;
Table1->Filter = szFilter;
Table1->Filtered = true;
lblCount->Caption = "记录数: " + IntToStr(Table1->RecordCount) ;
}
//---------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -