userpasswd.cpp

某公司资料管理系统

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

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

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

void __fastcall TUserPasswdForm::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
      {
         Application->MessageBox("密码输入错误,请重输!","提示",MB_OK);
         EditNewPass1->Enabled=true;
         EditNewPass2->Enabled=false;
         EditNewPass1->Text="";
         EditNewPass2->Text="";
         EditNewPass1->SetFocus();
      }
   }
}
//---------------------------------------------------------------------------

void __fastcall TUserPasswdForm::BitBtnCancelClick(TObject *Sender)
{

  EditOldPass->Text="";
  EditNewPass1->Text="";
  EditNewPass2->Text="";
  EditOldPass->Enabled=true;
  EditOldPass->SetFocus();
  BitBtnModi->Enabled=false;
  BitBtnCancel->Enabled=false;
}
//---------------------------------------------------------------------------

void __fastcall TUserPasswdForm::BitBtnCloseClick(TObject *Sender)
{

  EditOldPass->Text="";
  EditNewPass1->Text="";
  EditNewPass2->Text="";
  BitBtnModi->Enabled=false;
  BitBtnCancel->Enabled=false;
  Close();
}
//---------------------------------------------------------------------------

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

void __fastcall TUserPasswdForm::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)
        {
            Application->MessageBox("修改密码成功!...","提示",MB_OK);

            EditOldPass->Text="";
            EditNewPass1->Text="";
            EditNewPass2->Text="";
            EditOldPass->Enabled=true;
            BitBtnModi->Enabled=false;
            BitBtnCancel->Enabled=false;
        }
        else
        {   Application->MessageBox("修改密码不成功!重输或退出","提示",MB_OK); }

  }
  catch(...)
  {
     Application->MessageBox("没有此用户,或您的权限不够!","提示",MB_OK);
  }
}
//---------------------------------------------------------------------------