📄 login.cpp
字号:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "login.h"
#include "main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFm_login *Fm_login;
//---------------------------------------------------------------------------
__fastcall TFm_login::TFm_login(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TFm_login::bt_loginClick(TObject *Sender)
{
static int count;
AnsiString S;
S="select * from operator where gongh='"+Edit1->Text+"' and koul='"+Edit2->Text+"'";
pwdQuery->Close();
pwdQuery->SQL->Clear();
pwdQuery->SQL->Add(S);
pwdQuery->Open();
if(pwdQuery->Eof)
{
count++;
if(count>=3)
{
pwdQuery->Close();
Fm_login->Close();
MainForm->Close();
}
Application->MessageBox("用户名或密码错误,请重新输入!", "错误", MB_ICONERROR+MB_OK);
Edit2->Text="";
Edit2->SetFocus();
}
else
{
MainForm->loginok=true;
MainForm->StatusBar1->Panels->Items[1]->Text="操作员:"+pwdQuery->FieldByName("xingm")->AsString;
Edit1->Text="";
Edit2->Text="";
pwdQuery->Close();
Fm_login->Close();
}
}
//---------------------------------------------------------------------------
void __fastcall TFm_login::bt_exitClick(TObject *Sender)
{
Close();
MainForm->Close();
}
//---------------------------------------------------------------------------
//---------------------------------------------------------------------------
void __fastcall TFm_login::Edit1KeyPress(TObject *Sender, char &Key)
{
if(Key==char(13))
SelectNext((TWinControl*)(Sender),true,true);
//回车后自动进入下一控件
}
//-------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -