chpassword.cpp

来自「一个以前收集的基于C/S架构的ERP客户端源代码」· C++ 代码 · 共 71 行

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

#include <vcl.h>
#pragma hdrstop

#include "ChPassWord.h"
#include "KSFunction.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "SDEdit"
#pragma resource "*.dfm"
TfrmChPassWord *frmChPassWord;
//---------------------------------------------------------------------------
__fastcall TfrmChPassWord::TfrmChPassWord(TComponent* Owner, HWND chWnd, AnsiString MidCode,AnsiString WhereStr)
        : TStdBaseForm(Owner,chWnd,MidCode,WhereStr)
{
        seUserName->Caption=g_sdUserName;
        seNewPa->Text="";
        seNewPaCh->Text="";
}
//---------------------------------------------------------------------------


void __fastcall TfrmChPassWord::btOkClick(TObject *Sender)
{
      AnsiString Passtemp;
      TComResultSet *UserResultSet=new  TComResultSet(Handle,g_ClientHandle);
      if(seNewPa->Text==seNewPaCh->Text)
      {

          if(Application->MessageBox("密码更改成功，请记住新密码.","操作正确",MB_OKCANCEL)==IDOK)
          {
             Passtemp=EncAndDec(seNewPa->Text,true);
             UserResultSet->Close();
             UserResultSet->Execute("update sduser set userpassword='"+Passtemp+"' where usercode='"+g_sdUserCode+"'");
             ClearEdit();
             Close();
          }
          else
          {
            seNewPa->SetFocus();
          }
      }
      else
      {
          if(Application->MessageBox("密码更改错误！","操作错误",MB_RETRYCANCEL)==IDRETRY)
              seNewPa->SetFocus();
          else
          {
              ClearEdit();
              Close();
          }
      }
      delete UserResultSet;

}
//---------------------------------------------------------------------------
void __fastcall TfrmChPassWord::btCacelClick(TObject *Sender)
{
       ClearEdit();
       Close();
}
//---------------------------------------------------------------------------
void  TfrmChPassWord::ClearEdit()
{
      seNewPa->Text="";
      seNewPaCh->Text="";
}