dlgxuexiao.cpp

大学田径运动会管理系统

//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "dlgxuexiao.h"
#include "frmdata.h"
//---------------------------------------------------------------------
#pragma resource "*.dfm"
Txuexiao *xuexiao;
//---------------------------------------------------------------------
__fastcall Txuexiao::Txuexiao(TComponent* AOwner)
	: TForm(AOwner)
{
}
//---------------------------------------------------------------------

void __fastcall Txuexiao::setvalue(TDataSet * dataset)
{
 id=dataset->Fields->FieldByName("ID")->AsString.Trim();
 bz->Text=dataset->Fields->FieldByName("BZ")->AsString.Trim();
 bh->Text=dataset->Fields->FieldByName("BH")->AsString.Trim();
 dwgk->Text=dataset->Fields->FieldByName("DWGK")->AsString.Trim();
 dwjc->Text=dataset->Fields->FieldByName("DWJC")->AsString.Trim();        //TODO: Add your source code here
 dwmc->Text=dataset->Fields->FieldByName("DWMC")->AsString.Trim();        //TODO: Add your source code here
}

void __fastcall Txuexiao::refresh()
{
 m_con->Connected=false;
 m_query->Active=false;
 m_query->SQL->Clear();
 m_query->SQL->Add("select * from jsdwb order by ID ASC");
 m_con->Connected=true;
 m_query->Active=true;        //TODO: Add your source code here
}

void __fastcall Txuexiao::execute(AnsiString sql)
{
 m_query->DisableControls();
 m_con->Connected=false;
 m_query->Active=false;
 m_query->SQL->Clear();
 m_query->SQL->Add(sql);
 m_con->Connected=true;
 m_query->ExecSQL();
 refresh();
 m_query->EnableControls();       //TODO: Add your source code here
}

bool __fastcall Txuexiao::valide(int i)
{
  return true;      //TODO: Add your source code here
}
void __fastcall Txuexiao::BitBtn7Click(TObject *Sender)
{
AnsiString m_sql;
m_sql="update jsdwb set BH='"+bh->Text.Trim()+"',DWMC='"+dwmc->Text.Trim()+"',DWJC='"+dwjc->Text.Trim()+"',BZ='"+bz->Text.Trim()+"',DWGK='"+dwgk->Text.Trim()+"' where ID="+id;
if(valide())
 execute(m_sql);
}
//---------------------------------------------------------------------------

void __fastcall Txuexiao::BitBtn3Click(TObject *Sender)
{
m_query->Last();        
}
//---------------------------------------------------------------------------

void __fastcall Txuexiao::BitBtn4Click(TObject *Sender)
{
m_query->First();        
}
//---------------------------------------------------------------------------

void __fastcall Txuexiao::BitBtn2Click(TObject *Sender)
{
m_query->First();        
}
//---------------------------------------------------------------------------

void __fastcall Txuexiao::BitBtn1Click(TObject *Sender)
{
m_query->Next();        
}
//---------------------------------------------------------------------------

void __fastcall Txuexiao::BitBtn6Click(TObject *Sender)
{
AnsiString m_sql;
AnsiString szbh=bh->Text.Trim();
m_sql="delete from jsdwb  where ID="+id;
if(valide(3)){
     execute(m_sql);
   }
}
//---------------------------------------------------------------------------

void __fastcall Txuexiao::BitBtn5Click(TObject *Sender)
{
AnsiString szbh;
 AnsiString m_sql;
 szbh.printf("%d%d", random(10), random(10));
 m_sql="insert jsdwb (bh,dwgk,dwjc,bz,dwmc) values ('"+szbh+"','无','单位','无','新添单位"+szbh+"')";
 if(valide(2))
   execute(m_sql);        
}
//---------------------------------------------------------------------------


void __fastcall Txuexiao::BitBtn8Click(TObject *Sender)
{
refresh();         
}
//---------------------------------------------------------------------------