📄 loginquery.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 + -