//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop

#include "PrintingForm.h"
#include "HiddenPrintData_F.h"
#include "MetaData_F.h"
#include "YarnCompositionData.h"
#include "Main_F.h"
#include "Simulation_F.h"
#include "treatment.h"
#include "common.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "TPSpin"
#pragma resource "*.dfm"
//---------------------------------------------------------------------------
#define IDS_TABLE           StringTable[0]
#define IDS_BAR             StringTable[1]
#define IDS_YARN_NAME       StringTable[2]
#define IDS_PERCENT         StringTable[3]
#define IDS_TOTAL           StringTable[4]
#define IDS_COLOR           StringTable[5]
#define IDS_WPI             StringTable[6]
#define IDS_CPC             StringTable[7]
#define IDS_WIDTH           StringTable[8]
#define IDS_G_PER_Y         StringTable[9]
#define IDS_START           StringTable[10]
#define IDS_DATA            StringTable[11]
#define IDS_S_DATA          StringTable[12]
#define IDS_P_DATA          StringTable[13]
#define IDS_METHOD          StringTable[14]
#define IDS_FONT            StringTable[15]
#define IDS_PREVIEW         StringTable[16]
#define IDS_NAME            StringTable[17]
#define IDS_COURSE          StringTable[18]
#define IDS_ZOOM            StringTable[19]
#define IDS_FUZZ            StringTable[20]
#define IDS_FRONT_BACK      StringTable[21]
#define IDS_FRONT           StringTable[22]
#define IDS_BACK            StringTable[23]
#define IDS_VERT_REPEAT     StringTable[24]
#define IDS_HORZ_REPEAT     StringTable[25]
#define IDS_TREAT           StringTable[26]
#define IDS_TREAT_NONE      StringTable[27]
#define IDS_TREAT_HAIR      StringTable[28]
#define IDS_TREAT_RAISE     StringTable[29]
#define IDS_STYLE           StringTable[30]
#define IDS_STANDARD        StringTable[31]
#define IDS_SIMPLE          StringTable[32]
#define IDS_SIMPLE_LANDSCAPE  StringTable[33]
#define IDS_DESIGN_DATA     StringTable[34]
#define IDS_YARN_DATA       StringTable[35]
#define IDS_CHAIN           StringTable[36]
#define IDS_2_STEP          StringTable[37]
#define IDS_3_STEP          StringTable[38]
#define IDS_COST            StringTable[39]
//---------------------------------------------------------------------------
TPrintForm *PrintForm;
//---------------------------------------------------------------------------
__fastcall TPrintForm::TPrintForm(TComponent* Owner)
  : TForm(Owner)
{
  StringTable.Create(BaseDir, Language, "Print");
  rgMode->Caption=IDS_STYLE;
  rgMode->Items->Clear();
  rgMode->Items->Add(IDS_SIMPLE);
  rgMode->Items->Add(IDS_SIMPLE_LANDSCAPE);//Pyung Won Textile Co.,Ltd(Æò¿ø¼¶À¯)
  rgMode->Items->Add(IDS_STANDARD);
  rgMode->ItemIndex=0;
  rgData->Caption=IDS_DATA;
  rgData->Items->Clear();
  rgData->Items->Add(IDS_S_DATA);
  rgData->Items->Add(IDS_DESIGN_DATA);
  rgData->Items->Add(IDS_YARN_DATA);
  if(IsVivien()){
    rgData->Items->Add(IDS_YARN_DATA+" (Vivien)");
  }
  rgData->Items->Add(IDS_COST);
  rgData->ItemIndex=0;
  rgChain->Caption=IDS_CHAIN;
  rgChain->Items->Clear();
  rgChain->Items->Add(IDS_2_STEP);
  rgChain->Items->Add(IDS_3_STEP);
  rgChain->ItemIndex=0;
  //btFont->Caption=IDS_FONT;
  btPreview->Caption=IDS_PREVIEW;
  Caption = IDS_COMMON_PRINTSETUP;
  btSetup->Caption = IDS_COMMON_SETUP;
  btOk->Caption = IDS_COMMON_BUTTONOK;
  btCancel->Caption = IDS_COMMON_BUTTONCANCEL;

  if (Width>Screen->Width) Left = 100;
  else Left = (Screen->Width-Width)/2;
  if (Height>Screen->Height) Top = 100;
  else Top = (Screen->Height-Height)/2;

}
//---------------------------------------------------------------------------
void __fastcall TPrintForm::SetFont(){
  SetSmallFont(Font);
  SetSmallFont(lbPrinter->Font);
}
//---------------------------------------------------------------------------
void __fastcall TPrintForm::FormCreate(TObject *Sender)
{
 	TIniFile *IniFile = new TIniFile(BaseDir + "\\Environment.ini");
 	if (IniFile) {
		rgMode->ItemIndex = IniFile->ReadInteger("Printer", "Style", 0);
    rgData->ItemIndex = IniFile->ReadInteger("Printer", "Data", 0);
    rgChain->ItemIndex = IniFile->ReadInteger("Printer", "Chain", 0);
	  delete IniFile;
  }

  SetFont();

  ClientWidth=Bevel1->Left+Bevel1->Width+2;
  ClientHeight=Bevel1->Top+Bevel1->Height+2;

}
//---------------------------------------------------------------------------
void __fastcall TPrintForm::btSetupClick(TObject *Sender)
{
  try{
    HDC dc=Printer()->Handle;
  } catch(...){
    return;
  }

	PrinterSetupDialog->Execute();
  lbPrinter->Caption = IDS_COMMON_PRINTER + " : " + Printer()->Printers->Strings[Printer()->PrinterIndex];
}
//---------------------------------------------------------------------------

void __fastcall TPrintForm::btPreviewClick(TObject *Sender)
{

  if(rgMode->ItemIndex==0){
    HiddenPrintDataForm->SetqrSimple();
    HiddenPrintDataForm->qrSimple->Preview();
    HiddenPrintDataForm->Endqr();
  } else if(rgMode->ItemIndex==1){
    HiddenPrintDataForm->SetqrSimpleLandscape();
    HiddenPrintDataForm->qrSimpleLandscape->Preview();
    HiddenPrintDataForm->Endqr();
  } else if(rgMode->ItemIndex==2){
    if(rgData->ItemIndex==0){
      HiddenPrintDataForm->SetqrStandardSimulation();
      HiddenPrintDataForm->qrStandardSimulation->Preview();
      HiddenPrintDataForm->Endqr();
    } else if(rgData->ItemIndex==1){
      HiddenPrintDataForm->SetqrStandardDesign();
      HiddenPrintDataForm->qrStandardDesign->Preview();
      HiddenPrintDataForm->Endqr();
    } else if(rgData->ItemIndex==2){
      HiddenPrintDataForm->SetqrStandardYarn();
      HiddenPrintDataForm->qrStandardYarn->Preview();
      HiddenPrintDataForm->Endqr();
    } else if(IsVivien()){
      if(rgData->ItemIndex==3){
        HiddenPrintDataForm->SetqrStandardYarnVivien();
        HiddenPrintDataForm->qrStandardYarnVivien->Preview();
        HiddenPrintDataForm->Endqr();
      } else if(rgData->ItemIndex==4){
        HiddenPrintDataForm->SetqrTotalCost();
        HiddenPrintDataForm->qrTotalCost->Preview();
        HiddenPrintDataForm->Endqr();
      }
    } else {
      if(rgData->ItemIndex==3){
        HiddenPrintDataForm->SetqrTotalCost();
        HiddenPrintDataForm->qrTotalCost->Preview();
        HiddenPrintDataForm->Endqr();
      }
    }
  }
}
//---------------------------------------------------------------------------

void __fastcall TPrintForm::btOkClick(TObject *Sender)
{
  try{
    HDC dc=Printer()->Handle;
  } catch(...){
    return;
  }

  if(rgMode->ItemIndex==0){
    HiddenPrintDataForm->SetqrSimple();
    HiddenPrintDataForm->qrSimple->Print();
    HiddenPrintDataForm->Endqr();
  } else if(rgMode->ItemIndex==1){
    HiddenPrintDataForm->SetqrSimpleLandscape();
    HiddenPrintDataForm->qrSimpleLandscape->Print();
    HiddenPrintDataForm->Endqr();
  } else if(rgMode->ItemIndex==2){
    if(rgData->ItemIndex==0){
      HiddenPrintDataForm->SetqrStandardSimulation();
      HiddenPrintDataForm->qrStandardSimulation->Print();
      HiddenPrintDataForm->Endqr();
    } else if(rgData->ItemIndex==1){
      HiddenPrintDataForm->SetqrStandardDesign();
      HiddenPrintDataForm->qrStandardDesign->Print();
      HiddenPrintDataForm->Endqr();
    } else if(rgData->ItemIndex==2){
      HiddenPrintDataForm->SetqrStandardYarn();
      HiddenPrintDataForm->qrStandardYarn->Print();
      HiddenPrintDataForm->Endqr();
    } else if(IsVivien()){
      if(rgData->ItemIndex==3){
        HiddenPrintDataForm->SetqrStandardYarnVivien();
        HiddenPrintDataForm->qrStandardYarnVivien->Print();
        HiddenPrintDataForm->Endqr();
      } else if(rgData->ItemIndex==4){
        HiddenPrintDataForm->SetqrTotalCost();
        HiddenPrintDataForm->qrTotalCost->Print();
        HiddenPrintDataForm->Endqr();
      }
    } else {
      if(rgData->ItemIndex==3){
        HiddenPrintDataForm->SetqrTotalCost();
        HiddenPrintDataForm->qrTotalCost->Print();
        HiddenPrintDataForm->Endqr();
      }
    }
  }
}
//---------------------------------------------------------------------------

void __fastcall TPrintForm::btCancelClick(TObject *Sender)
{
  Close();
}
//---------------------------------------------------------------------------

void __fastcall TPrintForm::rgModeClick(TObject *Sender)
{
  if(rgMode->ItemIndex==0||rgMode->ItemIndex==1) {
    rgData->Enabled=false;
  } else {
    rgData->Enabled=true;
  }
}
//---------------------------------------------------------------------------

void __fastcall TPrintForm::FormShow(TObject *Sender)
{

  try{
    HDC dc=Printer()->Handle;
  } catch(...){
    return;
  }

  lbPrinter->Caption = IDS_COMMON_PRINTER + " : " + Printer()->Printers->Strings[Printer()->PrinterIndex];

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

void __fastcall TPrintForm::FormDestroy(TObject *Sender)
{
 	TIniFile *IniFile = new TIniFile(BaseDir + "\\Environment.ini");
 	if (IniFile) {
		IniFile->WriteInteger("Printer", "Style", rgMode->ItemIndex);
    IniFile->WriteInteger("Printer", "Data", rgData->ItemIndex);
    IniFile->WriteInteger("Printer", "Chain", rgChain->ItemIndex);
	  delete IniFile;
  }
}
//---------------------------------------------------------------------------