changpasswdform.cpp

骨灰盒规范化果腹

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

#include <vcl.h>
#pragma hdrstop

#include "ChangPasswdForm.h"
#include "DM1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfmChgPasswd *fmChgPasswd;
//---------------------------------------------------------------------------
__fastcall TfmChgPasswd::TfmChgPasswd(TComponent* Owner)
   : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TfmChgPasswd::btCancelClick(TObject *Sender)
{
   Close();   
}
//---------------------------------------------------------------------------

void __fastcall TfmChgPasswd::FormActivate(TObject *Sender)
{
   edOldPasswd->Clear();
   edPasswd1->Clear();
   edPasswd2->Clear();      
}
//---------------------------------------------------------------------------

void __fastcall TfmChgPasswd::btOkClick(TObject *Sender)
{
   if(DM->tbUser->FieldByName("密码")->AsString!=edOldPasswd->Text)
   {
      ShowMessage("旧密码错误！");
      ActiveControl=edOldPasswd;
      return;
   }
   if(edPasswd1->Text.Length()<3||edPasswd1->Text.Length()>8)
   {
      ShowMessage("密码长度不对！应该是3～8个字符。");
      ActiveControl=edPasswd1;
      return;
   }
   if(edPasswd1->Text!=edPasswd2->Text)
   {
      ShowMessage("密码不匹配！");
      ActiveControl=edPasswd1;
      return;
   }
   DM->tbUser->Edit();
   DM->tbUser->FieldByName("密码")->AsString=edPasswd1->Text;
   DM->tbUser->Post();
   ShowMessage("密码改变成功！");
   Close();
}
//---------------------------------------------------------------------------