dlgyundongyuan.cpp

大学田径运动会管理系统

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

#include "dlgyundongyuan.h"
#include "fuzhu.h"
#include "frmdata.h"
//---------------------------------------------------------------------
#pragma resource "*.dfm"
Tyundongyuan *yundongyuan;
//---------------------------------------------------------------------
__fastcall Tyundongyuan::Tyundongyuan(TComponent* AOwner)
	: TForm(AOwner)
{
}
//---------------------------------------------------------------------

void __fastcall Tyundongyuan::setvalue(TDataSet * dataset)
{
int index,i;
AnsiString temp;
 id=dataset->Fields->FieldByName("ID")->AsString.Trim();
 ydybh->Text=dataset->Fields->FieldByName("YDYBH")->AsString.Trim();
 ydyxm->Text=dataset->Fields->FieldByName("YDYXM")->AsString.Trim();
 bz->Text=dataset->Fields->FieldByName("BZ")->AsString.Trim();
 dwjc->Text=dataset->Fields->FieldByName("DWJC")->AsString.Trim();
 xb->Text=dataset->Fields->FieldByName("XB")->AsString.Trim();
 lbbh=tblbbh=dataset->Fields->FieldByName("LBBH")->AsString.Trim();
 fzbh=tbfzbh=dataset->Fields->FieldByName("FZBH")->AsString.Trim();
 temp=tblbbh+":"+tbfzbh;
 index=list_lbfzbh->IndexOf(temp);
 lbfzmc->ItemIndex=index;
 tbsbxm=dataset->Fields->FieldByName("SBXM")->AsString.Trim();
qiefangxiangmu();
showxm() ;
        //TODO: Add your source code here
}

void __fastcall Tyundongyuan::refresh()
{
  m_con->Connected=false;
 m_query->Active=false;
 m_query->SQL->Clear();
 m_query->SQL->Add("select a.ID,a.DWBH,a.BZ,a.YDYBH,a.YDYXM,a.XB,a.LBBH,a.FZBH,a.SBXM,b.DWJC  from ydyb a,jsdwb b where a.DWBH=b.BH and a.DWBH='"+m_curdwbh+"' order by a.ID ASC");
 m_con->Connected=true;
 m_query->Active=true;        //TODO: Add your source code here
}

void __fastcall Tyundongyuan::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 Tyundongyuan::valide(int i)
{
return true;
        //TODO: Add your source code here
}
void __fastcall Tyundongyuan::dwjcChange(TObject *Sender)
{
int index=dwjc->ItemIndex;
if(index>=0){
m_curdwbh=list_dwbh->Strings[index].Trim();
 }
}
//---------------------------------------------------------------------------

void __fastcall Tyundongyuan::lbfzmcChange(TObject *Sender)
{
 qiefangxiangmu();
 sbxm->Clear();
 showxm();
}
//---------------------------------------------------------------------------


void __fastcall Tyundongyuan::BitBtn12Click(TObject *Sender)
{
////////
AnsiString m_id=id;
AnsiString m_sql;
m_sql="update ydyb set YDYBH='"+ydybh->Text.Trim()+"',YDYXM='"+ydyxm->Text.Trim()+"',\
           DWBH='"+m_curdwbh+"',XB='"+xb->Text.Trim()+"',\
           LBBH='"+tblbbh+"',FZBH='"+tbfzbh+"',SBXM='"+tbsbxm+"',BZ='"+bz->Text.Trim()+"' where ID="+id;
if(valide())
 execute(m_sql);///////
}
//---------------------------------------------------------------------------

void __fastcall Tyundongyuan::BitBtn2Click(TObject *Sender)
{
int index,i;
AnsiString str;
index=snbxm->ItemIndex;
if(index<0)return;
str=snbxm->Items->Strings[index];
sbxm->Items->Add(str);
snbxm->Items->Delete(index);
snbxm->Text="";
tbsbxm="";
if(sbxm->Items->Count>0){
 str=sbxm->Items->Strings[0].Trim();
 index=list_xmmc->IndexOf(str);
 tbsbxm=list_xmbh->Strings[index].Trim();
 }
for(i=1;i<sbxm->Items->Count;i++)
 {
  str=sbxm->Items->Strings[i].Trim();
  index=list_xmmc->IndexOf(str);
  tbsbxm=tbsbxm+";"+list_xmbh->Strings[index].Trim();
   }
}
//---------------------------------------------------------------------------

void __fastcall Tyundongyuan::BitBtn1Click(TObject *Sender)
{
int index,i;
AnsiString str;
index=sbxm->ItemIndex;
if(index<0)return;
str=sbxm->Items->Strings[index];
snbxm->Items->Add(str);
sbxm->Items->Delete(index);
snbxm->Text="";
tbsbxm="";
if(sbxm->Items->Count>0){
 str=sbxm->Items->Strings[0].Trim();
 index=list_xmmc->IndexOf(str);
 tbsbxm=list_xmbh->Strings[index].Trim();
 }
for(i=1;i<sbxm->Items->Count;i++)
 {
  str=sbxm->Items->Strings[i].Trim();
  index=list_xmmc->IndexOf(str);
  tbsbxm=tbsbxm+";"+list_xmbh->Strings[index].Trim();
   }
}
//---------------------------------------------------------------------------

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

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

void __fastcall Tyundongyuan::BitBtn11Click(TObject *Sender)
{
m_query->Prior();
}
//---------------------------------------------------------------------------

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

void __fastcall Tyundongyuan::BitBtn15Click(TObject *Sender)
{
AnsiString szbh;
 AnsiString m_sql;
 szbh.printf("%d%d%d%d", random(10), random(10), random(10), random(10));
 m_sql="insert ydyb (YDYBH,YDYXM,DWBH,XB,LBBH,FZBH) values ('"+szbh+"','无','"+m_curdwbh+"',\
                    '男子','"+tblbbh+"','"+tbfzbh+"')";
 if(valide(2))
   execute(m_sql);
}
//---------------------------------------------------------------------------

void __fastcall Tyundongyuan::BitBtn13Click(TObject *Sender)
{
AnsiString m_sql;
m_sql="delete from ydyb  where ID="+id;
if(valide(3)){
     execute(m_sql);
   }        
}
//---------------------------------------------------------------------------

void __fastcall Tyundongyuan::BitBtn14Click(TObject *Sender)
{
refresh();        
}
//---------------------------------------------------------------------------


void __fastcall Tyundongyuan::qiefangxiangmu()
{
TStringList *list;
AnsiString temp,bh;
list=new TStringList;
int index=lbfzmc->ItemIndex;
if(index<0)return;
temp=list_lbfzbh->Strings[index].Trim();
parsestr(temp,&list,':');
tblbbh=list->Strings[0].Trim();
tbfzbh=list->Strings[1].Trim();
snbxm->Text="";
list_xmbh->Clear();
list_xmmc->Clear();
for(index=0;index<list_zlbfzbh->Count;index++){
   if(list_zlbfzbh->Strings[index].Trim()==temp){
            bh=list_zxmbh->Strings[index].Trim();
            list_xmbh->Add(bh);
            bh=list_zxmmc->Strings[index].Trim();
            list_xmmc->Add(bh);
           }
 }
 snbxm->Items->Assign(list_xmmc);
delete list;
        //TODO: Add your source code here
}

void __fastcall Tyundongyuan::showxm()
{
TStringList *list;
int index,i;
AnsiString temp;
if(tblbbh+":"+tbfzbh!=lbbh+":"+fzbh)return;
list=new TStringList;
  parsestr(tbsbxm,&list,';');
 sbxm->Clear();
 for(i=0;i<list->Count;i++){
    temp=list->Strings[i].Trim();
    index=list_zxmbh->IndexOf(temp);
    if(index>=0)
       sbxm->Items->Add(list_zxmmc->Strings[index].Trim());
   }
 for(int i=0;i<sbxm->Items->Count;i++){
    temp=sbxm->Items->Strings[i].Trim();
    index=snbxm->Items->IndexOf(temp);
    if(index>=0) snbxm->Items->Delete(index);
   }
delete list;       //TODO: Add your source code here
}