ubcxtj.cpp

民航飞机生产管理系统,实现了飞机定检坚控,小时卡起落卡等的坚控,并能生成工作任务包

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

#include <vcl.h>
#pragma hdrstop

#include "Ubcxtj.h"

#include "dm.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFBcxtj *FBcxtj;
TDataSet *cxb;
AnsiString querystr;
extern AnsiString dw;
//---------------------------------------------------------------------------
__fastcall TFBcxtj::TFBcxtj(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TFBcxtj::FormShow(TObject *Sender)
{

  CField->Items->Clear();
  for(int i=0;i<cxb->Fields->Count;i++)
  CField->Items->Add(cxb->Fields->Fields[i]->DisplayLabel);
  CField->ItemIndex=-1;
  CField->Text="";
  Cfu->ItemIndex=-1;
  querystr="";
  Listtj->Items->Clear();
  Listtj->ItemIndex=0;
  tjValue->Text="";
  if(!CField->Enabled||Cfu->Enabled||tjValue->Enabled)
{
CField->Enabled=true;
  Cfu->Enabled=true;
  tjValue->Enabled=true;
  }
}
//---------------------------------------------------------------------------
void __fastcall TFBcxtj::CFieldChange(TObject *Sender)
{
tjValue->ReadOnly=false;
int i=CField->ItemIndex;
if(cxb->Fields->Fields[i]->FieldName=="日期")
{
tjValue->Visible=false;
rq->Visible=true;
leibie->Visible=false;
tjValue->Text=DateToStr(rq->Date);
}
else
{
tjValue->Visible=true;
tjValue->ReadOnly=false;
rq->Visible=false;
leibie->Visible=false;
}

}
//---------------------------------------------------------------------------
void __fastcall TFBcxtj::FormCreate(TObject *Sender)
{
rq->Date=Date();
}
//---------------------------------------------------------------------------
void __fastcall TFBcxtj::BtncxClick(TObject *Sender)
{
AnsiString strtmp,liststr;
int index1=CField->ItemIndex;
int index2=Cfu->ItemIndex;
if(index1>=0&&tjValue->Text!="")
  {
  CField->Enabled=false;
  Cfu->Enabled=false;
  tjValue->Enabled=false;
strtmp=cxb->Fields->Fields[index1]->FieldName;
        switch(index2)
        {
        case 0:strtmp=strtmp+" = '";break;
        case 1:strtmp=strtmp+" < '";break;
        case 2:strtmp=strtmp+" > '";break;
        default:{strtmp=strtmp+" = '";
                Cfu->Text="等于";
                }

        }
    if(rq->Visible)
    {
    rq2->Caption=rq1->Caption;
    rq1->Caption=DateToStr(rq->Date);
    }

   strtmp=strtmp+tjValue->Text.UpperCase()+"'";
   liststr=CField->Text+" "+Cfu->Text+" "+tjValue->Text;
   if(Listtj->Items->Count==0)
   Listtj->Items->Add(liststr);
   else
   Listtj->Items->Strings[Listtj->Items->Count-1]=Listtj->Items->Strings[Listtj->Items->Count-1]+" "+liststr;

  }
  querystr=querystr+strtmp;
  cxb->Filtered=false;
  cxb->Filter=querystr;
  
  cxb->Filtered=true;

 

}
//---------------------------------------------------------------------------
void __fastcall TFBcxtj::BtnbqClick(TObject *Sender)
{
CField->ItemIndex=-1;
Cfu->ItemIndex=-1;
tjValue->Text="";
querystr=querystr+" AND ";
Listtj->Items->Add("并且");
if(!CField->Enabled||Cfu->Enabled||tjValue->Enabled)
{
CField->Enabled=true;
  Cfu->Enabled=true;
  tjValue->Enabled=true;
  }
}
//---------------------------------------------------------------------------

void __fastcall TFBcxtj::BtnhzClick(TObject *Sender)
{
CField->ItemIndex=-1;
Cfu->ItemIndex=-1;
tjValue->Text="";
querystr=querystr+" OR ";
Listtj->Items->Add("或者");
if(!CField->Enabled||Cfu->Enabled||tjValue->Enabled)
{
CField->Enabled=true;
  Cfu->Enabled=true;
  tjValue->Enabled=true;
  }
}
//---------------------------------------------------------------------------

void __fastcall TFBcxtj::rqChange(TObject *Sender)
{
 tjValue->Text=DateToStr(rq->Date);        
}
//---------------------------------------------------------------------------

void __fastcall TFBcxtj::BtnqkClick(TObject *Sender)
{
Listtj->Items->Clear();
CField->ItemIndex=-1;
Cfu->ItemIndex=-1;
tjValue->Text="";
querystr="";
if(!CField->Enabled||Cfu->Enabled||tjValue->Enabled)
{
CField->Enabled=true;
  Cfu->Enabled=true;
  tjValue->Enabled=true;
  }
}
//---------------------------------------------------------------------------



void __fastcall TFBcxtj::leibieChange(TObject *Sender)
{
tjValue->Text=leibie->Text;        
}
//---------------------------------------------------------------------------