dfindtel.cpp

一套BCB６开发的电话管理系统

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

#include <vcl.h>
#pragma hdrstop

#include "DFindTel.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TDlgFindTel *DlgFindTel;
//---------------------------------------------------------------------------
__fastcall TDlgFindTel::TDlgFindTel( int& TypeIndex, TDateTime& BeginDate,
        TDateTime& EndDate,TComponent* Owner)
        : TypeIndex( TypeIndex), BeginDate( BeginDate), EndDate( EndDate), TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TDlgFindTel::FormClose(TObject *Sender,
      TCloseAction &Action)
{
    Action = caFree;
    DlgFindTel = NULL;
}
//---------------------------------------------------------------------------
void __fastcall TDlgFindTel::OkBtnClick(TObject *Sender)
{
    TypeIndex = RadioGroup1->ItemIndex;
    BeginDate = DPBeginDate->Date;
    EndDate = DPEndDate->Date;
}
//---------------------------------------------------------------------------