utchangepass.cpp

库存管理系统源码

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

#include <vcl.h>
#pragma hdrstop

#include "utChangePass.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfmChangePass *fmChangePass;
//---------------------------------------------------------------------------
__fastcall TfmChangePass::TfmChangePass(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TfmChangePass::Button1Click(TObject *Sender)
{
    AnsiString sName,sPass1,sPass2;
    sName = edUser->Text;
    sPass1 = edPass1->Text;
    sPass2 = edPass2->Text;
    if(sPass1 != sPass2)
    {
        MessageBox(NULL,"输入密码不一致，请重新输入！","注意",MB_OK);
        return;
    }
    AnsiString sQuery;
    sQuery = "update 管理员 set 密码='" + sPass1 + "' where 用户名='" + sName +
        "'";
    Query1->Close();
    Query1->SQL->Clear();
    Query1->SQL->Add(sQuery);
    Query1->ExecSQL();
    Query1->Close();
    MessageBox(NULL,"密码修改成功！","",MB_OK);
    ModalResult = mrOk;
}

//---------------------------------------------------------------------------
void __fastcall TfmChangePass::Button2Click(TObject *Sender)
{
    ModalResult = mrCancel;    
}
//---------------------------------------------------------------------------
void __fastcall TfmChangePass::edPass2Click(TObject *Sender)
{
    Button1Click(Sender);    
}
//---------------------------------------------------------------------------