⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 register.cpp

📁 用C++写的人事管理系统
💻 CPP
字号:
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Register.h" //用户注册窗体头文件
#include "Person.h"   //主窗体头文件
#include "Crypt.cpp"  //加密、解密程序文件
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TF_Register *F_Register;
//---------------------------------------------------------------------------
__fastcall TF_Register::TF_Register(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TF_Register::BitBtn1Click(TObject *Sender)
{   /*****确定按钮点击事件******/
    if(Edit1->Text.IsEmpty()||Edit3->Text!=Edit4->Text||ComboBox1->Text.IsEmpty()){
      if(Edit1->Text.IsEmpty()){      //输入工号为空判断
      ShowMessage("请输入用户工号");
      Edit1->SetFocus();
      }
      if(Edit3->Text!=Edit4->Text){   //输入密码不一致判断
      ShowMessage("输入新密码不一致,请您重新输入");
      Edit3->SetFocus();
      }
      if(ComboBox1->Text.IsEmpty()){   //权限为空判断
      ShowMessage("请您选择权限类型");
      ComboBox1->SetFocus();
      }
    }
    else{
      ADOQ_Reg->Close();
      ADOQ_Reg->SQL->Clear();  //清除SQL语句
      ADOQ_Reg->SQL->Add("INSERT INTO Person_User"); //插入一条记录 (User_ID,User_Name,User_Password,User_Popedom)
      ADOQ_Reg->SQL->Add("VALUES(:ID_Val,:Name_Val,:Pass_Val,:Pope_Val)"); //设置插入记录数据的四个参数ID_Val,Name_Val,Pass_Val,Pope_Val
      ADOQ_Reg->Parameters->ParamByName("ID_Val")->Value = Edit1->Text;    //四个参数分别赋值
      ADOQ_Reg->Parameters->ParamByName("Name_Val")->Value = Edit2->Text;
      ADOQ_Reg->Parameters->ParamByName("Pass_Val")->Value = Encrypt(Edit3->Text);
      ADOQ_Reg->Parameters->ParamByName("Pope_Val")->Value = ComboBox1->Text;
      ADOQ_Reg->Open();     //执行SQL语句]
      ShowMessage("恭喜恭喜,您已经注册成功了");
      F_Register->Close();  //关闭注册窗口,退出注册环境
    }
}
//---------------------------------------------------------------------------
void __fastcall TF_Register::BitBtn2Click(TObject *Sender)
{
    /*****取消按钮点击事件******/
    F_Register->Close();    //关闭注册窗口,退出注册环境
}
//---------------------------------------------------------------------------

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -