reconnect.cpp

某公司资料管理系统

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

#include <vcl.h>
#pragma hdrstop

#include "ReConnect.h"
#include "DataModule.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TReConnectForm *ReConnectForm;
//---------------------------------------------------------------------------
__fastcall TReConnectForm::TReConnectForm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TReConnectForm::BitBtnOKClick(TObject *Sender)
{
    i++;
    try
    {
        MastData->Database->Params->Values["User Name"] = EditName->Text.Trim();
        MastData->Database->Params->Values["Password"] = EditPassword->Text.Trim();
      //       Decrypt(SQLConnection1->Params->Values["Password"]);

       MastData->Database->Connected=true;
       Close();
    }
    catch(...)
    {
       MastData->Database->Connected=false;
       if(i<3)
       {
           MessageBox(NULL,"用户名或密码错误，请重新输用户名或密码!","警告",MB_YESNO);
           EditName->SetFocus();
       }
       else
       if(i==3)
       {
             MessageBox(NULL,"用户名或密码错误，您不能进入本系统！！！","警告",MB_OK);
             Close();
       }
    }
}
//---------------------------------------------------------------------------
void __fastcall TReConnectForm::EditNameKeyPress(TObject *Sender,
      char &Key)
{
    if(int(Key)==13)
    {
        EditPassword->SetFocus();
    }
}
//---------------------------------------------------------------------------
void __fastcall TReConnectForm::EditPasswordKeyPress(TObject *Sender,
      char &Key)
{
    if(int(Key)==13)
    {
        BitBtnOK->SetFocus();
    }
}
//---------------------------------------------------------------------------


void __fastcall TReConnectForm::FormShow(TObject *Sender)
{
    i=0;
    EditName->Text="";
    EditPassword->Text="";
    EditName->SetFocus();       
}
//---------------------------------------------------------------------------