kqgz.cpp

企业员工考勤和工资管理系统

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

#include <vcl.h>
#pragma hdrstop

#include "Kqgz.h"
#include "DM1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFormKqgz *FormKqgz;
//---------------------------------------------------------------------------
__fastcall TFormKqgz::TFormKqgz(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TFormKqgz::FormCreate(TObject *Sender)
{
  pCd = GetQuery("QGzCd");
  pZt = GetQuery("QGzZt");
  pPsjb = GetQuery("QGzPsjb");
  pXxjb = GetQuery("QGzXxjb");
  pJrjb = GetQuery("QGzJrjb");
  pSkwxsj = GetQuery("QGzSkwxsj");
  pCd->Open();
  pZt->Open();
  pPsjb->Open();
  pXxjb->Open();
  pJrjb->Open();
  pSkwxsj->Open();
  DataSource1->DataSet = pCd;
  DataSource2->DataSet = pZt;
  DataSource3->DataSet = pXxjb;
  DataSource4->DataSet = pJrjb;
  DataSource5->DataSet = pSkwxsj;
}//---------------------------------------------------------------------------
void __fastcall TFormKqgz::BitBtn1Click(TObject *Sender)
{
  if (StrToInt(Trim(DBEdit1->Text)) < 0)
    {
       ShowMessage("时间不能为负数！");
       DBEdit1->SetFocus();
       return;
    }
  if (StrToInt(Trim(DBEdit2->Text)) < 0)
    {
       ShowMessage("时间不能为负数！");
       DBEdit2->SetFocus();
       return;
    }
  pCd->Edit();
  pZt->Edit();
  try
    {
      pCd->Post();
    }
  catch(Exception &exception)
    {
      ShowMessage("保存失败！\n因为：" + exception.Message);
      return;
    }

   try
    {
      pZt->Post();
    }
  catch(Exception &exception)
    {
      ShowMessage("保存失败！\n因为：" + exception.Message);
      return;
    }
  ShowMessage("保存成功！");
}
//---------------------------------------------------------------------------
void __fastcall TFormKqgz::FormClose(TObject *Sender, TCloseAction &Action)
{
  pCd->Close();
  pZt->Close();
  pPsjb->Close();
  pXxjb->Close();
  pJrjb->Close();
}
//---------------------------------------------------------------------------

void __fastcall TFormKqgz::RBDnjsClick(TObject *Sender)
{
  for (int i = 0;i < GroupBox1->ControlCount ; i++)
    {
      GroupBox1->Controls[i]->Enabled = true;
    }
}
//---------------------------------------------------------------------------

void __fastcall TFormKqgz::RBSdlrClick(TObject *Sender)
{
  for (int i = 0;i < GroupBox1->ControlCount ; i++)
    {
      GroupBox1->Controls[i]->Enabled = false;
    }
}
//---------------------------------------------------------------------------

void __fastcall TFormKqgz::FormShow(TObject *Sender)
{
  if (pPsjb->FieldByName("fs")->AsInteger == 3)
    {
      RBSdlr->Checked = true;
      RBSdlrClick(this);
    }
  else
    {
      RBDnjs->Checked = true;
      RBDnjsClick(this);
    }
  if (pPsjb->FieldByName("fs")->AsInteger == 1) RBYs->Checked = true;
  else if (pPsjb->FieldByName("fs")->AsInteger == 2) RBSk->Checked = true;
  MaskEditFz->Text = pPsjb->FieldByName("sj")->AsString;
}
//---------------------------------------------------------------------------

void __fastcall TFormKqgz::BitBtn3Click(TObject *Sender)
{
  int nJbfs,nYssj;
  if (RBSdlr->Checked) nJbfs = 3;
  else if (RBYs->Checked )
    {
      nJbfs = 1;
      if (Trim(MaskEditFz->Text) == "")
        {
          ShowMessage("请输入延时时间！");
          MaskEditFz->SetFocus();
          return;
        }
    }
  else if (RBSk->Checked ) nJbfs = 2;
  else
    {
      ShowMessage("请选择加班规则！");
      return;
    }
  if (Trim(MaskEditFz->Text) == "") nYssj = 0;
  else nYssj = Trim(MaskEditFz->Text).ToInt();
  pPsjb->Edit();
  pPsjb->FieldByName("fs")->AsInteger = nJbfs;
  pPsjb->FieldByName("sj")->AsInteger = nYssj;
  try
    {
      pPsjb->Post();
    }
  catch(Exception &exception)
    {
      ShowMessage("保存失败！\n因为：" + exception.Message);
      return;
    }
  ShowMessage("保存成功！");

}
//---------------------------------------------------------------------------

void __fastcall TFormKqgz::BitBtn4Click(TObject *Sender)
{
  pXxjb->Edit();
  try
    {
      pXxjb->Post();
    }
  catch(Exception &exception)
    {
      ShowMessage("保存失败！\n因为：" + exception.Message);
      return;
    }
  ShowMessage("保存成功！");
}
//---------------------------------------------------------------------------

void __fastcall TFormKqgz::BitBtn5Click(TObject *Sender)
{
   pJrjb->Edit();
   try
    {
      pJrjb->Post();
    }
  catch(Exception &exception)
    {
      ShowMessage("保存失败！\n因为：" + exception.Message);
      return;
    }
  ShowMessage("保存成功！");
}
//---------------------------------------------------------------------------


void __fastcall TFormKqgz::BitBtn6Click(TObject *Sender)
{
  if (Trim(DBEdit3->Text) == "")
    {
      ShowMessage("请输入时间！");
      DBEdit3->SetFocus();
      return;
    }
  if (StrToInt(Trim(DBEdit3->Text)) < 0)
    {
      ShowMessage("时间不能为负数！");
      DBEdit3->SetFocus();
      return;
    }
  pSkwxsj->Edit();
  try
    {
      pSkwxsj->Post();
    }
  catch(Exception &exception)
    {
      ShowMessage("保存失败！\n因为：" + exception.Message);
      return;
    }
  ShowMessage("保存成功！");
}
//---------------------------------------------------------------------------