//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Define.h"
#include "SplashForm.h"
#include "Sim.h"
//---------------------------------------------------------------------------
#ifdef LOCK_TEX
  #include "Authorization_F.h"
#endif

#ifdef WEB_LOCK
	#include "WebActivation_F.h"
	#include "WebActivationTempKey_F.h"
#endif

//---------------------------------------------------------------------------
USEFORM("W:\Tex3D\TpwTest\about.cpp", AboutBox);
USEFORM("W:\Tex3D\TpwTest\CommonPrint.cpp", CommonPrintForm);
USEFORM("W:\Tex3D\TpwTest\EnlargeCanvas.cpp", EnlargeCanvasForm);
USEFORM("W:\Tex3D\TpwTest\NewCanvas.cpp", NewCanvasForm);
USEFORM("W:\Tex3D\TpwTest\FullView.cpp", FullViewForm);
USEFORM("W:\Tex3D\TpwTest\Palette.cpp", PaletteForm);
USEFORM("W:\Tex3D\TpwTest\PalFileManager.cpp", PFMForm);
USEFORM("W:\Tex3D\TpwTest\ResizeCanvas.cpp", ResizeCanvasForm);
USEFORM("W:\Tex3D\TpwTest\SplashForm.cpp", splash);
USEFORM("W:\Tex3D\TpwTest\UserColor_F.cpp", UserColorLibForm);
USEFORM("W:\Tex3D\TpwTest\UserColorData_F.cpp", UserColorDataForm);
USEFORM("W:\Tex3D\TpwTest\TPrint_F.cpp", TPrintForm);
USEFORM("W:\Tex3D\TpwTest\n3d\Main.cpp", MainForm);
USEFORM("W:\Tex3D\TpwTest\n3d\MainImage.cpp", MainImageForm);
USEFORM("W:\Tex3D\TpwTest\n3d\MainMenu.cpp", MainMenuForm);
USEFORM("W:\Tex3D\TpwTest\Grid_F.cpp", GridForm);
USEFORM("W:\Tex3D\TpwTest\ColorChart.cpp", ColorChartForm);
USEFORM("W:\Tex3D\TpwTest\Dialog_F.cpp", DialogForm);
USEFORM("W:\Tex3D\TpwTest\n3d\Layer_F.cpp", LayerForm);
USEFORM("W:\Tex3D\TpwTest\ColorLibrary_F.cpp", ColorLibraryForm);
USEFORM("W:\Tex3D\TpwTest\Vector_F.cpp", VectorForm);
USEFORM("W:\Tex3D\TpwTest\n3d\N3DGrid.cpp", N3DGridForm);
USEFORM("W:\Tex3D\TpwTest\n3d\N3DPatternMenu.cpp", N3DPatternMenuForm);
USEFORM("W:\Tex3D\TpwTest\n3d\N3DShadow.cpp", N3DShadowForm);
USEFORM("W:\Tex3D\TpwTest\n3d\N3DDropper.cpp", N3DDropperForm);
USEFORM("W:\Tex3D\TpwTest\n3d\N3DLoadGray.cpp", N3DLoadGrayForm);
USEFORM("W:\Tex3D\TpwTest\n3d\N3DLoadBody.cpp", N3DLoadBodyForm);
USEFORM("W:\Tex3D\TpwTest\n3d\ColorChange_F.cpp", ColorChangeForm);
USEFORM("W:\Tex3D\TpwTest\Notice_F.cpp", NOTICE);
USEFORM("W:\Tex3D\TpwTest\ZigZagDialog_F.cpp", ZigZagDialog);
USEFORM("W:\Tex3D\TpwTest\Authorization_F.cpp", AuthorizationForm);
USEFORM("W:\Tex3D\TpwTest\ColorInfoView_F.cpp", ColorInfoViewForm);
USEFORM("W:\Tex3D\TpwTest\DTPColorLibrary_F.cpp", DTPColorLibraryForm);
USEFORM("W:\Tex3D\TpwTest\VecMotiveList_F.cpp", VecMotiveForm);
USEFORM("W:\Tex3D\TpwTest\AutoSave.cpp", AutoSaveForm);
USEFORM("W:\Tex3D\TpwTest\GridConfig_F.cpp", GridConfigForm);
USEFORM("W:\Tex3D\TpwTest\ColorPicker_F.cpp", ColorPicker);
USEFORM("W:\Tex3D\TpwTest\Calc_F.cpp", CalcForm);
USEFORM("W:\Tex3D\TpwTest\FileManager_F.cpp", FileManagerForm);
USEFORM("W:\Tex3D\TpwTest\Web\DBModule.cpp", dmDB); /* TDataModule: File Type */
USEFORM("W:\Tex3D\TpwTest\Web\Upload_F.cpp", UploadForm);
USEFORM("W:\Tex3D\TpwTest\Web\UploadConfig_F.cpp", UploadConfigForm);
USEFORM("W:\Tex3D\TpwTest\Web\UploadProperty_F.cpp", UploadPropertyForm);
USEFORM("W:\Tex3D\TpwTest\Web\GroupingWinplus_F.cpp", GroupingWinplusForm);
USEFORM("W:\Tex3D\TpwTest\Web\Upload_F_Winplus.cpp", WinplusUploadForm);
USEFORM("W:\Tex3D\TpwTest\Web\UploadShirts_F.cpp", UploadShirtsForm);
USEFORM("W:\Tex3D\TpwTest\Web\UploadFabric_F.cpp", UploadFabricForm);
USEFORM("W:\Tex3D\TpwTest\n3d\Grouping_F.cpp", GroupingForm);
USEFORM("W:\Tex3D\TpwTest\ViewPattern_F.cpp", PatternForm);
USEFORM("W:\Tex3D\TpwTest\Web\WebActivation_F.cpp", ActivationDialogForm);
USEFORM("W:\Tex3D\TpwTest\Web\WebActivationTempKey_F.cpp", TempKeyDialogForm);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
#ifdef DEBUG		//hjw
  AllocConsole(); 
  freopen( "CONOUT$",  "wt", stdout);
#endif

#ifdef ONLYSIM
  #ifndef SIM_LAYER
  Simulation();
  #else
  TStringList *ParamStrings = new TStringList();
  for (int i = 0; i < ParamCount(); i++){
    ParamStrings->Add(ParamStr(i));
  }
  SimulationLayer(ParamStrings);
  delete ParamStrings;
  #endif

#else
  const char mutexname[] = "TexpiaDesignCAD(New3D)";
  HANDLE hMutex;

  try
  {
  	hMutex = OpenMutex(0, false, mutexname);
    if (hMutex==NULL) {
    	hMutex = CreateMutex(NULL, true, mutexname);
    } else {
    	CloseHandle(hMutex);
      ShowMessage("Application already running.");
      return 0;
    }
    Application->Initialize();

#ifdef WEB_LOCK
	////////  Off-line  ////////
		if(!checkInetConnect() || (checkRemainTime(Application) == -100)) {
			ActvLog *LogForCheck;
			LogForCheck = new ActvLog(Application);
	
			// ·Î±× ÆÄÀÏÀÌ Á¸ÀçÇÏ°í Çϳª ÀÌ»óÀÇ ·Î±× µ¥ÀÌÅÍ°¡ ÀÖÀ¸¸ç
			// ·Î±×·ÎºÎÅÍ Àо RTimeÀÌ 0º¸´Ù Å©´Ù¸é ÀÓ½ÃÅ° ÀÎÁõ Form ¶ç¿ìÁö ¾ÊÀ½.
			// ±×·¸Áö ¾Ê´Ù¸é ÀÓ½ÃÅ° ÀÎÁõ Form ¶ç¿ò.
	
			TempKeyDialogForm = new TTempKeyDialogForm(Application);
			bool checklog = LogForCheck->CheckLog();
			delete LogForCheck;
	
			if ( checklog || TempKeyDialogForm->ShowModal() == mrOk ) {
				delete TempKeyDialogForm;
			}
			else {
				delete TempKeyDialogForm;
				return 0;
			}
		}
	////////  On-line  ////////
		else {
			// Flush Log
			ActvLog *LogForFlush;
			LogForFlush = new ActvLog(Application);
			LogForFlush->FlushLog();
			delete LogForFlush;
	
			// ¼­¹ö·ÎºÎÅÍ ¹Þ¾Æ ¿Â RTimeÀÌ 0º¸´Ù Å©¸é ÀÎÁõ Form ¶ç¿ìÁö ¾ÊÀ½.
			// ±×·¸Áö ¾Ê´Ù¸é ÀÎÁõ Form ¶ç¿ò.
	
			ActivationDialogForm = new TActivationDialogForm(Application);
			if ( checkRemainTime(Application) > 0 || ActivationDialogForm->ShowModal() == mrOk ) {
				delete ActivationDialogForm;
			}
			else {
				delete ActivationDialogForm;
				return 0;
			}
		}
#endif    

#ifdef LOCK_TEX
    // DoubleLock - by monkman (2007.08.20)
    AuthorizationForm = new TAuthorizationForm(Application);
    if (AuthorizationForm->Check(false) == true) { // ±âÁ¸¿¡ ÀÎÁõÀÌ µÇ¾ú´ÂÁö üũ
      delete AuthorizationForm;
    }
    else {
      if (AuthorizationForm->ShowModal() == mrOk) { // ÀÎÁõÀ» ¹Þ¾Æ¾ßÇÒ °æ¿ì
        delete AuthorizationForm;
      }
      else {
        delete AuthorizationForm; // ÀÎÁõ Ãë¼Ò½Ã
        return 0;
      }
    }
#endif

    splash = new Tsplash(Application);
    splash->Show();
    splash->Update();
    Application->Title = ProductName + " " + N3DVersion + " (Professional)";
    Application->CreateForm(__classid(TMainForm), &MainForm);
     Application->CreateForm(__classid(TPatternForm), &PatternForm);
     splash->Close();
    Application->Run();
  }
  catch (Exception &exception)
  {
    Application->ShowException(&exception);
  }
  ReleaseMutex(hMutex);
  CloseHandle(hMutex);

#endif
  return 0;
}
//---------------------------------------------------------------------------