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

📄 person_assistant.~cpp

📁 人事管理系统
💻 ~CPP
字号:
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Person_Assistant.h"
#include "Person.h"      //添加主窗体头文件
#include "Person_Info.h" //员工资料窗口头文件
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TF_Assis *F_Assis;
//---------------------------------------------------------------------------
__fastcall TF_Assis::TF_Assis(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TF_Assis::BitBtn1Click(TObject *Sender)
{   /*****添加按钮点击事件******/
    int count_ID;               //定义辅助资料数据表记录号变量
    count_ID = ADOT_Count->FieldByName("Count_Value")->AsInteger; //取得course记录号的值
    count_ID+=1;      //记录号加1
    if(!Edit1->Text.IsEmpty()){ //输入内容为空判断
      DBLookupListBox1->ListSource->DataSet->Insert(); //插入一条辅助信息记录
      DBLookupListBox1->ListSource->DataSet->FieldByName(DBLookupListBox1->KeyField)->AsInteger = count_ID; //选课信息记录号
      DBLookupListBox1->ListSource->DataSet->FieldByName(DBLookupListBox1->ListField)->AsString = Edit1->Text;
      DBLookupListBox1->ListSource->DataSet->Post();   //执行插入操作
      ADOT_Count->Edit();   //设置计数表为可编辑
      ADOT_Count->FieldByName("Count_Value")->AsInteger = count_ID;   //加1后的记录号存入计数数据表
      ADOT_Count->Post();   //执行编辑操作
      }
}
//---------------------------------------------------------------------------
void __fastcall TF_Assis::BitBtn2Click(TObject *Sender)
{     /*****删除按钮点击事件******/
    DBLookupListBox1->ListSource->DataSet->Delete(); //删除选中的记录
}
//---------------------------------------------------------------------------

⌨️ 快捷键说明

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