database.~cpp

原创的,数据库的前台应用程序,实现对数据库的查询,删除,修改,更新,生成报表等功能, 使用C++ BUIDER 和SQLSERVER开发平台.

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

#include <vcl.h>
#pragma hdrstop

#include "database.h"
#include "database2.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::queryClick(TObject *Sender)
{
    if(coursename->Text==""&&eid->Text==""&&ename->Text==""&&sex->Text==""&&salary->Text==""&&marriage->Text==""&&pattern->Text==""&&jobname->Text==""&&apname->Text==""&&manager->Text==""&&certification->Text==""&&major->Text=="")
    {
         ShowMessage("请选择所查信息");
         Query1->Active=false;
    }
    else
    {
      DataSource1->DataSet=Query1;
      if(Query1->Active==false)Query1->Active=true;


      String str;

      Query1->Close();
      Query1->SQL->Clear();
      str="select distinct * from ";

      int sample;
      if(eid->Text!="")
         sample=0;
      if(ename->Text!=""||sex->Text!=""||salary->Text!=""||marriage->Text!="")
         sample=1;
      else if(pattern->Text!=""||jobname->Text!=""||apname->Text!=""||manager->Text!="")
         sample=2;
      else if(certification->Text!=""||major->Text!="")
         sample=3;
      else if(coursename->Text!="")
         sample=4;





      switch(sample)
      {
         case 0:
         {
            str=str+"employee,works_on,job,apartment,own,qualification ";
            str=str+"where employee.e_id=works_on.e_id and job.job_id=works_on.job_id ";
            str=str+"and apartment.ap_id=works_on.ap_id and employee.e_id=own.e_id ";
            str=str+"and own.q_id=qualification.q_id ";
            str=str+"and employee.e_id='"+eid->Text+"'";
            break;
         }
         case 1:
         {
            if(coursename->Text=="")
            {
              str=str+"employee,works_on,job,apartment,own,qualification ";
              str=str+"where employee.e_id=works_on.e_id and job.job_id=works_on.job_id ";
              str=str+"and apartment.ap_id=works_on.ap_id and employee.e_id=own.e_id ";
              str=str+"and own.q_id=qualification.q_id ";
              break;
            }
            if(coursename->Text!="")
            {
              str=str+"employee,works_on,job,apartment,own,qualification,train,course ";
              str=str+"where employee.e_id=works_on.e_id and job.job_id=works_on.job_id ";
              str=str+"and apartment.ap_id=works_on.ap_id and employee.e_id=own.e_id ";
              str=str+"and own.q_id=qualification.q_id and employee.e_id=train.e_id ";
              str=str+"and train.course_id=course.course_id ";
              break;
            }
         }
         case 2:
         {
           if(certification->Text==""&&major->Text==""&&coursename->Text=="")
           {
              str=str+"employee,job,apartment,works_on ";
              str=str+"where employee.e_id=works_on.e_id and job.job_id=works_on.job_id ";
              str=str+"and apartment.ap_id=works_on.ap_id ";
              break;
           }
           if(certification->Text!=""||major->Text!="")
           {
              str=str+"employee,works_on,job,apartment,own,qualification ";
              str=str+"where employee.e_id=works_on.e_id and job.job_id=works_on.job_id ";
              str=str+"and apartment.ap_id=works_on.ap_id and employee.e_id=own.e_id ";
              str=str+"and own.q_id=qualification.q_id ";
              break;
           }
           if(coursename->Text!="")
           {
              str=str+"employee,works_on,job,apartment,train,course ";
              str=str+"where employee.e_id=works_on.e_id and job.job_id=works_on.job_id ";
              str=str+"and apartment.ap_id=works_on.ap_id ";
              str=str+"and employee.e_id=train.e_id and train.course_id=course.course_id ";
              break;
           }


         }
         case 3:
         {
            if(coursename->Text=="")
            {
               str=str+"qualification,own,employee ";
               str=str+"where own.q_id=qualification.q_id and employee.e_id=own.e_id ";
               break;
            }
            if(coursename->Text!="")
            {
               str=str+"qualification,own,employee,train,course ";
               str=str+"where own.q_id=qualification.q_id and employee.e_id=own.e_id ";
               str=str+"and train.course_id=course.course_id and employee.e_id=train.e_id ";
               break;
            }
         }
         case 4:
         {
            str=str+"course,train,employee ";
            str=str+"where train.course_id=course.course_id and employee.e_id=train.e_id ";
            break;
         }
      }



      

      if(ename->Text!="")str=str+"and e_name='"+ename->Text+"'";

      if(sex->Text!="")str=str+"and sex='"+sex->Text+"'";

      if(salary->Text!="")str=str+"and salary"+salary->Text;

      if(marriage->Text!="")str=str+"and marriage='"+marriage->Text+"'";

      if(pattern->Text!="")str=str+"and pattern_of_employeement='"+pattern->Text+"'";

      if(jobname->Text!="")str=str+"and job_name='"+jobname->Text+"'";

      if(apname->Text!="")str=str+"and ap_name='"+apname->Text+"'";

      if(manager->Text!="")str=str+"and ap_manager='"+manager->Text+"'";

      if(certification->Text!="")str=str+"and certification='"+certification->Text+"'";

      if(major->Text!="")str=str+"and major='"+major->Text+"'";

      if(coursename->Text!="")str=str+"and course_name='"+coursename->Text+"'";

   //Form1->Caption=str;
   Query1->SQL->Add(str);
   ShowMessage(str);
   Query1->Open();
   }

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

void __fastcall TForm1::updateClick(TObject *Sender)
{
   DataSource1->DataSet=Table1;
   Table1->Active=false;
   if(checkeid->Checked||checkename->Checked||checksex->Checked||checksalary->Checked||checkmarriage->Checked)
      Table1->TableName="dbo.employee";
   if(checkjobname->Checked)
      Table1->TableName="dbo.job";
   if(checkpattern->Checked)
      Table1->TableName="dbo.works_on";
   if(checkapname->Checked||checkmanager->Checked)
      Table1->TableName="dbo.apartment";
   if(checkcertification->Checked||checkmajoy->Checked)
      Table1->TableName="dbo.qualification";
   Table1->Active=true;

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

void __fastcall TForm1::checkeidClick(TObject *Sender)
{
      if(checkeid->Checked==true)
      {
         checkjobname->Enabled=false;
         checkpattern->Enabled=false;
         checkapname->Enabled=false;
         checkmanager->Enabled=false;
         checkcertification->Enabled=false;
         checkmajoy->Enabled=false;
         checkcourse->Enabled=false;
      }
      if(!checkeid->Checked)

      {

         checkjobname->Enabled=true;
         checkpattern->Enabled=true;
         checkapname->Enabled=true;
         checkmanager->Enabled=true;
         checkcertification->Enabled=true;
         checkmajoy->Enabled=true;
         checkcourse->Enabled=true;
      }


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


void __fastcall TForm1::checkenameClick(TObject *Sender)
{
    if(checkename->Checked==true)
      {
         checkjobname->Enabled=false;
         checkpattern->Enabled=false;
         checkapname->Enabled=false;
         checkmanager->Enabled=false;
         checkcertification->Enabled=false;
         checkmajoy->Enabled=false;
         checkcourse->Enabled=false;
      }
      if(!checkename->Checked)
      {
         checkjobname->Enabled=true;
         checkpattern->Enabled=true;
         checkapname->Enabled=true;
         checkmanager->Enabled=true;
         checkcertification->Enabled=true;
         checkmajoy->Enabled=true;
         checkcourse->Enabled=true;
      }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::checksexClick(TObject *Sender)
{
      if(checksex->Checked==true)
      {
         checkjobname->Enabled=false;
         checkpattern->Enabled=false;
         checkapname->Enabled=false;
         checkmanager->Enabled=false;
         checkcertification->Enabled=false;
         checkmajoy->Enabled=false;
         checkcourse->Enabled=false;
      }
      if(!checksex->Checked)
      {
         checkjobname->Enabled=true;
         checkpattern->Enabled=true;
         checkapname->Enabled=true;
         checkmanager->Enabled=true;
         checkcertification->Enabled=true;
         checkmajoy->Enabled=true;
         checkcourse->Enabled=true;
      }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::checkmarriageClick(TObject *Sender)
{
      if(checkmarriage->Checked==true)
      {
         checkjobname->Enabled=false;
         checkpattern->Enabled=false;
         checkapname->Enabled=false;
         checkmanager->Enabled=false;
         checkcertification->Enabled=false;
         checkmajoy->Enabled=false;
         checkcourse->Enabled=false;
      }
      if(!checkmarriage)
      {
         checkjobname->Enabled=true;
         checkpattern->Enabled=true;
         checkapname->Enabled=true;
         checkmanager->Enabled=true;
         checkcertification->Enabled=true;
         checkmajoy->Enabled=true;
         checkcourse->Enabled=true;
      }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::checksalaryClick(TObject *Sender)
{
      if(checksalary->Checked==true)
      {
         checkjobname->Enabled=false;
         checkpattern->Enabled=false;
         checkapname->Enabled=false;
         checkmanager->Enabled=false;
         checkcertification->Enabled=false;
         checkmajoy->Enabled=false;
         checkcourse->Enabled=false;
      }
      if(!checksalary->Checked)
      {
         checkjobname->Enabled=true;
         checkpattern->Enabled=true;
         checkapname->Enabled=true;
         checkmanager->Enabled=true;
         checkcertification->Enabled=true;
         checkmajoy->Enabled=true;
         checkcourse->Enabled=true;
      }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::checkjobnameClick(TObject *Sender)
{
      if(checkjobname->Checked==true)
      {
         checkeid->Enabled=false;
         checkename->Enabled=false;
         checksex->Enabled=false;
         checkmarriage->Enabled=false;
         checksalary->Enabled=false;
         checkpattern->Enabled=false;
         checkapname->Enabled=false;
         checkmanager->Enabled=false;
         checkcertification->Enabled=false;
         checkmajoy->Enabled=false;
         checkcourse->Enabled=false;
      }
      if(checkjobname->Checked==false)
      {
         checkeid->Enabled=true;
         checkename->Enabled=true;
         checksex->Enabled=true;
         checkmarriage->Enabled=true;
         checksalary->Enabled=true;
         checkpattern->Enabled=true;
         checkapname->Enabled=true;
         checkmanager->Enabled=true;
         checkcertification->Enabled=true;
         checkcourse->Enabled=true;
      }