lookup_p_form.~cpp

该源代码是一个关于电力设备和电力行业操作管理的管理系统

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

#include <vcl.h>
#pragma hdrstop

#include "Lookup_P_Form.h"
#include "PersonForm.h"
#include "DataMod.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TLookup_P *Lookup_P;
//---------------------------------------------------------------------------
__fastcall TLookup_P::TLookup_P(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TLookup_P::ComboBox1Change(TObject *Sender)
{
/*     if(ComboBox1->Text=="文化程度")
     {
          Edit2->Visible = true;
          Label4->Visible = true;
          Edit3->Visible = true;
          Edit1->Visible = false;
          Date1->Visible = false;
          Date2->Visible = false;
     }
*/
/*     else if(ComboBox1->Text=="出生年月")
     {
          Edit2->Visible = false;
          Label4->Visible = true;
          Edit3->Visible = false;
          Edit1->Visible = false;
          Date1->Visible = true;
          Date2->Visible = true;
     }
*/
/*     else
     {
          Edit2->Visible = false;
          Label4->Visible = false;
          Edit3->Visible = false;
          Edit1->Visible = true;
          Date1->Visible = false;
          Date2->Visible = false;
     }
*/
}
//---------------------------------------------------------------------------
void __fastcall TLookup_P::FormCreate(TObject *Sender)
{
/*       Edit2->Visible = false;
       Label4->Visible = false;
       Edit3->Visible = false;
       Date1->Visible = false;
       Date2->Visible = false;
*/
}
//---------------------------------------------------------------------------
void __fastcall TLookup_P::Button1Click(TObject *Sender)
{
     String LookStr;
     AnsiString mSql;
     TDateTime  BeginDate,EndDate,WhenDate;
     if(ComboBox1->Text=="人员ID")
        if(Edit1->Text!="")
        {
             LookStr = Edit1->Text;
//             mSql = "select name from tb_employee where employee_id='"+LookStr+"'";
//             PersonFrm->q_exesql(mSql);
//             Datam->Table1->Filter = "employee_id='"+LookStr+"'";
//             Datam->Table1->Filtered = true;
//             Datam->Table1->Active = false;
//             Datam->Table1->Active = true;
//             Datam->ds_employee->DataSet = Datam->Employee_qry;
             Datam->pople_qry->Close();
             Datam->pople_qry->SQL->Clear();
             Datam->pople_qry->SQL->Add("select * from tb_employee where employee_id='"+LookStr+"'");
             Datam->pople_qry->Open();
             PersonFrm->DBGrid1->Refresh();
        }
/*
     if(ComboBox1->Text=="出生年月")
         if(DateToStr(Date1->Date)!="")
         {
             BeginDate = Date1->Date;
             if(DateToStr(Date2->Date)!="")
                 EndDate = Date2->Date;
             else EndDate = Date();
             Datam->Table1->Filter = "birth="+BeginDate;//&&"birth<="+EndDate;
             Datam->Table1->Filtered = true;
             PersonFrm->DBGrid1->Refresh();
         }
*/
     if(ComboBox1->Text=="姓名")
         if(Edit1->Text!="")
         {
             LookStr = Edit1->Text;
             Datam->pople_qry->Close();
             Datam->pople_qry->SQL->Clear();
             Datam->pople_qry->SQL->Add("select * from tb_employee where name='"+LookStr+"'");
             Datam->pople_qry->Open();
             PersonFrm->DBGrid1->Refresh();
         }

     if(ComboBox1->Text=="性别")
         if(Edit1->Text!="")
         {
             LookStr = Edit1->Text;
             Datam->pople_qry->Close();
             Datam->pople_qry->SQL->Clear();
             Datam->pople_qry->SQL->Add("select * from tb_employee where sex='"+LookStr+"'");
             Datam->pople_qry->Open();
             PersonFrm->DBGrid1->Refresh();
         }
     if(ComboBox1->Text=="文化程度")
         if(Edit1->Text!="")
         {
             LookStr = Edit1->Text;
             Datam->pople_qry->Close();
             Datam->pople_qry->SQL->Clear();
             Datam->pople_qry->SQL->Add("select * from tb_employee where education='"+LookStr+"'");
             Datam->pople_qry->Open();
             PersonFrm->DBGrid1->Refresh();
         }
     if(ComboBox1->Text=="部门")
         if(Edit1->Text!="")
         {
             LookStr = Edit1->Text;
             Datam->pople_qry->Close();
             Datam->pople_qry->SQL->Clear();
             Datam->pople_qry->SQL->Add("select * from tb_employee where department_id='"+LookStr+"'");
             Datam->pople_qry->Open();
             PersonFrm->DBGrid1->Refresh();
         }
     if(ComboBox1->Text=="职务")
         if(Edit1->Text!="")
         {
             LookStr = Edit1->Text;
             Datam->pople_qry->Close();
             Datam->pople_qry->SQL->Clear();
             Datam->pople_qry->SQL->Add("select * from tb_employee where duty='"+LookStr+"'");
             Datam->pople_qry->Open();
             PersonFrm->DBGrid1->Refresh();
         }
     Close();

}
//---------------------------------------------------------------------------
void __fastcall TLookup_P::Button2Click(TObject *Sender)
{
     Close();
}
//---------------------------------------------------------------------------