cardselect.cpp

来自「企业员工考勤和工资管理系统」· C++ 代码 · 共 46 行

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

#include <vcl.h>
#pragma hdrstop

#include "CardSelect.h"
#include "DM1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
//TFormCardSelect *FormCardSelect;
//---------------------------------------------------------------------------
__fastcall TFormCardSelect::TFormCardSelect(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TFormCardSelect::BitBtn1Click(TObject *Sender)
{
  if (pRenShi->FieldByName("getcardflag")->AsBoolean)
  {
    Application->MessageBoxA("该员工已领卡!","错误",MB_OK);
    return;
  }
  if (pRenShi->RecNo > 0)
  nFlag = 1;
  else
  nFlag = 2;
  Close();
}
//---------------------------------------------------------------------------

void __fastcall TFormCardSelect::BitBtn2Click(TObject *Sender)
{
  nFlag = 2;
  Close();
}
//---------------------------------------------------------------------------

void __fastcall TFormCardSelect::FormShow(TObject *Sender)
{
  DataSource1->DataSet =pRenShi;  
}
//---------------------------------------------------------------------------