password.cpp

某公司资料管理系统

//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "Password.h"
#include "Main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TPasswordForm *PasswordForm;
//---------------------------------------------------------------------------
__fastcall TPasswordForm::TPasswordForm(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TPasswordForm::EditOldPassKeyDown(TObject *Sender,
      WORD &Key, TShiftState Shift)
{
   if(int(Key)==13)
   {
     EditNewPass1->Enabled=true;
     EditNewPass1->SetFocus();
   }
}
//---------------------------------------------------------------------------

void __fastcall TPasswordForm::EditNewPass1KeyDown(TObject *Sender,
      WORD &Key, TShiftState Shift)
{
    if(int(Key)==13)
   {
     EditNewPass2->Enabled=true;
     EditNewPass2->SetFocus();
   }
}
//---------------------------------------------------------------------------

void __fastcall TPasswordForm::EditNewPass2KeyDown(TObject *Sender,
      WORD &Key, TShiftState Shift)
{
   if(int(Key)==13)
   {
     if(EditNewPass1->Text.Trim()==EditNewPass2->Text.Trim())
     {
        BitBtnModi->Enabled=true;
        BitBtnCancel->Enabled=true;
        BitBtnModi->SetFocus();
        EditNewPass1->Enabled=false;
        EditNewPass2->Enabled=false;
      }
      else
      {
         ShowMessage("密码输入错误,请重输!");
         EditNewPass1->Enabled=true;
         EditNewPass2->Enabled=false;
         EditNewPass1->Text="";
         EditNewPass2->Text="";
         EditNewPass1->SetFocus();
      }
   }
}
//---------------------------------------------------------------------------

void __fastcall TPasswordForm::BitBtnCancelClick(TObject *Sender)
{
  //2.16 EditName->Text="";
 //2.16 EditName->SetFocus();
  EditOldPass->Text="";
  EditNewPass1->Text="";
  EditNewPass2->Text="";
  EditOldPass->Enabled=true;
  EditOldPass->SetFocus();
  BitBtnModi->Enabled=false;
  BitBtnCancel->Enabled=false;
}
//---------------------------------------------------------------------------

void __fastcall TPasswordForm::BitBtnCloseClick(TObject *Sender)
{
//2.16  EditName->Text="";
  EditOldPass->Text="";
  EditNewPass1->Text="";
  EditNewPass2->Text="";
  BitBtnModi->Enabled=false;
  BitBtnCancel->Enabled=false;
  Close();
}
//---------------------------------------------------------------------------

void __fastcall TPasswordForm::EditNameKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
  if(int(Key)==13)
  {
     EditOldPass->Enabled=true;
     EditOldPass->SetFocus();
  }
}
//---------------------------------------------------------------------------

void __fastcall TPasswordForm::BitBtnModiClick(TObject *Sender)
{
  try
  {
        StoredProc1->Params->Items[1]->AsString=EditOldPass->Text.Trim();
        StoredProc1->Params->Items[2]->AsString=EditNewPass1->Text.Trim();
      //2.16  StoredProc1->Params->Items[3]->AsString=EditName->Text.Trim();
        StoredProc1->ExecProc();
        if(StoredProc1->Params->Items[3]->AsInteger==0)
        {
            ShowMessage("修改密码成功!...");
            //2.16EditName->Text="";
            //2.16EditName->SetFocus();
            EditOldPass->Text="";
            EditNewPass1->Text="";
            EditNewPass2->Text="";
            EditOldPass->Enabled=true;
            BitBtnModi->Enabled=false;
            BitBtnCancel->Enabled=false;
        }
        else
        {    ShowMessage("修改密码不成功!重输或退出");}
  }
  catch(...)
  {
     ShowMessage("没有此用户,或您的权限不够!");
  }
}
//---------------------------------------------------------------------------