yichang.cpp

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

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

#include <vcl.h>
#pragma hdrstop

#include "YiChang.h"
#include "DM1.h"
#include "QuerySql.h"
#include "SortSelect.h"
#include "PrintSet.h"
#include "ColumnSelect.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFormYiChang *FormYiChang;

//---------------------------------------------------------------------------
__fastcall TFormYiChang::TFormYiChang(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TFormYiChang::FormClose(TObject *Sender,
      TCloseAction &Action)
{
  pQuery1->Close();
  pQuery1->SQL->Clear();
  Action = caFree;
}
//---------------------------------------------------------------------------
void __fastcall TFormYiChang::FormShow(TObject *Sender)
{


   TIniFile* pIni = new TIniFile(ExtractFilePath(Application->ExeName) + "reckq.ini");
   pIni->ReadSection(Name,ComboBoxCol->Items);
   for (int i= 0; i< ComboBoxCol->Items->Count;i++)
   {
     pIni->ReadBool(Name,ComboBoxCol->Items->Strings[i],true);
     for (int j = 0; j< DBGrid1->Columns->Count;j++)
     {
       if (DBGrid1->Columns->Items[j]->FieldName == ComboBoxCol->Items->Strings[i])
       {
         DBGrid1->Columns->Items[j]->Visible = pIni->ReadBool(Name,ComboBoxCol->Items->Strings[i],true);
         break;
       }
     }
   }
   delete pIni;

  DateTimePicker1->DateTime = Now();
  DateTimePicker2->DateTime = Now();
  pQuery1->Close();
  pQuery1->SQL->Clear();
  pQuery1->SQL->Add("select ygbh,ygxm,bmbh,bmmc,bzbh,bzmc,kpbh,riqi,banci,sksj11,zt11,sksj12,zt12,sksj21,zt21,sksj22,zt22,sksj31,zt31,sksj32,zt32 from kq_tianbaobiao where riqi >= '" + DateTimePicker1->DateTime.FormatString("yyyy-mm-dd") + "' and riqi <= '" + DateTimePicker2->DateTime.FormatString("yyyy-mm-dd") +"' and (zt11 = '迟到' or zt11 = '不刷卡' or zt12 = '早退' or zt12 = '不刷卡' or zt21 = '迟到' or zt21 = '不刷卡' or zt22 = '早退' or zt22 = '不刷卡' or zt31 = '迟到' or zt31 = '不刷卡' or zt32 = '早退' or zt32 = '不刷卡') ");
  pQuery1->Open();
}
//---------------------------------------------------------------------------
void __fastcall TFormYiChang::FormCreate(TObject *Sender)
{
   pQuery1 = GetQuery("QYiChang");
   DataSource1->DataSet = pQuery1;
}
//---------------------------------------------------------------------------

void __fastcall TFormYiChang::BitBtnQueryClick(TObject *Sender)
{
  String sNewSql,sTemp;
  TFormQuerySql *FormQuerySql = new TFormQuerySql(this);
  FormQuerySql->pGrid = DBGrid1;
  FormQuerySql->pQuery = pQuery1;
  if(FormQuerySql->ShowModal() == mrCancel)
  {
    delete FormQuerySql;
    return;
  }
  if(FormQuerySql->sSql == "")
  {
    sTemp = " where zt11 = '迟到' or zt11 = '不刷卡' or zt12 = '早退' or zt12 = '不刷卡' or zt21 = '迟到' or zt21 = '不刷卡' or zt22 = '早退' or zt22 = '不刷卡' or zt31 = '迟到' or zt31 = '不刷卡' or zt32 = '早退' or zt32 = '不刷卡' ";
  }
  else
  {
    sTemp = " and (zt11 = '迟到' or zt11 = '不刷卡' or zt12 = '早退' or zt12 = '不刷卡' or zt21 = '迟到' or zt21 = '不刷卡' or zt22 = '早退' or zt22 = '不刷卡' or zt31 = '迟到' or zt31 = '不刷卡' or zt32 = '早退' or zt32 = '不刷卡') ";
  }
  sNewSql = "select ygbh,ygxm,bmbh,bmmc,bzbh,bzmc,kpbh,riqi,banci,sksj11,zt11,sksj12,zt12,sksj21,zt21,sksj22,zt22,sksj31,zt31,sksj32,zt32 from kq_tianbaobiao " + FormQuerySql->sSql +  sTemp +" order by riqi,ygbh";
  pQuery1->Close();
  pQuery1->SQL->Clear();
  pQuery1->SQL->Add(sNewSql);
  pQuery1->Open();
  delete FormQuerySql;
}
//---------------------------------------------------------------------------

void __fastcall TFormYiChang::BitBtnSortClick(TObject *Sender)
{
  TFormSortSelect *FormSortSelect = new TFormSortSelect(this);
  FormSortSelect->SetItem(DBGrid1);
  if (FormSortSelect->ShowModal() == mrOk)
  pQuery1->Sort = FormSortSelect->sSort;
  delete FormSortSelect;
}
//---------------------------------------------------------------------------

void __fastcall TFormYiChang::BitBtnPrintClick(TObject *Sender)
{
  TFormPrintSet *FormPrintSet = new TFormPrintSet(this);
  FormPrintSet->SetDataSource(pQuery1);
  FormPrintSet->SetGrid(DBGrid1);
  FormPrintSet->EditTitle->Text = "考勤异常报表";
  FormPrintSet->ShowModal();
  delete FormPrintSet;
}
//---------------------------------------------------------------------------

void __fastcall TFormYiChang::BitBtn1Click(TObject *Sender)
{
  TFormColumnSelect *FormColumnSelect = new TFormColumnSelect(this);
  FormColumnSelect->pGrid = DBGrid1;
  FormColumnSelect->asWinName = Name;
  FormColumnSelect->ShowModal();
  delete FormColumnSelect;
}
//---------------------------------------------------------------------------

void __fastcall TFormYiChang::BitBtn2Click(TObject *Sender)
{
  if (DateTimePicker1->Date > DateTimePicker2->Date)
  {
    ShowMessage("开始时间不能大于结束时间！");
    DateTimePicker1->SetFocus();
    return;
  }
  pQuery1->Close();
  pQuery1->SQL->Clear();
  pQuery1->SQL->Add("select ygbh,ygxm,bmbh,bmmc,bzbh,bzmc,kpbh,riqi,banci,sksj11,zt11,sksj12,zt12,sksj21,zt21,sksj22,zt22,sksj31,zt31,sksj32,zt32 from kq_tianbaobiao where riqi >= '" + DateTimePicker1->DateTime.FormatString("yyyy-mm-dd") + "' and riqi <= '" + DateTimePicker2->DateTime.FormatString("yyyy-mm-dd") +"' and (zt11 = '迟到' or zt11 = '不刷卡' or zt12 = '早退' or zt12 = '不刷卡' or zt21 = '迟到' or zt21 = '不刷卡' or zt22 = '早退' or zt22 = '不刷卡' or zt31 = '迟到' or zt31 = '不刷卡' or zt32 = '早退' or zt32 = '不刷卡') ");
  pQuery1->Open();

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