⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 loginquery.cpp

📁 企业员工考勤和工资管理系统
💻 CPP
字号:
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "LoginQuery.h"
#include "DM1.h"
#include "QuerySql.h"
#include "SortSelect.h"
#include "PrintSet.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFormLoginQuery *FormLoginQuery;

//---------------------------------------------------------------------------
__fastcall TFormLoginQuery::TFormLoginQuery(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TFormLoginQuery::FormClose(TObject *Sender,
      TCloseAction &Action)
{
  pQuery1->Close();
  pQuery1->SQL->Clear();
}
//---------------------------------------------------------------------------
void __fastcall TFormLoginQuery::FormShow(TObject *Sender)
{
   pQuery1->Close();
   pQuery1->SQL->Clear();
   pQuery1->SQL->Add("select yhmc,quanxian,sj,zt from kq_login where 1 = 2");
   pQuery1->Open();
}
//---------------------------------------------------------------------------
void __fastcall TFormLoginQuery::FormCreate(TObject *Sender)
{
   pQuery1 = GetQuery("Query1");
   DataSource1->DataSet = pQuery1;
}
//---------------------------------------------------------------------------

void __fastcall TFormLoginQuery::BitBtnQueryClick(TObject *Sender)
{
  String sNewSql;
  TFormQuerySql *FormQuerySql = new TFormQuerySql(this);
  FormQuerySql->pGrid = DBGrid1;
  FormQuerySql->pQuery = pQuery1;
  if(FormQuerySql->ShowModal() == mrCancel)
  {
    delete FormQuerySql;
    return;
  }
  sNewSql = "select yhmc,quanxian,sj,zt from kq_login " + FormQuerySql->sSql + " order by lshao";
  pQuery1->Close();
  pQuery1->SQL->Clear();
  pQuery1->SQL->Add(sNewSql);
  pQuery1->Open();
  delete FormQuerySql;
}
//---------------------------------------------------------------------------

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

void __fastcall TFormLoginQuery::BitBtnPrintClick(TObject *Sender)
{
  TFormPrintSet *FormPrintSet = new TFormPrintSet(this);
  FormPrintSet->SetDataSource(pQuery1);
  FormPrintSet->SetGrid(DBGrid1);
  FormPrintSet->EditTitle->Text = "系统日志";
  FormPrintSet->ShowModal();
  delete FormPrintSet;
}
//---------------------------------------------------------------------------

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -