ydfjfjj.cpp

营业用电管理系统(网络版)是本公司推出的新一代软件产品

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

#include <vcl.h>
#pragma hdrstop

#include "YDfjfjj.h"
#include "YDdatam.h"
#include "YDfjfxz.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFfjfjj *Ffjfjj;
//---------------------------------------------------------------------------
__fastcall TFfjfjj::TFfjfjj(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TFfjfjj::SpeedButton10Click(TObject *Sender)
{
 Close();
}
//---------------------------------------------------------------------------
void TFfjfjj::Modify()
{
        //TODO: Add your source code here
   SpeedButton6->Caption="保存";
   SpeedButton7->Caption="还原";
   SpeedButton6->Glyph->LoadFromFile("c:\\ydgl_c\\bmps\\save.bmp");
   SpeedButton7->Glyph->LoadFromFile("c:\\ydgl_c\\bmps\\Undo.bmp");
   SpeedButton8->Enabled=false;
   SpeedButton9->Enabled=false;
   SpeedButton10->Enabled=false;
   DBGrid1->ReadOnly=false;

}

void TFfjfjj::Browse()
{
   //TODO: Add your source code here
   SpeedButton6->Caption="新增";
   SpeedButton7->Caption="修改";
   SpeedButton6->Glyph->LoadFromFile("c:\\ydgl_c\\bmps\\add.bmp");
   SpeedButton7->Glyph->LoadFromFile("c:\\ydgl_c\\bmps\\wzedit.bmp");
   SpeedButton8->Enabled=true;
   SpeedButton9->Enabled=true;
   SpeedButton10->Enabled=true;
   DBGrid1->ReadOnly=true;

}

void __fastcall TFfjfjj::SpeedButton6Click(TObject *Sender)
{
 if (SpeedButton6->Caption=="新增")
   {
    Modify();
    YDData->TBfjjj->Append();
    YDData->TBfjjj->FieldByName("FJ_HHHH")->AsString=YDData->TByhda->FieldByName("HHHH")->AsString;
    YDData->TBfjjj->FieldByName("FJ_KLBS")->AsString=YDData->TByhda->FieldByName("KLBS")->AsString;
    YDData->TBfjjj->FieldByName("FJ_XZQ")->AsString=YDData->TByhda->FieldByName("XZQ")->AsString;
    YDData->TBfjjj->FieldByName("hsqx")->AsString=YDData->TBxtcs->FieldByName("xt_hsqx")->AsString;

   }
   else
   {
    if (YDData->TBfjjj->FieldByName("FJ_DM")->AsString!="")
     {
       YDData->TBfjjj->Post();
       YDData->TBfjjj->Close();
       YDData->TBfjjj->Open();
       Browse();
      }
      else MessageBox(NULL,"附加费编号不能为空！","提示",MB_OK|MB_ICONWARNING);
   }
}
//---------------------------------------------------------------------------



void __fastcall TFfjfjj::DBGrid1EditButtonClick(TObject *Sender)
{
 Ffjfxz=new TFfjfxz(Application);
 Ffjfxz->ShowModal();
 YDData->TBfjjj->Edit();
 YDData->TBfjjj->FieldByName("FJ_DM")->AsString=Ffjfxz->jjdm;
 YDData->TBfjjj->FieldByName("FJ_MC")->AsString=Ffjfxz->jjmc;
 YDData->TBfjjj->FieldByName("FJ_DJ")->AsFloat=Ffjfxz->jjdj;
 delete Ffjfxz;
}
//---------------------------------------------------------------------------

void __fastcall TFfjfjj::SpeedButton7Click(TObject *Sender)
{
  if (SpeedButton7->Caption=="修改")
   {
    Modify();
    YDData->TBfjjj->Edit();
   }
   else
   {
     YDData->TBfjjj->Cancel();
     Browse();
   }

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

void __fastcall TFfjfjj::SpeedButton8Click(TObject *Sender)
{
  if ( Application->MessageBox("真的要吗?","提示", MB_YESNO|MB_ICONQUESTION)==IDYES)
     YDData->TBfjjj->Delete();
}
//---------------------------------------------------------------------------