13,822
社区成员
发帖
与我相关
我的任务
分享
if(!DataConnect->Conn->Connected)
DataConnect->Conn->Connected = true;
try{
AnsiString sql = "select * from UserConfig";
DataConnect->UserConfigQuery->Active = false;
DataConnect->UserConfigQuery->SQL->Clear();
DataConnect->UserConfigQuery->SQL->Add(sql);
DataConnect->UserConfigQuery->Active = true;
AnsiString pwd = VarToStr(DataConnect->UserConfigQuery->FieldByName("PassWord")->Value);
if(loginFrequency < 3)
{
loginFrequency++;
if(LoginPWD->Text != pwd)
{ //登陆失败
ShowMessage("密碼錯誤");
LoginPWD->Text = "";
DataConnect->UserConfigQuery->Active = false;
return ;
}else if(LoginPWD->Text == pwd)
{
//登陆成功
Login->Free();
TForm1* mainForm = new TForm1(NULL);
mainForm->Show();
}
}else
{
DataConnect->UserConfigQuery->Active = false;
DataConnect->Conn->Connected = false;
Application->Terminate();
}
DataConnect->UserConfigQuery->Active = false;
//DataConnect->Conn->Connected = false;
}catch(Exception &e)
{
ShowMessage("系統出錯");
return ;
}
//项目cpp文件里
......
Application->CreateForm(__classid(TfrmLogin), &frmLogin);
frmLogin->ShowModal(); //加上你的登陆窗体
Application->Run();
void __fastcall TMainForm::FormCreate(TObject *Sender)
{
//……其它功能代码
//调用登录函数,失败则终止程序,
if(!Login())
{
Application->Terminate();
return ;
}
//如果成功则继续执行以后代码
}
//---------------------------------------------------------------------------
bool __fastcall TMainForm::Login()
{
TLoginForm* lf = new TLoginForm(this);
lf->ShowModal();
bool result = lf->LoginResult;//LoginResult是登录窗口认证结果属性
delete lf;
return result;
}