pass_pope_modify.cpp

用C++写的人事管理系统

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

#include <vcl.h>
#pragma hdrstop

#include "Pass_Pope_Modify.h"   //修改密码、权限窗体头文件
#include "Person.h"             //主窗体头文件
#include "Crypt.cpp"            //加密、解密程序文件
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TF_PP_Modi *F_PP_Modi;
//---------------------------------------------------------------------------
__fastcall TF_PP_Modi::TF_PP_Modi(TComponent* Owner)
        : TForm(Owner)
{     /*****窗体初始化事件******/
      Edit2->Visible = false;     //三个Edit对象不可见
      Edit3->Visible = false;
      Edit4->Visible = false;
      ComboBox1->Visible = false; //ComboBox1对象不可见
}
//---------------------------------------------------------------------------
void __fastcall TF_PP_Modi::CheckBox1Click(TObject *Sender)
{   /*****修改密码CheckBox点击事件******/
    if(CheckBox1->Checked){       //CheckBox1选中判断
      Edit2->Visible = true;      //三个Edit对象可见
      Edit3->Visible = true;
      Edit4->Visible = true;
      }
    else{
      Edit2->Visible = false;     //三个Edit对象不可见
      Edit3->Visible = false;
      Edit4->Visible = false;
      }
}
//---------------------------------------------------------------------------
void __fastcall TF_PP_Modi::CheckBox2Click(TObject *Sender)
{   /*****修改权限CheckBox点击事件******/
    if(CheckBox2->Checked)        //CheckBox2选中判断
      ComboBox1->Visible = true;  //ComboBox1对象可见
    else
      ComboBox1->Visible = false; //ComboBox1对象不可见
}
//---------------------------------------------------------------------------
void __fastcall TF_PP_Modi::BitBtn1Click(TObject *Sender)
{ /*****确定按钮点击事件******/
  if(CheckBox1->Checked){         //修改密码CheckBox1选中判断
    if(Edit1->Text.IsEmpty()||Edit3->Text!=Edit4->Text){
      if(Edit1->Text.IsEmpty()){  //工号输入框为空判断
      ShowMessage("请输入用户工号");
      Edit1->SetFocus();          //焦点仍在工号输入框中
      }
      if(Edit3->Text!=Edit4->Text){ //密码输入是否一致判断
      ShowMessage("输入新密码不一致，请您重新输入");
      Edit3->SetFocus();
      }
    }
    else{                       //检查用户工号和密码是否正确
      ADOQ_Modi->Close();
      ADOQ_Modi->SQL->Clear();  //清除SQL语句
      ADOQ_Modi->SQL->Add("SELECT User_ID,User_Password,User_Popedom FROM Person_User");
      ADOQ_Modi->SQL->Add("WHERE User_ID=:ID_Val");  //设置查询条件数据的两个参数ID_Val,Password
      ADOQ_Modi->SQL->Add("AND User_Password=:PassWord");
      ADOQ_Modi->Parameters->ParamByName("ID_Val")->Value = Edit1->Text;  //两个参数赋值
      ADOQ_Modi->Parameters->ParamByName("PassWord")->Value = Encrypt(Edit2->Text);
      ADOQ_Modi->Open();       //执行SQL语句 
      if(ADOQ_Modi->RecordCount!=1){
        ShowMessage("密码不正确，请重新输入");
        Edit2->SetFocus();
      }
      else{
        ADOQ_Modi->Edit();     //进入记录编辑状态
        ADOQ_Modi->FieldByName("User_Password")->Value = Encrypt(Edit3->Text);
        ADOQ_Modi->Post();
        ShowMessage("密码修改成功");
      }
    }
  }
  if(CheckBox2->Checked){ //修改权限CheckBox2选中判断
    if(ComboBox1->Text.IsEmpty()){
      ShowMessage("请您选择权限类型");
      ComboBox1->SetFocus();
    }
    else{    //检查用户工号和密码是否正确
      ADOQ_Modi->Close();
      ADOQ_Modi->SQL->Clear();
      ADOQ_Modi->SQL->Add("SELECT User_ID,User_Popedom FROM Person_User");
      ADOQ_Modi->SQL->Add("WHERE User_ID=:User_Val"); //设置参数
      ADOQ_Modi->Parameters->ParamByName("User_Val")->Value = Edit1->Text;  //参数赋值      
      ADOQ_Modi->Open();
      if(ADOQ_Modi->RecordCount!=1){
        ShowMessage("此用户工号不存在");
        Edit1->SetFocus();
      }
      else{
        ADOQ_Modi->Edit();  //进入记录编辑状态
        ADOQ_Modi->FieldByName("User_Popedom")->Value = ComboBox1->Text;
        ADOQ_Modi->Post();
        ShowMessage("权限修改成功");
      }
    }
  }
  F_PP_Modi->Close();
}
//---------------------------------------------------------------------------
void __fastcall TF_PP_Modi::BitBtn2Click(TObject *Sender)
{   /*****取消按钮点击事件******/
    F_PP_Modi->Close();        
}
//---------------------------------------------------------------------------