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

#include <vcl.h>
#pragma hdrstop

#include "YDgddy.h"
#include "YDdatam.h"
#include "YDxlxz.h"
#include "YDpbxz.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFgddy *Fgddy;
//---------------------------------------------------------------------------
__fastcall TFgddy::TFgddy(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TFgddy::FormCreate(TObject *Sender)
{

  YDData->TBtfbz->Open();
  YDData->TBtfbz->First();
  while (!YDData->TBtfbz->Eof)
  {
    DBComboBox2->Items->Add(YDData->TBtfbz->FieldByName("dy_dydj")->AsString);
    YDData->TBtfbz->Next();
  }
   Narefresh();
 }
//---------------------------------------------------------------------------
void TFgddy::Modify()
{
        //TODO: Add your source code here
   SpeedButton5->Caption="保存";
   SpeedButton6->Caption="還原";
   SpeedButton5->Glyph->LoadFromFile("c:\\ydgl_c\\bmps\\save.bmp");
   SpeedButton6->Glyph->LoadFromFile("c:\\ydgl_c\\bmps\\Undo.bmp");
   SpeedButton1->Enabled=false;
   SpeedButton2->Enabled=false;
   SpeedButton3->Enabled=false;
   SpeedButton4->Enabled=false;
   SpeedButton7->Enabled=false;
   SpeedButton8->Enabled=false;
   SpeedButton9->Enabled=false;
   SpeedButton10->Enabled=false;
   Panel1->Enabled=true;
   DBGrid1->Enabled=false;
}

void TFgddy::Browse()
{
   //TODO: Add your source code here
   SpeedButton5->Caption="新增";
   SpeedButton6->Caption="修改";
   SpeedButton5->Glyph->LoadFromFile("c:\\ydgl_c\\bmps\\add.bmp");
   SpeedButton6->Glyph->LoadFromFile("c:\\ydgl_c\\bmps\\wzedit.bmp");
   SpeedButton1->Enabled=true;
   SpeedButton2->Enabled=true;
   SpeedButton3->Enabled=true;
   SpeedButton4->Enabled=true;
   SpeedButton7->Enabled=true;
   SpeedButton8->Enabled=true;
   SpeedButton9->Enabled=true;
   SpeedButton10->Enabled=true;
   Panel1->Enabled=false;
   DBGrid1->Enabled=true;
}

void TFgddy::Narefresh()
{
     SpeedButton1->Enabled=!YDData->TBgddy->Bof;
     SpeedButton2->Enabled=!YDData->TBgddy->Bof;
     SpeedButton3->Enabled=!YDData->TBgddy->Eof;
     SpeedButton4->Enabled=!YDData->TBgddy->Eof;
    if(YDData->TBgddy->Eof&&YDData->TBgddy->Bof)
    {
      SpeedButton1->Enabled=false;
      SpeedButton2->Enabled=false;
      SpeedButton3->Enabled=false;
      SpeedButton4->Enabled=false;
      SpeedButton7->Enabled=false;
      SpeedButton8->Enabled=false;
    };

}
void __fastcall TFgddy::SpeedButton2Click(TObject *Sender)
{
 YDData->TBgddy->Prior();
 Narefresh();

}
//---------------------------------------------------------------------------
void __fastcall TFgddy::SpeedButton1Click(TObject *Sender)
{
 YDData->TBgddy->First();
 Narefresh();

}
//---------------------------------------------------------------------------
void __fastcall TFgddy::SpeedButton3Click(TObject *Sender)
{
 YDData->TBgddy->Next();
 Narefresh();

}
//---------------------------------------------------------------------------
void __fastcall TFgddy::SpeedButton4Click(TObject *Sender)
{
 YDData->TBgddy->Last();
 Narefresh();

}
//---------------------------------------------------------------------------
void __fastcall TFgddy::SpeedButton7Click(TObject *Sender)
{
  if ( Application->MessageBox("真的要?jiǎng)h除這條記錄嗎?","提示", MB_YESNO|MB_ICONQUESTION)==IDYES)
  {
   YDData->TBgddy->Delete();
   Narefresh();
  };

}
//---------------------------------------------------------------------------
void __fastcall TFgddy::SpeedButton6Click(TObject *Sender)
{
  if (SpeedButton6->Caption=="修改")
   {
    YDData->TBgddy->Edit();
    Modify();
   }
   else
   {
     YDData->TBgddy->Cancel();
     Browse();
   }

}
//---------------------------------------------------------------------------
void __fastcall TFgddy::SpeedButton5Click(TObject *Sender)
{
 if (SpeedButton5->Caption=="新增")
   {
    Modify();
//    DBEdit1->SetFocus();
    YDData->TBgddy->Append();
    YDData->TBgddy->FieldByName("GY_SQH")->AsString=
    YDData->TBbzsq->FieldByName("SQ_BH")->AsString;
    YDData->TBgddy->FieldByName("GY_QH")->AsString=
    YDData->TBbzsq->FieldByName("SQ_QH")->AsString;
    YDData->TBgddy->FieldByName("GY_HH")->AsString=
    YDData->TBbzsq->FieldByName("SQ_HH")->AsString;
   }
   else
   {
    if (Trim(DBComboBox1->Text)!=""&&Trim(DBComboBox2->Text)!="")
     {
       YDData->TBgddy->Post();
       YDData->TBgddy->Close();
       YDData->TBgddy->Open();
       Browse();
      }
      else MessageBox(NULL,"電源名稱或供電電壓不能為空！","提示",MB_OK|MB_ICONWARNING);
   }

}
//---------------------------------------------------------------------------
void __fastcall TFgddy::SpeedButton11Click(TObject *Sender)
{
 Fxlxz=new TFxlxz(Application);
 Fxlxz->ShowModal();
 YDData->TBgddy->FieldByName("GY_XLBH")->AsString=Fxlxz->xlbh;
 delete Fxlxz;
}
//---------------------------------------------------------------------------
void __fastcall TFgddy::SpeedButton10Click(TObject *Sender)
{
  Close();        
}
//---------------------------------------------------------------------------
void __fastcall TFgddy::SpeedButton12Click(TObject *Sender)
{
 Fpbxz=new TFpbxz(Application);
 Fpbxz->ShowModal();
 YDData->TBgddy->FieldByName("GY_PBBH")->AsString=Fpbxz->pbbh;
 YDData->TBgddy->FieldByName("GY_JXGH")->AsString=Fpbxz->jxgh;
 delete Fpbxz;

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