printdlg.cpp

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

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

#include <vcl.h>
#pragma hdrstop

#include "printdlg.h"
#include "dm.h"
#include "gklist.h"
#include "gkrep.h"
#include "repshebei.h"
#include "rephangcai.h"
#include "qryplane.h"
#include "repplane.h"
#include "main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "KsSkinButtons"
#pragma link "KsSkinComboBoxs"
#pragma link "KsSkinForms"
#pragma link "KsSkinGroupBoxs"
#pragma link "KsSkinPanels"
#pragma link "se_controls"
#pragma resource "*.dfm"
TForm22 *Form22;
bool en,s1,s2;
//---------------------------------------------------------------------------
__fastcall TForm22::TForm22(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm22::RadioGroup1Click(TObject *Sender)
{
 Button1->Enabled=false;
switch(RadioGroup1->ItemIndex)
{
        case 0:
                {        Button1->Enabled=true;
                        DateTimePicker1->Enabled=true;
                        nian->Enabled=false;
                        yue->Enabled=false;
                        ComboBox1->Enabled=false;
                        break;
                }
        case 1:
                {       if(nian->Text.operator !=("")&&yue->Text.operator !=(""))
                       { s1=s2=true;
                        Button1->Enabled=true;}
                        DateTimePicker1->Enabled=false;
                        nian->Enabled=true;
                        yue->Enabled=true;
                        ComboBox1->Enabled=false;
                        break;
                }
        case 2:
        case 3:
        case 4:
        case 5:
                {        if(ComboBox1->Text.operator !=(""))
                         Button1->Enabled=true;
                        DateTimePicker1->Enabled=false;
                        nian->Enabled=false;
                        yue->Enabled=false;
                        ComboBox1->Enabled=true;
                        break;
                }

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

void __fastcall TForm22::Button1Click(TObject *Sender)
{
Button1->Enabled=false;
switch(RadioGroup1->ItemIndex)
{
case 0:
        {
                DataModule1->dayreport->Filtered=false;
                DataModule1->dayreport->Filter="日期 = '"+DateToStr(DateTimePicker1->Date)+"'";
                DataModule1->dayreport->Filtered=true;
                Form6->createdata();
                if(yulan->ItemIndex==0)
                 Form6->QuickRep1->Preview();
                 else
                 Form6->QuickRep1->Print();
                break;
        }
case 1:
        {       if(nian->Text.operator !=("")&&yue->Text.operator !=(""))
                {
                DataModule1->fjyb->Filtered=false;
                DataModule1->fjyb->Filter="年 = '"+nian->Text+"' AND 月份 = '"+yue->Text+"'";
                DataModule1->fjyb->Filtered=true;
                TForm12 *Form12=new TForm12(Application);
                if(yulan->ItemIndex==0)
                Form12->QuickRep1->Preview();
                else
                Form12->QuickRep1->Print();
                delete Form12;
                }
                break;
         }
case 2:
        {       if(ComboBox1->Text.operator !=(""))
                {
                DataModule1->gk90->Filtered=false;
                DataModule1->gk90->Filter="间隔 = '"+ ComboBox1->Text+"'";
                DataModule1->gk90->Filtered=true;
                TForm9 *Form9=new TForm9(Application);
                   if(yulan->ItemIndex==0)
                Form9->QuickRep1->Preview();
                else
                Form9->QuickRep1->Print();
                delete Form9;
                }
                break;
        }
case 3:
        {
                 if(ComboBox1->Text.operator !=(""))
                {
                DataModule1->gk90->Filtered=false;
                DataModule1->gk90->Filter="间隔 = '"+ ComboBox1->Text+"'";
                DataModule1->gk90->Filtered=true;
                TForm8 *Form8=new TForm8(Application);
                   if(yulan->ItemIndex==0)
                Form8->QuickRep1->Preview();
                else
                Form8->QuickRep1->Print();
                delete Form8;
                }
                break;
        }
case 4:
        {
                if(ComboBox1->Text.operator !=(""))
                {
                DataModule1->ajsb->Filtered=false;
                DataModule1->ajsb->Filter="间隔 = '"+ComboBox1->Text+"'";
                DataModule1->ajsb->Filtered=true;
                 TForm18 *Form18=new TForm18(Application);
                    if(yulan->ItemIndex==0)
                 Form18->QuickRep1->Preview();
                 else
                 Form18->QuickRep1->Print();
                 delete Form18;
                }
                break;
        }
case 5:
        {
                if(ComboBox1->Text.operator !=(""))
                {
                DataModule1->ajhc->Filtered=false;
                DataModule1->ajhc->Filter="间隔 = '"+ComboBox1->Text+"'";
                DataModule1->ajhc->Filtered=true;
                 TForm19 *Form19=new TForm19(Application);
                    if(yulan->ItemIndex==0)
                 Form19->QuickRep1->Preview();
                 else
                 Form19->QuickRep1->Print();
                 delete Form19;
                }
                break;
        }
}
}
//---------------------------------------------------------------------------
void __fastcall TForm22::nianChange(TObject *Sender)
{
s1=true;
en=s1&&s2;
Button1->Enabled=en;
}
//---------------------------------------------------------------------------

void __fastcall TForm22::yueChange(TObject *Sender)
{
s2=true;
en=s1&&s2;
Button1->Enabled=en;
}
//---------------------------------------------------------------------------

void __fastcall TForm22::DateTimePicker1Change(TObject *Sender)
{
Button1->Enabled=true;
}
//---------------------------------------------------------------------------

void __fastcall TForm22::ComboBox1Change(TObject *Sender)
{
Button1->Enabled=true;        
}
//---------------------------------------------------------------------------

void __fastcall TForm22::FormCreate(TObject *Sender)
{
 s1=s2=en=false;        
}
//---------------------------------------------------------------------------