ITS_OP/VmsOprMain_ORG/MAIN/FrmInitializeF.cpp

/****************************************************************************
 * @source      : 
 * @description : 
 ****************************************************************************
 * DATE         AUTHOR    DESCRIPTION
 * --------------------------------------------------------------------------
 * 2016/07/10   shjung    최초작성
 *
 ****************************************************************************/
//---------------------------------------------------------------------------

#include <vcl.h>
#include "WindowMsgF.h"

#if 0
#include "CDSTrafficGradeF.h"
#include "CDSNodeF.h"
#include "CDSLinkF.h"
#include "CDSServiceLinkF.h"
#include "CDSRoadF.h"
#include "CDSRepeatCongestF.h"

    #include "CDSUtisF.h"

    #include "CDSCompanyF.h"
#include "CDSColSysF.h"
#endif

#include "CDSIncidentF.h"
//#include "CDSVmsTrafficF.h"

#pragma hdrstop

#include "FrmInitializeF.h"
#include "FrmVmsOprMainF.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "cxContainer"
#pragma link "cxControls"
#pragma link "cxEdit"
#pragma link "cxGraphics"
#pragma link "cxLabel"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxProgressBar"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinCaramel"
#pragma link "dxSkinCoffee"
#pragma link "dxSkinDarkRoom"
#pragma link "dxSkinDarkSide"
#pragma link "dxSkinFoggy"
#pragma link "dxSkinGlassOceans"
#pragma link "dxSkiniMaginary"
#pragma link "dxSkinLilian"
#pragma link "dxSkinLiquidSky"
#pragma link "dxSkinLondonLiquidSky"
#pragma link "dxSkinMcSkin"
#pragma link "dxSkinMoneyTwins"
#pragma link "dxSkinOffice2007Black"
#pragma link "dxSkinOffice2007Blue"
#pragma link "dxSkinOffice2007Green"
#pragma link "dxSkinOffice2007Pink"
#pragma link "dxSkinOffice2007Silver"
#pragma link "dxSkinOffice2010Black"
#pragma link "dxSkinOffice2010Blue"
#pragma link "dxSkinsCore"
#pragma link "dxSkinSeven"
#pragma link "dxSkinSharp"
#pragma link "dxSkinSilver"
#pragma link "dxSkinStardust"
#pragma resource "*.dfm"

//TFrmInitialize *FrmInitialize = NULL;
//---------------------------------------------------------------------------
__fastcall TFrmInitialize::TFrmInitialize(TComponent* Owner)
    : TForm(Owner)
{
    //ADOQry->Connection = ITSDb_GetConnection();
}
//---------------------------------------------------------------------------

void __fastcall TFrmInitialize::FormShow(TObject *Sender)
{
    Refresh();
    TmrShow->Enabled = true;
}
//---------------------------------------------------------------------------

void __fastcall TFrmInitialize::TmrShowTimer(TObject *Sender)
{
    TmrShow->Enabled = false;

    Application->ProcessMessages();
    cxProgressBar1->Properties->Max = 150;

    try
    {
        cxProgressBar1->Position = 10;
        //LblStatus->Caption = "코드정보 로딩...";
        LblStatus->Caption = "Code information loading...";
        Application->ProcessMessages();
        if (!ItsCodeManager)
        {
            ItsCodeManager = new TItsCodeManager();
            ItsCodeManager->LoadFromDb();
        }

        cxProgressBar1->Position = 20;
        //LblStatus->Caption = "프로세스정보 로딩...";
        LblStatus->Caption = "Process information loading...";
        Application->ProcessMessages();
        if (!ItsProcessManager)
        {
            ItsProcessManager = new TItsProcessManager();
            ItsProcessManager->LoadFromDb();
            //ItsProcessManager->LoadProcessStatusFromDb();
            FrmVmsOprMain->PostJobMessage(WM_THREAD, WP_PARAM_TRAFFIC, LP_MSG_00);
            FrmVmsOprMain->FPollPrcsState.Polling = GetTickCount();
        }

        cxProgressBar1->Position = 30;
        //LblStatus->Caption = "VMS정보 로딩...";
        LblStatus->Caption = "VMS information loading...";
        Application->ProcessMessages();
        if (!VmsManager)
        {
            VmsManager = new TVmsCtlrManager();
            VmsManager->LoadVmsSize();
            VmsManager->LoadFromDb();
            VmsManager->LoadVmsFormUsage();

            //VmsManager->LoadVmsStatusFromDb();
            FrmVmsOprMain->PostJobMessage(WM_THREAD, WP_PARAM_TRAFFIC, LP_MSG_01);
            FrmVmsOprMain->FPollVmsState.Polling = GetTickCount();

            VmsManager->LoadIfscRltn();

            //VmsManager->LoadVmsMsg();
            FrmVmsOprMain->PostJobMessage(WM_THREAD, WP_PARAM_TRAFFIC, LP_MSG_02);
            FrmVmsOprMain->FPollVmsMsg.Polling = GetTickCount();
        }

        //정보제공구간-정보제공구간정보만 사용(소통정보사용안함)
        cxProgressBar1->Position = 50;
        //LblStatus->Caption = "정보제공구간정보 로딩...";
        LblStatus->Caption = "VMS section information loading...";
        Application->ProcessMessages();
#if 0
        if (!IfscManager)
        {
            IfscManager = new TIfscManager();
            IfscManager->LoadFromDb();
            //IfscManager->LoadTraffic();
            FrmVmsOprMain->PostJobMessage(WM_THREAD, WP_PARAM_TRAFFIC, LP_MSG_03);
        }
#endif

        //VMS정보제공구간-소통정보도 사용함
        cxProgressBar1->Position = 40;
        //LblStatus->Caption = "VMS정보제공구간정보 로딩...";
        LblStatus->Caption = "VMS section information loading...";
        Application->ProcessMessages();
        if (!VmsIfscManager)
        {
            VmsIfscManager = new TVmsIfscManager();
            VmsIfscManager->LoadFromDb();
            //VmsIfscManager->LoadTraffic();
            FrmVmsOprMain->PostJobMessage(WM_THREAD, WP_PARAM_TRAFFIC, LP_MSG_04);
        }

        FrmVmsOprMain->FPollTraffic.Polling = GetTickCount();

        cxProgressBar1->Position = 130;
        //LblStatus->Caption = "돌발발생정보 로딩...";
        LblStatus->Caption = "Incident information loading...";
        Application->ProcessMessages();
#if 0
        if (!ItsIncidentManager)
        {
            ItsIncidentManager = new TItsIncidentManager();
            //ItsIncidentManager->LoadFromDb();
            FrmVmsOprMain->PostJobMessage(WM_THREAD, WP_PARAM_TRAFFIC, LP_MSG_05);
            FrmVmsOprMain->FPollIncident.Polling = GetTickCount();
        }
#endif
    }
    catch(...)
    {
    }

    Close();
}
//---------------------------------------------------------------------------

void __fastcall TFrmInitialize::FormClose(TObject *Sender, TCloseAction &Action)
{
    Action = caFree;    
}
//---------------------------------------------------------------------------