unit6.~cpp

来自「射频卡发卡管理系统的PC端软件」· ~CPP 代码 · 共 286 行

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

#include <vcl.h>
#pragma hdrstop

#include "Unit6.h"
#include "Unit2.h"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm6 *Form6;

int numSchool;
int numDev;
int numClass;
//---------------------------------------------------------------------------
__fastcall TForm6::TForm6(TComponent* Owner)
        : TForm(Owner)
{
        DBEdit1->Enabled=False;
        DBEdit2->Enabled=False;
        //DBEdit3->Enabled=False;

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

void __fastcall TForm6::BitBtn2Click(TObject *Sender)
{
        BitBtn2->Enabled=False;
/*      DBEdit1->Enabled=True;
        DBEdit2->Enabled=True;
        DBEdit3->Enabled=True;
        Button1->Enabled=True;
        DBEdit1->Color=clWindow;
        DBEdit2->Color=clWindow;
        DBEdit3->Color=clWindow;
        BitBtn1->Enabled=True;

        */
        switch(RadioGroup1->ItemIndex)
        {
        case 0:
                Form1->ShoolTable->Edit();
        break;
        case 1:
                Form1->DepTable->Edit();
        break;

        case 2:

                Form1->ClassTable->Edit();
        break;
        default:
         break;
        }

}
//---------------------------------------------------------------------------
void __fastcall TForm6::BitBtn3Click(TObject *Sender)
{

        BitBtn2->Enabled=False;
        BitBtn_send->Enabled=True;
/*        DBEdit1->Enabled=True;
        DBEdit2->Enabled=True;
        DBEdit3->Enabled=True;
        Button1->Enabled=True;
        DBEdit1->Color=clWindow;
        DBEdit2->Color=clWindow;
        DBEdit3->Color=clWindow;
 
        Form1->ShoolTable->Insert();
        */
        switch(RadioGroup1->ItemIndex)
        {
        case 0:
                Form1->ShoolTable->Insert();
               //自增域需要赋初值
                numSchool++;
                Form1->ShoolTable->FieldByName("SCHOOLID")->AsInteger = numSchool;

                Form1->ShoolTable->Post();
                Form1->ShoolTable->Edit();

        break;
        case 1:
        {
                Form1->DepTable->Insert();
              //自增域需要赋初值
                numDev++;
                Form1->DepTable->FieldByName("DEPID")->AsInteger = numDev;
                //获得学校ID
                int id = Form1->ShoolTable->FieldByName("SCHOOLID")->AsInteger;
                Form1->DepTable->FieldByName("SCHOOLID")->AsInteger = id;

                Form1->DepTable->Post();
                Form1->DepTable->Edit();
        }

        break;

        case 2:
        {
                Form1->ClassTable->Insert();
                //自增域需要赋初值
                numClass++;
                Form1->ClassTable->FieldByName("CLASSID")->AsInteger = numClass;
                //获得学校ID
                int id = Form1->ShoolTable->FieldByName("SCHOOLID")->AsInteger;
                Form1->ClassTable->FieldByName("SCHOOLID")->AsInteger = id;
                //获得专业ID
                id = Form1->DepTable->FieldByName("DEPID")->AsInteger;
                Form1->ClassTable->FieldByName("DEPID")->AsInteger = id;
        }
        break;
        default:
         break;
        }

}
//---------------------------------------------------------------------------
void __fastcall TForm6::BitBtn4Click(TObject *Sender)
{
        switch(RadioGroup1->ItemIndex)
        {
        case 0:
                if(Form1->ShoolTable->IsEmpty() == False)
                Form1->ShoolTable->Delete();
        break;
        case 1:
                if(Form1->DepTable->IsEmpty() == False)
                Form1->DepTable->Delete();
        break;

        case 2:
                if(Form1->ClassTable->IsEmpty() == False)
                Form1->ClassTable->Delete();
        break;
        default:
         break;
        }
}
void __fastcall TForm6::RadioGroup1Click(TObject *Sender)
{
        switch(RadioGroup1->ItemIndex)
        {
        case 0:
        DBEdit1->Enabled=True;
        DBEdit2->Enabled=False;
        DBEdit3->Enabled=False;

        break;
        case 1:
        DBEdit1->Enabled=False;
        DBEdit2->Enabled=True;
        DBEdit3->Enabled=False;
        break;

        case 2:
        DBEdit1->Enabled=False;
        DBEdit2->Enabled=False;
        DBEdit3->Enabled=True;
        break;
        default:
         break;
        }
}
//---------------------------------------------------------------------------

void __fastcall TForm6::FormShow(TObject *Sender)
{
        numSchool = 0;
        Form1->ShoolTable->First();
        while(!Form1->ShoolTable->Eof)
        {
                numSchool++;
                Form1->ShoolTable->Next();
        }

        numDev = 0;
        Form1->DepTable->First();
        while(!Form1->DepTable->Eof)
        {
                numDev++;
                Form1->DepTable->Next();
        }

        numClass = 0;
        Form1->ClassTable->First();
        while(!Form1->ClassTable->Eof)
        {
                numClass++;
                Form1->ClassTable->Next();
        }
        
}
//---------------------------------------------------------------------------

void __fastcall TForm6::BitBtn_sendClick(TObject *Sender)
{
        switch(RadioGroup1->ItemIndex)
        {
        case 0:
                if (numSchool == 0)
                {

                }else
                {
                    Form1->ShoolTable->Edit();
                    Form1->ShoolTable->Post();
                }
                //Form1->ShoolTable->UpdateRecord();
                //Form1->ShoolTable->Refresh();

                break;
        case 1:
                if (numDev == 0)
                {

                }else
                {
                Form1->DepTable->Edit();
               // if(Form1->DepTable->FieldByName("DEPID")->AsInteger == 0)
               // {
               //         if(MessageBox(this->Handle,"新增加一条记录?","学校资料管理",MB_YESNO|MB_ICONQUESTION)== IDYES)
               //         {
               //                Form1->DepTable->FieldByName("DEPID")->AsInteger = GEN_ID;
                               //Form1->DepTable->Post();
                //        }
               // }
               // else
               // {
               Form1->DepTable->Post();
               }
               // }
                //Form1->DepTable->Edit();
                //Form1->DepTable->Post();
                //Form1->DepTable->UpdateRecord();
                //Form1->DepTable->Refresh();

                 break;

        case 2:
              if (numClass == 0)
              {
              }else
              {
               Form1->ClassTable->Edit();
              // if(Form1->ClassTable->FieldByName("CLASSID")->AsInteger == 0)
              //  {
              //          if(MessageBox(this->Handle,"新增加一条记录?","学校资料管理",MB_YESNO|MB_ICONQUESTION)== IDYES)
              //          {
              //                 Form1->ClassTable->FieldByName("CLASSID")->AsInteger = GEN_ID;
               Form1->ClassTable->Post();
               }
                //        }
              //  }
              //  else
               // {

               //         Form1->ClassTable->Post();
              //  }
                //Form1->ClassTable->UpdateRecord();
                //Form1->ClassTable->Refresh();
                break;
        
        default:
                break;
        }
        //Form1->IBTransaction1->Commit();
        //Form1->IBTable1->Open();
        //Form1->IBTable2->Open();
        //Form1->IBTable1->Open();
         BitBtn2->Enabled=True;
        //BitBtn1->Enabled=False;        
}
//---------------------------------------------------------------------------

void __fastcall TForm6::Button1Click(TObject *Sender)
{
        ShowMessage("f");        
}
//---------------------------------------------------------------------------