yonghu.cpp

来自「企业员工考勤和工资管理系统」· C++ 代码 · 共 129 行

CPP
129
字号
//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "YongHu.h"
#include "DM1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFormYongHu *FormYongHu;
//---------------------------------------------------------------------------
__fastcall TFormYongHu::TFormYongHu(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TFormYongHu::FormCreate(TObject *Sender)
{
  pBm = GetQuery("QYongHu");
  DataSource1->DataSet = pBm;
}
//---------------------------------------------------------------------------
void __fastcall TFormYongHu::FormShow(TObject *Sender)
{

  pBm->Open();




}
//---------------------------------------------------------------------------
void __fastcall TFormYongHu::FormClose(TObject *Sender,
      TCloseAction &Action)
{
  pBm->Close();

}
//---------------------------------------------------------------------------
void __fastcall TFormYongHu::BitBtnAddClick(TObject *Sender)
{
  DBGrid1->Enabled = false;
  GroupBox1->Enabled = true;
  BitBtnQuit->Enabled = false;
  BitBtnSave->Enabled = true;
  BitBtnCancel->Enabled = true;
  BitBtnAdd->Enabled = false;
  BitBtnEdit->Enabled = false;
  BitBtnDelete->Enabled = false;


  DBEditBh->SetFocus();

  pBm->Append();
  pBm->FieldByName("biaozi")->AsBoolean = 0 ;

}
//---------------------------------------------------------------------------
void __fastcall TFormYongHu::BitBtnDeleteClick(TObject *Sender)
{
  if (pBm->RecNo < 1) return;
  if (Application->MessageBoxA("确定要删除吗?","询问",MB_YESNO)==IDYES)
    {
      pBm->Delete();
    }
}
//---------------------------------------------------------------------------
void __fastcall TFormYongHu::BitBtnEditClick(TObject *Sender)
{
  DBGrid1->Enabled = false;
  GroupBox1->Enabled = true;
  BitBtnQuit->Enabled = false;
  BitBtnSave->Enabled = true;
  BitBtnCancel->Enabled = true;
  BitBtnAdd->Enabled = false;
  BitBtnEdit->Enabled = false;
  BitBtnDelete->Enabled = false;
  DBEditBh->SetFocus();
  pBm->Edit();
}
//---------------------------------------------------------------------------
void __fastcall TFormYongHu::BitBtnSaveClick(TObject *Sender)
{
  try
    {
      pBm->Post();
    }
  catch(Exception &exception)
    {
      ShowMessage("保存失败!\n因为:" + exception.Message);
      BitBtnCancelClick(this);
      pBm->Close();
      pBm->Open();

      return;
    }
  //ShowMessage("保存成功!");

  DBGrid1->Enabled = true;
  GroupBox1->Enabled = false;
  BitBtnQuit->Enabled = true;
  BitBtnSave->Enabled = false;
  BitBtnCancel->Enabled = false;
  BitBtnAdd->Enabled = true;
  BitBtnEdit->Enabled = true;
  BitBtnDelete->Enabled = true;
}
//---------------------------------------------------------------------------
void __fastcall TFormYongHu::BitBtnCancelClick(TObject *Sender)
{
  pBm->Cancel();
  DBGrid1->Enabled = true;
  GroupBox1->Enabled = false;
  BitBtnQuit->Enabled = true;
  BitBtnSave->Enabled = false;
  BitBtnCancel->Enabled = false;
  BitBtnAdd->Enabled = true;
  BitBtnEdit->Enabled = true;
  BitBtnDelete->Enabled = true;
}
//---------------------------------------------------------------------------






⌨️ 快捷键说明

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