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

📄 main.cpp

📁 用c++builder编写的人事管理系统,主要用于公司进行人事管理,工资发放使用.界面简介好用,功能较为简单,本人本科设计时编写
💻 CPP
字号:
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Main.h"
#include "Employee.h"
#include "Department.h"
#include "Award_Pulish.h"
#include "Register.h"
#include "NewAccount.h"
#include "Login.h"
#include "db.h"
#include "About.h"
#include "changePW.h"
#include "AddAccount.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFormMain *FormMain;


//---------------------------------------------------------------------------
__fastcall TFormMain::TFormMain(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TFormMain::MEmployClick(TObject *Sender)
{

  
   if(!FormEmploy)
   {
       FormEmploy=new TFormEmploy(this);

    }
   FormEmploy->Show();
}
//---------------------------------------------------------------------------
void __fastcall TFormMain::MDepartmentClick(TObject *Sender)
{

  
  if(!FormDepartment)
   {
       FormDepartment=new TFormDepartment(this);
   }
   FormDepartment->Show();
}
//---------------------------------------------------------------------------

void __fastcall TFormMain::MA_PClick(TObject *Sender)
{


  if(!FormA_P)
   {
       FormA_P=new TFormA_P(this);
   }
   FormA_P->Show();
}
//---------------------------------------------------------------------------

void __fastcall TFormMain::N7Click(TObject *Sender)
{
Cascade();        
}
//---------------------------------------------------------------------------

void __fastcall TFormMain::N8Click(TObject *Sender)
{
       Tile(); 
}
//---------------------------------------------------------------------------

void __fastcall TFormMain::N9Click(TObject *Sender)
{
         ArrangeIcons();
}
//---------------------------------------------------------------------------

void __fastcall TFormMain::MRegisterClick(TObject *Sender)
{

       FormRegister=new TFormRegister(this);
       if(FormRegister)
       {
        FormRegister->ShowModal();
        delete FormRegister;
        }

}
//---------------------------------------------------------------------------



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

void __fastcall TFormMain::MLoginClick(TObject *Sender)
{
      FormLogin=new TFormLogin(this);
      if(FormLogin)
      {
         FormLogin->ShowModal();
         delete FormLogin;
         }
}
//---------------------------------------------------------------------------


void __fastcall TFormMain::MAboutClick(TObject *Sender)
{
          AboutBox=new TAboutBox(this);
          if(AboutBox)
          {
            AboutBox->ShowModal();
            delete AboutBox;
            }
}
//---------------------------------------------------------------------------



void __fastcall TFormMain::MchangePWClick(TObject *Sender)
{
     FormChangePW=new TFormChangePW(this);
     if(FormChangePW)
         {
           FormChangePW->ShowModal();
           delete FormChangePW;
         }
}
//---------------------------------------------------------------------------


void __fastcall TFormMain::MAddAccountClick(TObject *Sender)
{
         FormAddAccount=new TFormAddAccount(this);
         if(FormAddAccount)
            {
              FormAddAccount->ShowModal();
              delete FormAddAccount;
            }
}
//---------------------------------------------------------------------------

⌨️ 快捷键说明

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