query82.cpp

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

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

#include <vcl.h>
#pragma hdrstop

#include "query82.h"
#include "main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "KsSkinButtons"
#pragma link "KsSkinCheckBoxs"
#pragma link "KsSkinComboBoxs"
#pragma link "KsSkinForms"
#pragma link "KsSkinPanels"
#pragma link "se_controls"
#pragma resource "*.dfm"
TForm46 *Form46;
//---------------------------------------------------------------------------
__fastcall TForm46::TForm46(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm46::leixingChange(TObject *Sender)
{
jiange->Items->Clear();
switch(leixing->ItemIndex)
{
        case 0:
                {
                 jiange->Items->Add("650");
                 jiange->Items->Add("1250");
                 jiange->Items->Add("2000");
                 jiange->Items->Add("2500");
                 jiange->Items->Add("3500");
                 jiange->Items->Add("3750");
                 jiange->Items->Add("5000");
                 jiange->Items->Add("7000");
                 jiange->Items->Add("7500");
                 jiange->Items->Add("10000");
                 break;
                }
        case 1:
                {
                jiange->Items->Add("1200");
                jiange->Items->Add("1500");
                jiange->Items->Add("2000");
                jiange->Items->Add("2500");
                jiange->Items->Add("3000");
                jiange->Items->Add("3500");
                jiange->Items->Add("8000");
                jiange->Items->Add("16500");
                jiange->Items->Add("20000");
                break;
                }
        case 2:
                {
                jiange->Items->Add("1");
                jiange->Items->Add("6");
                jiange->Items->Add("12");
                jiange->Items->Add("24");
                jiange->Items->Add("32");
                break;
                }
        case 3:
                {
                jiange->Items->Add("350");
                jiange->Items->Add("1000");
                jiange->Items->Add("1500");
                jiange->Items->Add("2000");
                jiange->Items->Add("3000");
                break;
                }
        case 4:
                {
                jiange->Items->Add("3000");
                jiange->Items->Add("4000");
                jiange->Items->Add("5000");
                break;
                }
        case 5:
                {
                jiange->Items->Add("450");
                jiange->Items->Add("900");
                jiange->Items->Add("1350");
                jiange->Items->Add("1800");
                break;
                }
        case 6:
                {
                jiange->Items->Add("1");
                jiange->Items->Add("7");
                jiange->Items->Add("15");
                jiange->Items->Add("30");
                break;
                }
        case 7:
                {
                jiange->Items->Add("1");
                jiange->Items->Add("2");
                jiange->Items->Add("3");
                jiange->Items->Add("4");
                jiange->Items->Add("5");
                break;
                }
}
}
//---------------------------------------------------------------------------
void __fastcall TForm46::CheckBox1Click(TObject *Sender)
{
if(CheckBox1->Checked)
  jixing->Enabled=true;
}
//---------------------------------------------------------------------------

void __fastcall TForm46::CheckBox2Click(TObject *Sender)
{
if(CheckBox2->Checked)
  leixing->Enabled=true;
}
//---------------------------------------------------------------------------

void __fastcall TForm46::CheckBox3Click(TObject *Sender)
{
if(CheckBox3->Checked&&leixing->Text!=NULL)
jiange->Enabled=true;
}
//---------------------------------------------------------------------------

void __fastcall TForm46::CheckBox4Click(TObject *Sender)
{
if(CheckBox4->Checked)
  zhuanye->Enabled=true;        
}
//---------------------------------------------------------------------------