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

#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) ;
}
//---------------------------------------------------------------------------