ITS_OP/SRC/PLUGIN/08.VDS/VDSM020M/FLASH/VDSM020MF.cpp

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

#include <vcl.h>
#include "ITSSkinF.h"
#include "ITSUtilF.h"
#include "AppGlobalF.h"
#include "CDSCodeF.h"
#include "CDSFacilityF.h"
#include "CDSNodeF.h"
#include "CDSLinkF.h"
#pragma hdrstop

#include "VDSM020MF.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "FRAME_VdsDtctListF"
#pragma link "FRAME_VdsListF"
#pragma link "FRAME_FlashMapF"
#pragma link "cxButtons"
#pragma link "cxCheckBox"
#pragma link "cxClasses"
#pragma link "cxContainer"
#pragma link "cxControls"
#pragma link "cxCustomData"
#pragma link "cxData"
#pragma link "cxDataStorage"
#pragma link "cxDropDownEdit"
#pragma link "cxEdit"
#pragma link "cxFilter"
#pragma link "cxGraphics"
#pragma link "cxGrid"
#pragma link "cxGridCustomTableView"
#pragma link "cxGridCustomView"
#pragma link "cxGridLevel"
#pragma link "cxGridTableView"
#pragma link "cxGroupBox"
#pragma link "cxLabel"
#pragma link "cxLookAndFeelPainters"
#pragma link "cxLookAndFeels"
#pragma link "cxMaskEdit"
#pragma link "cxSpinEdit"
#pragma link "cxSplitter"
#pragma link "cxStyles"
#pragma link "cxTextEdit"
#pragma link "dxSkinBlack"
#pragma link "dxSkinBlue"
#pragma link "dxSkinsCore"
#pragma link "dxSkinscxPCPainter"
#pragma resource "*.dfm"

TVDSM020M *VDSM020M = NULL;
//---------------------------------------------------------------------------
void TVDSM020M_FlashCall(TObject *ASender, const WideString request)
{
    try
    {
        if (!VDSM020M) return;
        VDSM020M->ShockwaveFlash1FlashCall1(ASender, request);
    }
    catch(Exception &exception)
    {
    }
}

//---------------------------------------------------------------------------
__fastcall TVDSM020M::TVDSM020M(TComponent* Owner)
    : TForm(Owner)
{
    ITSSkin_Load(this);
    CMM_LoadForm(g_sFormsDir, this);

    FUpdate= false;
    FTitle = "VDS-검지기 관리";
    MapStart = false;

    m_pGDC = FRAMEVdsDtctList1->TvList->DataController;

    FRAMEGisMap1->FlashCallbackFunc = TVDSM020M_FlashCall;
    FRAMEGisMap1->DrawMode = 1; //구간정보표출

    FRAMEGisMap1->ImgPan->Visible = true;
    FRAMEGisMap1->ImgZoomIn->Visible = true;
    FRAMEGisMap1->ImgZoomOut->Visible = true;
    FRAMEGisMap1->ImgSel->Visible = true;
    FRAMEGisMap1->ImgStnd->Visible = true;
    FRAMEGisMap1->ImgRefresh->Visible = true;

    FRAMEGisMap1->LbDef->Caption = "(선택버튼을 클릭하여 선택합니다.)";
    FRAMEGisMap1->LbDef->Hint = FRAMEGisMap1->LbDef->Caption;
    FRAMEGisMap1->LbDef->Visible = true;
    FRAMEGisMap1->ImgSel->Visible = false;

    FRAMEVdsList1->PnlTop->Visible = false;
    FRAMEVdsList1->PnlBottom->Visible = false;
    FRAMEVdsList1->ColumnSel->Visible = false;
    FRAMEVdsList1->Column02->Visible = false;

    FRAMEVdsDtctList1->PnlTop->Visible = false;
    FRAMEVdsDtctList1->PnlBottom->Visible = false;
    FRAMEVdsDtctList1->ColumnSel->Visible = false;

    TvParam->OptionsView->NoDataToDisplayInfoText = FrmLang->lblNoInfo->Caption;//"<VDS 검지기 평활화 파라미터>";
    TvCndt->OptionsView->NoDataToDisplayInfoText  = FrmLang->lblNoInfo->Caption;//"<VDS 검지기 신뢰도 조건>";
    TvLink->OptionsView->NoDataToDisplayInfoText  = FrmLang->lblNoInfo->Caption;//"<VDS 검지기 링크구성정보>";
}
//---------------------------------------------------------------------------

/*
 * 닫기버튼 이나 x버튼 클릭시 공통으로 처리하는 로직이들어간다..
 * Form과 DataModule class를 delete시킨다.
 *  arguments
 *
 *  return
 *      void
 */
void __fastcall TVDSM020M::CommClose()
{
    try
    {
        CMM_SaveForm(g_sFormsDir, this);
    }
    catch(...)
    {
    }
}
//---------------------------------------------------------------------------

/*
 * Form을 보여줄때 호출되는 event 메서드이다.
 *  arguments
 *      Sender : event handler 객체
 *  return
 *      void
 */
void __fastcall TVDSM020M::FormShow(TObject *Sender)
{
    Refresh();

    CbCTLR_MNGM_NMBR->Properties->Items->Clear();
    try
    {
        FRAMEVdsList1->MyItsVdsManager->FLists.Lock();
        FOR_STL(TItsVds*, pObj, FRAMEVdsList1->MyItsVdsManager->FLists)
        {
            if (pObj->DEL_YN == "Y") continue;

            String sId = pObj->CTLR_MNGM_NMBR;  //관리번호
            String sNm = pObj->LCTN;            //위치
            CbCTLR_MNGM_NMBR->Properties->Items->Add("[" + sId + "] " + sNm);
        }
    }
    __finally
    {
        FRAMEVdsList1->MyItsVdsManager->FLists.UnLock();
    }
    CbCTLR_MNGM_NMBR->ItemIndex = -1;

    EdVdsCtrl->Properties->ReadOnly = true;
    EdDTCT_NMBR->Properties->ReadOnly = true;
    CbDTCT_TYPE_CD->Properties->ReadOnly = true;
    CbCTLR_MNGM_NMBR->Properties->ReadOnly = true;
    SeSTLN_DSTC->Properties->ReadOnly = true;
    SeSNST->Properties->ReadOnly = true;
    CbUSE_YN->Properties->ReadOnly = true;
    SeISTL_LANE->Properties->ReadOnly = true;
    EdDET_NMBR->Properties->ReadOnly = true;
    EdCHNL_NMBR->Properties->ReadOnly = true;
    SeDTCT_VALD_DSTC->Properties->ReadOnly = true;
    SeMDVH_UPLM_LNGT->Properties->ReadOnly = true;
    SeMDVH_LWLM_LNGT->Properties->ReadOnly = true;

    FormInit();
    ChangeEditMode(1);
    TmrShow->Enabled = true;
}
//---------------------------------------------------------------------------

/*
 * form 초기화
 *
 *  arguments
 *
 *  return
 *      void
 */
void __fastcall TVDSM020M::FormInit()
{
    EdVdsCtrl->Text         = "";
    EdDTCT_NMBR->Text       = "";
    CbDTCT_TYPE_CD->ItemIndex   = 0;
    CbCTLR_MNGM_NMBR->ItemIndex = -1;
    SeSTLN_DSTC->Value      = 0;
    SeSNST->Value           = 0;
    CbUSE_YN->ItemIndex     = 0;
    SeISTL_LANE->Value      = 0;
    EdDET_NMBR->Text        = "0";
    EdCHNL_NMBR->Text       = "0";
    SeDTCT_VALD_DSTC->Value = 0;
    SeMDVH_UPLM_LNGT->Value = 0;
    SeMDVH_LWLM_LNGT->Value = 0;

    CMM_ClearGridTableView(TvParam);
    CMM_ClearGridTableView(TvCndt);
    CMM_ClearGridTableView(TvLink);

    FNewDb = false;
}
//---------------------------------------------------------------------------

/*
 * Form이 Show되고 난 후 최초 1회 수행되는 타이머 이벤트
 *  arguments
 *      Sender : event handler 객체
 *  return
 *      void
 */
void __fastcall TVDSM020M::TmrShowTimer(TObject *Sender)
{
    TmrShow->Enabled = false;

    FRAMEGisMap1->LinkLevel = 1;
    FRAMEGisMap1->LoadGisMap();

    FRAMEVdsList1->UpdateList();
    //FRAMEVdsDtctList1->UpdateList();

    FRAMEVdsDtctList1->MyItsVdsManager->LoadFromDtctLinkDb();
    FRAMEVdsDtctList1->MyItsVdsManager->LoadFromDtctParamDb();
    FRAMEVdsDtctList1->MyItsVdsManager->LoadFromDtctCndtDb();

    UpdateList();
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::UpdateList()
{
    FRAMEVdsDtctList1->UpdateList();
}
//---------------------------------------------------------------------------

/*
 * Close 버튼 클릭 이벤트 핸들러
 *  arguments
 *      Sender : event handler 객체
 *  return
 *      void
 */
void __fastcall TVDSM020M::BtnCloseClick(TObject *Sender)
{
    Close();
}
//---------------------------------------------------------------------------

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

void __fastcall TVDSM020M::FormCloseQuery(TObject *Sender, bool &CanClose)
{
#if 0
//xxxxxxxx
    if (FUpdate)
    {
        POST_MSG(Application->MainForm->Handle, WM_DATABASE_REFRESH, WP_MSG_14, 0);
    }
#endif
    FRAMEVdsList1->OnCloseQuery(CanClose);
    FRAMEVdsDtctList1->OnCloseQuery(CanClose);
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::DisplayInfo(TItsVdsDtct* AObj)
{
    FormInit();

    if (!AObj) return;

    EdVdsCtrl->Text         = AObj->CTLR_MNGM_NMBR;
    EdDTCT_NMBR->Text       = AObj->DTCT_NMBR;
    CMM_SetComboBoxItem(CbDTCT_TYPE_CD, AObj->DTCT_TYPE_CD);
    CMM_SetComboBoxItem(CbCTLR_MNGM_NMBR, AObj->CTLR_MNGM_NMBR);
    SeSTLN_DSTC->Value      = AObj->STLN_DSTC.ToIntDef(0);
    SeSNST->Value           = AObj->SNST.ToIntDef(0);
    CbUSE_YN->Text          = AObj->USE_YN;
    SeISTL_LANE->Value      = AObj->ISTL_LANE.ToIntDef(0);
    EdDET_NMBR->Text        = AObj->DET_NMBR;
    EdCHNL_NMBR->Text       = AObj->CHNL_NMBR;
    SeDTCT_VALD_DSTC->Value = AObj->DTCT_VALD_DSTC.ToIntDef(0);
    SeMDVH_UPLM_LNGT->Value = AObj->MDVH_UPLM_LNGT.ToIntDef(0);
    SeMDVH_LWLM_LNGT->Value = AObj->MDVH_LWLM_LNGT.ToIntDef(0);

    ChangeEditMode(3);

    DisplayParam(AObj);
    DisplayCndt(AObj);
    DisplayLink(AObj);
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::DisplayParam(TItsVdsDtct* AObj)
{
    if (!AObj) return;

    CMM_ClearGridTableView(TvParam);

    try
    {
        int nRow;
        TcxDataController *pGDC = TvParam->DataController;
        TvParam->BeginUpdate();

#if 0
    String SYST_KIND_DVSN;  //VARCHAR2(1)	N			시스템 종류 구분
    String TFVL_FCTR;       //NUMBER(6,2)	Y			교통량 계수
    String OCPY_RATE_FCTR;  //NUMBER(6,2)	Y			점유 율 계수
    String SPED_FCTR;       //NUMBER(6,2)	Y			속도 계수
    String HDWY_FCTR;       //NUMBER(6,2)	Y			차두시간 계수
    String FRST_REGR_NMBR;  //VARCHAR2(20)	Y			최초 등록자 번호
    String FRST_RGST_DT;    //VARCHAR2(14)	Y			최초 등록 일시
    String LAST_CRPR_NMBR;  //VARCHAR2(20)	Y			최종 수정자 번호
    String LAST_CRCT_DT;    //VARCHAR2(14)	Y			최종 수정 일시
    String DEL_YN;          //CHAR(1)	Y	'N'		삭제 여부
#endif

        FOR_STL(TItsVdsDtctParam *, pObj, AObj->FParamLists)
        {
            if (pObj->DEL_YN == "Y") continue;

            nRow = pGDC->AppendRecord();
            pGDC->Values[nRow][Param01->Index] = pObj->SYST_KIND_DVSN;
            pGDC->Values[nRow][Param02->Index] = pObj->TFVL_FCTR;
            pGDC->Values[nRow][Param03->Index] = pObj->OCPY_RATE_FCTR;
            pGDC->Values[nRow][Param04->Index] = pObj->SPED_FCTR;
            pGDC->Values[nRow][Param05->Index] = pObj->HDWY_FCTR;
        }
    }
    __finally
    {
        TvParam->EndUpdate();
    }
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::DisplayCndt(TItsVdsDtct* AObj)
{
    if (!AObj) return;

    CMM_ClearGridTableView(TvCndt);

    try
    {
        int nRow;
        TcxDataController *pGDC = TvCndt->DataController;
        TvCndt->BeginUpdate();

#if 0
    String CTLR_MNGM_NMBR;  //VARCHAR2(20)	Y			제어기 관리 번호
    String DTCT_NMBR;       //VARCHAR2(8)	N			검지기 번호
    String SYST_KIND_DVSN;  //VARCHAR2(1)	N			시스템 종류 구분
    String MAX_TFVL;        //NUMBER(6)	Y	0		최대 교통량
    String MIN_TFVL;        //NUMBER(6)	Y	0		최소 교통량
    String MAX_OCPY_RATE;   //NUMBER(6,2)	Y			최대 점유 율
    String MIN_OCPY_RATE;   //NUMBER(6,2)	Y			최소 점유 율
    String MAX_SPED;        //NUMBER(3)	Y	0		최대 속도
    String MIN_SPED;        //NUMBER(3)	Y	0		최소 속도
    String DEL_YN;          //CHAR(1)	Y	'N'		삭제 여부
    String FRST_REGR_NMBR;  //VARCHAR2(20)	Y			최초 등록자 번호
    String FRST_RGST_DT;    //VARCHAR2(14)	Y			최초 등록 일시
    String LAST_CRPR_NMBR;  //VARCHAR2(20)	Y			최종 수정자 번호
    String LAST_CRCT_DT;    //VARCHAR2(14)	Y			최종 수정 일시
#endif

        FOR_STL(TItsVdsDtctCndt *, pObj, AObj->FCndtLists)
        {
            if (pObj->DEL_YN == "Y") continue;

            nRow = pGDC->AppendRecord();
            pGDC->Values[nRow][Cndt01->Index] = pObj->SYST_KIND_DVSN;
            pGDC->Values[nRow][Cndt02->Index] = pObj->MAX_TFVL;
            pGDC->Values[nRow][Cndt03->Index] = pObj->MIN_TFVL;
            pGDC->Values[nRow][Cndt04->Index] = pObj->MAX_OCPY_RATE;
            pGDC->Values[nRow][Cndt05->Index] = pObj->MIN_OCPY_RATE;
            pGDC->Values[nRow][Cndt06->Index] = pObj->MAX_SPED;
            pGDC->Values[nRow][Cndt07->Index] = pObj->MIN_SPED;
        }
    }
    __finally
    {
        TvCndt->EndUpdate();
    }
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::DisplayLink(TItsVdsDtct* AObj)
{
    if (!AObj) return;

    CMM_ClearGridTableView(TvLink);

    try
    {
        int nRow;
        TcxDataController *pGDC = TvLink->DataController;
        TvLink->BeginUpdate();

        FOR_STL(TItsVdsDtctLink *, pObj, AObj->FLinkLists)
        {
            String sLinkId = pObj->LINK_ID;
            nRow = pGDC->AppendRecord();
            pGDC->Values[nRow][ColLink2->Index] = sLinkId;

            TItsLink *pLink = ItsLinkManager->FLists.Find(sLinkId);
            if (pLink)
            {
                TItsNode *pNode;
                pGDC->Values[nRow][ColLink3->Index] = pLink->F_NODEID;
                pGDC->Values[nRow][ColLink5->Index] = pLink->T_NODEID;
                pNode = ItsNodeManager->FLists.Find(pLink->F_NODEID);
                if (pNode)
                {
                    pGDC->Values[nRow][ColLink4->Index] = pNode->NODE_NAME;
                }
                pNode = ItsNodeManager->FLists.Find(pLink->T_NODEID);
                if (pNode)
                {
                    pGDC->Values[nRow][ColLink6->Index] = pNode->NODE_NAME;
                }
            }
        }
    }
    __finally
    {
        TvLink->EndUpdate();
    }

    RefreshLink();
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::UpdateVdsIcon()
{
    if (!MapStart) return;

    TCommFlash::CallFunc(FRAMEGisMap1->ShockwaveFlash1, "RemoveFacility", FAC_VDS);

    TItsFacility *pFacility;
    try
    {
        //if (ChkViewIcon->Checked)
        {
            String sObjList = "";

            try
            {
                FRAMEVdsList1->MyItsVdsManager->FLists.Lock();
                FOR_STL(TItsVds*, pObj, FRAMEVdsList1->MyItsVdsManager->FLists)
                {
                    if (pObj->DEL_YN == "Y") continue;

                    //pFacility = ItsFacilityManager->FLists.Find(pObj->CTLR_MNGM_NMBR);
                    //if (!pFacility) continue;

                    String sLoc = TCommFlash::ReplaceName(pObj->LCTN);
                    sObjList += (pObj->CTLR_MNGM_NMBR + "," + "0," + sLoc + "," + pObj->X_CRDN + "," + pObj->Y_CRDN + "," + pObj->CTLR_MNGM_NMBR + "|");
                }
            }
            __finally
            {
                FRAMEVdsList1->MyItsVdsManager->FLists.UnLock();

                if (sObjList != "")
                {
                    sObjList = sObjList.SubString(1, sObjList.Length()-1);
                    TCommFlash::CallFunc(FRAMEGisMap1->ShockwaveFlash1, "AddFacility", FAC_VDS + "|" + sObjList);
                }
            }
        }
    }
    catch(...)
    {
    }
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::BtnEditClick(TObject *Sender)
{
    if (BtnEdit->Caption == "편집")
    {
        ChangeEditMode(0);
        FNewDb = false;
    }
    else
    {
        String sVdsCtrlId = EdVdsCtrl->Text;
        String sDtctId = EdDTCT_NMBR->Text;

        ChangeEditMode(1);

        TItsVds *pVds = FRAMEVdsDtctList1->MyItsVdsManager->FLists.Find(sVdsCtrlId);
        if (pVds)
        {
            TItsVdsDtct *pObj = pVds->FSubLists.Find(sDtctId);
            if (pObj)
            {
                CMM_SetGridRow(FRAMEVdsDtctList1->CxList, FRAMEVdsDtctList1->TvList, sDtctId, FRAMEVdsDtctList1->Column02->Index);
                DisplayInfo(pObj);
            }
        }
    }
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::ChangeEditMode(int AEdit)
{
    bool bGisEdit = true;
    bool bEnabled = false;

    switch(AEdit)
    {
    case 0: //편집버튼클릭
        {
            BtnEdit->Enabled = true;
            BtnInsert->Enabled = false;
            BtnDelete->Enabled = false;
            BtnSave->Enabled = true;

            BtnEdit->Caption = FrmLang->lblCancel->Caption;//"취소";
            BtnEdit->Hint    = FrmLang->lblCancel->Hint;//데이터 편집 취소";
        }
        break;
    case 1: //편집[취소]버튼클릭
        {
            FormInit(); //화면을 모두 지운다.
            BtnEdit->Enabled = false;
            BtnInsert->Enabled = true;
            BtnDelete->Enabled = false;
            BtnSave->Enabled = false;

            BtnEdit->Caption = FrmLang->lblEdit->Caption;//"편집";
            BtnEdit->Hint    = FrmLang->lblEdit->Hint;//데이터 편집";
            bEnabled = true;
            bGisEdit = false;
        }
        break;
    case 2: //추가
        {
            BtnEdit->Enabled = true;
            BtnInsert->Enabled = false;
            BtnDelete->Enabled = false;
            BtnSave->Enabled = true;

            BtnEdit->Caption = FrmLang->lblCancel->Caption;//"취소";
            BtnEdit->Hint    = FrmLang->lblCancel->Hint;//데이터 편집 취소";
        }
        break;
    case 3: //수정모드
        {
            BtnEdit->Enabled = true;
            BtnInsert->Enabled = true;
            BtnDelete->Enabled = true;
            BtnSave->Enabled = false;

            BtnEdit->Caption = FrmLang->lblEdit->Caption;//"편집";
            BtnEdit->Hint    = FrmLang->lblEdit->Hint;//데이터 편집";
            bEnabled = true;
        }
        break;
    }

    if (AEdit == 0 || AEdit == 2)
    {
        FRAMEVdsDtctList1->CxList->Enabled = false;
    }
    else
    {
        FRAMEVdsDtctList1->CxList->Enabled = true;
    }

    EdVdsCtrl->Properties->ReadOnly = bEnabled;
    EdDTCT_NMBR->Properties->ReadOnly = bEnabled;
    CbDTCT_TYPE_CD->Properties->ReadOnly = bEnabled;
    CbCTLR_MNGM_NMBR->Properties->ReadOnly = bEnabled;
    SeSTLN_DSTC->Properties->ReadOnly = bEnabled;
    SeSNST->Properties->ReadOnly = bEnabled;
    CbUSE_YN->Properties->ReadOnly = bEnabled;
    SeISTL_LANE->Properties->ReadOnly = bEnabled;
    EdDET_NMBR->Properties->ReadOnly = bEnabled;
    EdCHNL_NMBR->Properties->ReadOnly = bEnabled;
    SeDTCT_VALD_DSTC->Properties->ReadOnly = bEnabled;
    SeMDVH_UPLM_LNGT->Properties->ReadOnly = bEnabled;
    SeMDVH_LWLM_LNGT->Properties->ReadOnly = bEnabled;

    BtnParamAdd->Enabled = !bEnabled;
    BtnParamDel->Enabled = !bEnabled;

    BtnCndtAdd->Enabled = !bEnabled;
    BtnCndtDel->Enabled = !bEnabled;

    BtnLinkAdd->Enabled = !bEnabled;
    BtnLinkDel->Enabled = !bEnabled;

    FRAMEGisMap1->ImgSel->Visible = false;
    if (FRAMEGisMap1->MapStart)
    {
        //TCommFlash::CallFunc(FRAMEGisMap1->ShockwaveFlash1, "ClearSelLink", "0");
        RefreshLink();
        FRAMEGisMap1->ImgSel->Visible = bGisEdit;
        if (bGisEdit == false)
        {
            if (MapStart)
            {
                TCommFlash::CallFunc(FRAMEGisMap1->ShockwaveFlash1, "SelectMode", "0");   //PAN
            }
        }
    }
}
//---------------------------------------------------------------------------


void __fastcall TVDSM020M::BtnInsertClick(TObject *Sender)
{
    FormInit();
    //신규아이디를 얻어와서 화면을 초기화한다.
    String sId;
#if 0
    if (!FRAMEVdsDtctList1->MyItsVdsManager->GetNextVdsDtctId(sId))
    {
        Application->MessageBox(L"새로운 검지기 번호를 생성하지 못하였습니다.\r\n프로그램 종료후에 다시 시도해 보세요.",
                                FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
        return;
    }
#else
	sId = InputBox("검지기 번호", "신규 검지기 번호를 입력하세요(20Byte).", "검지기 번호" );

    sId = sId.Trim();
	if (sId == "검지기 번호" || sId == "")
	{
		return;
	}
	if (AnsiString(sId).Length() > 8)
	{
        Application->MessageBox(L"검지기 번호는  20Byte를 초과할 수 없습니다.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
		return;
	}

    try
    {
        FRAMEVdsDtctList1->MyItsVdsManager->FLists.Lock();
        FOR_STL(TItsVds*, pObj, FRAMEVdsDtctList1->MyItsVdsManager->FLists)
        {
            TItsVdsDtct *pDb = pObj->FSubLists.Find(sId);
            if (pDb)
            {
                String sErr = FrmLang->lbIdErr->Caption + "[" + sId + "]";
                Application->MessageBox(sErr.c_str(),//("[" + sId + "]는 사용할 수 없는 검지기 번호 입니다.").c_str(),
                FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
                return;
            }
        }
    }
    __finally
    {
        FRAMEVdsDtctList1->MyItsVdsManager->FLists.UnLock();
    }
#endif

    EdVdsCtrl->Text   = "";
    EdDTCT_NMBR->Text = sId;

    ChangeEditMode(2);
    FNewDb = true;
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::BtnDeleteClick(TObject *Sender)
{
    int nIdx = m_pGDC->FocusedRecordIndex;
    if (nIdx < 0) return;

    String sId = EdDTCT_NMBR->Text;

    if (sId.IsEmpty())
    {
        Application->MessageBox(L"삭제할 VDS-검지기 정보를 목록에서 선택하세요.\r\n목록에서 더블클릭하여 선택합니다.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
        return;
    }
    String sMsg;
    sMsg = "VDS-검지기 번호: " + sId;
    sMsg+= "\r\n선택하신 VDS-검지기 정보를 삭제하시겠습니까?\r\n관련정보도 함께 삭제 됩니다.";

    if (Application->MessageBox(sMsg.c_str(), FTitle.c_str(), MB_YESNO|MB_ICONQUESTION|MB_APPLMODAL) != IDYES) return;

    TItsVdsDtct *pObj = NULL;
    try
    {
        FRAMEVdsDtctList1->MyItsVdsManager->FLists.Lock();
        FOR_STL(TItsVds*, pVds, FRAMEVdsDtctList1->MyItsVdsManager->FLists)
        {
            pObj = pVds->FSubLists.Find(sId);
            if (pObj)
            {
                break;
            }
        }
    }
    __finally
    {
        FRAMEVdsDtctList1->MyItsVdsManager->FLists.UnLock();
    }

	if (pObj)
	{
		if (FRAMEVdsDtctList1->MyItsVdsManager->DeleteVdsDtct(pObj))
		{
            pObj->DEL_YN = "Y";
            UpdateList();
		}

        Application->MessageBox(L"VDS-검지기 정보 삭제\r\nVDS-검지기 정보를 삭제 하였습니다.",
                                FTitle.c_str(), MB_OK|MB_ICONINFORMATION|MB_APPLMODAL);

        FUpdate = true;

        FormInit();
        ChangeEditMode(1);
	}
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::BtnSaveClick(TObject *Sender)
{
    TItsVds     *pVds;
    TItsVdsDtct *pObj;

    String sId     = EdDTCT_NMBR->Text;
    String sCtrlId = ITSUtil_GetCode(CbCTLR_MNGM_NMBR->Text);   // 제어기 관리 번호

    pVds = FRAMEVdsDtctList1->MyItsVdsManager->FLists.Find(sCtrlId);

    if (!pVds                              ||
        EdVdsCtrl->Text.IsEmpty()          ||
        EdDTCT_NMBR->Text.Trim().IsEmpty() ||
        CbCTLR_MNGM_NMBR->ItemIndex < 0    )
	{
        Application->MessageBox(L"★항목은 필수 입력 항목입니다.\r\n모두 입력후 진행해 주세요.",
                                FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
		return;
	}

    if (!FNewDb)
    {
        //수정모드일때 컨트롤러가 다르다면 신규로 처리한다.
        if (EdVdsCtrl->Text != sCtrlId)
        {
            TItsVds *pTmpVds = FRAMEVdsDtctList1->MyItsVdsManager->FLists.Find(EdVdsCtrl->Text);
            if (pTmpVds)
            {
                pTmpVds->FSubLists.Remove(sId);
            }
            FNewDb = true;
        }
    }

    if (FNewDb)
        pObj = new TItsVdsDtct();
    else
        pObj = pVds->FSubLists.Find(sId);

    if (pObj)
    {
        pObj->CTLR_MNGM_NMBR = sCtrlId;                                 //제어기 관리 번호
        pObj->DTCT_NMBR      = sId;                                     //검지기 번호
        pObj->DTCT_TYPE_CD   = ITSUtil_GetCode(CbDTCT_TYPE_CD->Text);   //검지기 유형 코드
        pObj->STLN_DSTC      = VarToStr(SeSTLN_DSTC->Value);            //NUMBER(7)	Y	0		정지선 거리
        pObj->ISTL_LANE      = VarToStr(SeISTL_LANE->Value);            //NUMBER(2)	Y			설치 차로
        pObj->DET_NMBR       = EdDET_NMBR->Text.Trim();                 //VARCHAR2(1)	Y			DET 번호
        pObj->SNST           = VarToStr(SeSNST->Value);                 //NUMBER(3)	Y	0		감도
        pObj->DTCT_VALD_DSTC = VarToStr(SeDTCT_VALD_DSTC->Value);       //NUMBER(7)	Y	0		검지기 유효 거리
        pObj->MDVH_UPLM_LNGT = VarToStr(SeMDVH_UPLM_LNGT->Value);       //NUMBER(7)	Y	0		중형차 상한 길이
        pObj->MDVH_LWLM_LNGT = VarToStr(SeMDVH_LWLM_LNGT->Value);       //NUMBER(7)	Y	0		중형차 하한 길이
        pObj->USE_YN         = CbUSE_YN->Text;                          //사용 여부
        pObj->CHNL_NMBR      = EdCHNL_NMBR->Text.Trim();                //VARCHAR2(4)	Y			채널 번호
        pObj->DEL_YN         = "N";                                     //CHAR(1)	Y	'N'		삭제 여부
        pObj->DLTR_NMBR      = "";                                      //VARCHAR2(20)	Y			삭제자 번호
        pObj->DEL_DT         = "";                                      //VARCHAR2(14)	Y			삭제 일시
        pObj->FRST_REGR_NMBR = "";                                      //VARCHAR2(20)	Y			최초 등록자 번호
        pObj->FRST_RGST_DT   = "";                                      //VARCHAR2(14)	Y			최초 등록 일시
        pObj->LAST_CRPR_NMBR = "";                                      //VARCHAR2(20)	Y			최종 수정자 번호
        pObj->LAST_CRCT_DT   = "";                                      //VARCHAR2(14)	Y			최종 수정 일시
        pObj->MEM_DEL        = "N";

        pObj->FCndtLists.RemoveAll();
        pObj->FParamLists.RemoveAll();
        pObj->FLinkLists.RemoveAll();

        try {
            TvLink->BeginUpdate();
            for (int ii = 0; ii < TvLink->DataController->RecordCount; ii++)
            {
                String sLinkId = TvLink->DataController->Values[ii][ColLink2->Index];

				TItsVdsDtctLink *pObjLnk = new TItsVdsDtctLink();

                pObjLnk->CTLR_MNGM_NMBR  = pObj->CTLR_MNGM_NMBR;
                pObjLnk->DTCT_NMBR       = pObj->DTCT_NMBR;
                pObjLnk->LINK_ID         = sLinkId;

				pObj->FLinkLists.Push(pObjLnk->LINK_ID, pObjLnk);

                pObjLnk->Completed = true;
                pObjLnk->MEM_DEL   = "N";
            }
        }
        __finally
        {
            TvLink->EndUpdate();
        }

        try {
            TvParam->BeginUpdate();
            for (int ii = 0; ii < TvParam->DataController->RecordCount; ii++)
            {
                String sSysId = TvParam->DataController->Values[ii][Param01->Index];

				TItsVdsDtctParam *pObjParam = new TItsVdsDtctParam();

                pObjParam->CTLR_MNGM_NMBR  = pObj->CTLR_MNGM_NMBR;
                pObjParam->DTCT_NMBR       = pObj->DTCT_NMBR;
                pObjParam->SYST_KIND_DVSN  = sSysId;
                pObjParam->TFVL_FCTR       = VarToStr(TvParam->DataController->Values[ii][Param02->Index]);
                pObjParam->OCPY_RATE_FCTR  = VarToStr(TvParam->DataController->Values[ii][Param03->Index]);
                pObjParam->SPED_FCTR       = VarToStr(TvParam->DataController->Values[ii][Param04->Index]);
                pObjParam->HDWY_FCTR       = VarToStr(TvParam->DataController->Values[ii][Param05->Index]);
                pObjParam->DEL_YN          = "N";
                pObjParam->FRST_REGR_NMBR  = "";
                pObjParam->FRST_RGST_DT    = "";
                pObjParam->LAST_CRPR_NMBR  = "";
                pObjParam->LAST_CRCT_DT    = "";

				pObj->FParamLists.Push(pObjParam->SYST_KIND_DVSN, pObjParam);

                pObjParam->Completed = true;
                pObjParam->MEM_DEL   = "N";
            }
        }
        __finally
        {
            TvParam->EndUpdate();
        }

        try {
            TvCndt->BeginUpdate();
            for (int ii = 0; ii < TvCndt->DataController->RecordCount; ii++)
            {
                String sSysId = TvCndt->DataController->Values[ii][Cndt01->Index];

				TItsVdsDtctCndt *pObjCndt = new TItsVdsDtctCndt();

                pObjCndt->CTLR_MNGM_NMBR  = pObj->CTLR_MNGM_NMBR;
                pObjCndt->DTCT_NMBR       = pObj->DTCT_NMBR;
                pObjCndt->SYST_KIND_DVSN  = sSysId;
                pObjCndt->MAX_TFVL        = VarToStr(TvCndt->DataController->Values[ii][Cndt02->Index]);
                pObjCndt->MIN_TFVL        = VarToStr(TvCndt->DataController->Values[ii][Cndt03->Index]);
                pObjCndt->MAX_OCPY_RATE   = VarToStr(TvCndt->DataController->Values[ii][Cndt04->Index]);
                pObjCndt->MIN_OCPY_RATE   = VarToStr(TvCndt->DataController->Values[ii][Cndt05->Index]);
                pObjCndt->MAX_SPED        = VarToStr(TvCndt->DataController->Values[ii][Cndt06->Index]);
                pObjCndt->MIN_SPED        = VarToStr(TvCndt->DataController->Values[ii][Cndt07->Index]);
                pObjCndt->DEL_YN          = "N";
                pObjCndt->FRST_REGR_NMBR  = "";
                pObjCndt->FRST_RGST_DT    = "";
                pObjCndt->LAST_CRPR_NMBR  = "";
                pObjCndt->LAST_CRCT_DT    = "";

				pObj->FCndtLists.Push(pObjCndt->SYST_KIND_DVSN, pObjCndt);

                pObjCndt->Completed = true;
                pObjCndt->MEM_DEL   = "N";
            }
        }
        __finally
        {
            TvCndt->EndUpdate();
        }

        bool bResult;
        bResult = FRAMEVdsDtctList1->MyItsVdsManager->SaveVdsDtct(pObj);

        if (bResult)
        {
            Application->MessageBox(FrmLang->lblDbSave->Caption.c_str(),//L"VDS-검지기 정보저장\r\nVDS-검지기 정보를 저장 하였습니다.",
                                    FTitle.c_str(), MB_OK|MB_ICONINFORMATION|MB_APPLMODAL);

            if (FNewDb)
            {
                pVds->FSubLists.Push(pObj->DTCT_NMBR, pObj);
            }

            FUpdate = true;

            UpdateList();
            CMM_SetGridRow(FRAMEVdsDtctList1->CxList, FRAMEVdsDtctList1->TvList, sId, FRAMEVdsDtctList1->Column02->Index);
#if 0
            DisplayInfo(pObj);
#else
            int nRow = FRAMEVdsDtctList1->TvList->DataController->FocusedRecordIndex;
            if( nRow <= -1 )
                return;

            int nMemPtr = FRAMEVdsDtctList1->TvList->DataController->Values[nRow][FRAMEVdsDtctList1->Column99->Index];
            TItsVdsDtct* pObj = (TItsVdsDtct*)nMemPtr;
            DisplayInfo(pObj);
#endif
        }
    }
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::RefreshLink()
{
    if (!MapStart) return;

    TCommFlash::CallFunc(FRAMEGisMap1->ShockwaveFlash1, "ClearSelLink", "0");

    try
    {
        int nRow;
        TcxDataController *pGDC = TvLink->DataController;
        TvLink->BeginUpdate();
        try
        {
            for (int ii = 0; ii < pGDC->RecordCount; ii++)
            {
                String sLinkId = pGDC->Values[ii][ColLink2->Index];
                TCommFlash::CallFunc(FRAMEGisMap1->ShockwaveFlash1, "AddSelLink", sLinkId);
            }
        }
        catch(...)
        {
        }
    }
    __finally
    {
        TvLink->EndUpdate();
    }
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::BtnLinkDelClick(TObject *Sender)
{
    int nSelRows = TvLink->Controller->SelectedRowCount;
    if (nSelRows <= 0)
    {
        Application->MessageBox(L"삭제를 원하는 링크구간을 목록에서 선택하세요.",
                                FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
        return;
    }
    TvLink->Controller->DeleteSelection();
    RefreshLink();
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::BtnLinkAddClick(TObject *Sender)
{
    if (EdLinkId->Text.IsEmpty()) return;

    String sNewId = EdLinkId->Text;
    bool bFound = false;
    try
    {
        int nRow;
        TcxDataController *pGDC = TvLink->DataController;
        TvLink->BeginUpdate();

        for (int ii = 0; ii < pGDC->RecordCount; ii++)
        {
            String sLinkId = pGDC->Values[ii][ColLink2->Index];
            if (sNewId == sLinkId)
            {
                bFound = true;
                break;
            }
        }
        if (bFound)
        {
            Application->MessageBox(L"이미 등록되어 있는 링크구간 입니다.\r\n링크 구간은 중복해서 등록 할 수 없습니다.",
                                    FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
            return;
        }

        nRow = pGDC->AppendRecord();
        pGDC->Values[nRow][ColLink2->Index] = sNewId;
        TItsLink *pLink = ItsLinkManager->FLists.Find(sNewId);
        if (pLink)
        {
            TItsNode *pNode;
            pGDC->Values[nRow][ColLink3->Index] = pLink->F_NODEID;
            pGDC->Values[nRow][ColLink5->Index] = pLink->T_NODEID;
            pNode = ItsNodeManager->FLists.Find(pLink->F_NODEID);
            if (pNode)
            {
                pGDC->Values[nRow][ColLink4->Index] = pNode->NODE_NAME;
            }
            pNode = ItsNodeManager->FLists.Find(pLink->T_NODEID);
            if (pNode)
            {
                pGDC->Values[nRow][ColLink6->Index] = pNode->NODE_NAME;
            }
        }
    }
    __finally
    {
        TvLink->EndUpdate();
    }

    RefreshLink();
}
//---------------------------------------------------------------------------
void __fastcall TVDSM020M::TvLinkCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo,
          TMouseButton AButton, TShiftState AShift, bool &AHandled)
{
    if (!MapStart) return;

	if (!ACellViewInfo) return;
	int nRow = TvLink->DataController->FocusedRecordIndex;
	if( nRow <= -1 )
		return;

    String sLinkId = TvLink->DataController->Values[nRow][ColLink2->Index];
    TCommFlash::CallFunc(FRAMEGisMap1->ShockwaveFlash1, "FindLink", sLinkId);
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::BtnParamDelClick(TObject *Sender)
{
    int nSelRows = TvParam->Controller->SelectedRowCount;
    if (nSelRows <= 0)
    {
        Application->MessageBox(L"삭제를 원하는 평활화 파라미터정보를 목록에서 선택하세요.",
                                FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
        return;
    }
    TvParam->Controller->DeleteSelection();
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::BtnCndtDelClick(TObject *Sender)
{
    int nSelRows = TvCndt->Controller->SelectedRowCount;
    if (nSelRows <= 0)
    {
        Application->MessageBox(L"삭제를 원하는 신뢰도 조건을 목록에서 선택하세요.",
                                FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
        return;
    }
    TvCndt->Controller->DeleteSelection();
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::FRAMEVdsDtctList1TvListCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo,
          TMouseButton AButton, TShiftState AShift, bool &AHandled)
{
	if (!ACellViewInfo) return;
	int nRow = FRAMEVdsDtctList1->TvList->DataController->FocusedRecordIndex;
	if( nRow <= -1 )
		return;

    int nMemPtr = FRAMEVdsDtctList1->TvList->DataController->Values[nRow][FRAMEVdsDtctList1->Column99->Index];
    TItsVdsDtct* pObj = (TItsVdsDtct*)nMemPtr;
    DisplayInfo(pObj);
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::FRAMEVdsList1TvListCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo,
          TMouseButton AButton, TShiftState AShift, bool &AHandled)
{
	if (!ACellViewInfo) return;
	int nRow = FRAMEVdsList1->TvList->DataController->FocusedRecordIndex;
	if( nRow <= -1 )
		return;

    int nMemPtr = FRAMEVdsList1->TvList->DataController->Values[nRow][FRAMEVdsList1->Column99->Index];
    TItsVds* pObj = (TItsVds*)nMemPtr;
    try {
    FRAMEGisMap1->SelectObjectByPos(StrToFloatDef(pObj->X_CRDN, 0), StrToFloatDef(pObj->Y_CRDN, 0), true);
    } catch(...) { }
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::BtnParamAddClick(TObject *Sender)
{
    String sId;
	sId = InputBox("검지기 번호", "시스템 종류를 입력하세요(1Byte).", "시스템 종류" );

    sId = sId.Trim();
	if (sId == "검지기 번호" || sId == "")
	{
		return;
	}
	if (AnsiString(sId).Length() != 1)
	{
        Application->MessageBox(L"시스템 종류는  1Byte를 초과할 수 없습니다.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
		return;
	}

    bool bFound = false;
    try
    {
        int nRow;
        TcxDataController *pGDC = TvParam->DataController;
        TvParam->BeginUpdate();

        for (int ii = 0; ii < pGDC->RecordCount; ii++)
        {
            String sTmpId = pGDC->Values[ii][Param01->Index];
            if (sTmpId == sId)
            {
                bFound = true;
                break;
            }
        }
        if (bFound)
        {
            Application->MessageBox(L"이미 등록되어 있는 시스템 종류 입니다.\r\n새로운 시스템 종류를 입력하세요.",
                                    FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
            return;
        }

        nRow = pGDC->AppendRecord();
        pGDC->Values[nRow][Param01->Index] = sId;
        pGDC->Values[nRow][Param02->Index] = 0;
        pGDC->Values[nRow][Param03->Index] = 0;
        pGDC->Values[nRow][Param04->Index] = 0;
        pGDC->Values[nRow][Param05->Index] = 0;
    }
    __finally
    {
        TvParam->EndUpdate();
    }
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::BtnCndtAddClick(TObject *Sender)
{
    String sId;
	sId = InputBox("검지기 번호", "시스템 종류를 입력하세요(1Byte).", "시스템 종류" );

    sId = sId.Trim();
	if (sId == "검지기 번호" || sId == "")
	{
		return;
	}
	if (AnsiString(sId).Length() != 1)
	{
        Application->MessageBox(L"시스템 종류는  1Byte를 초과할 수 없습니다.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
		return;
	}

    bool bFound = false;
    try
    {
        int nRow;
        TcxDataController *pGDC = TvCndt->DataController;
        TvCndt->BeginUpdate();

        for (int ii = 0; ii < pGDC->RecordCount; ii++)
        {
            String sTmpId = pGDC->Values[ii][Param01->Index];
            if (sTmpId == sId)
            {
                bFound = true;
                break;
            }
        }
        if (bFound)
        {
            Application->MessageBox(L"이미 등록되어 있는 시스템 종류 입니다.\r\n새로운 시스템 종류를 입력하세요.",
                                    FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL);
            return;
        }

        nRow = pGDC->AppendRecord();
        pGDC->Values[nRow][Cndt01->Index] = sId;
        pGDC->Values[nRow][Cndt02->Index] = 0;
        pGDC->Values[nRow][Cndt03->Index] = 0;
        pGDC->Values[nRow][Cndt04->Index] = 0;
        pGDC->Values[nRow][Cndt05->Index] = 0;
        pGDC->Values[nRow][Cndt06->Index] = 0;
        pGDC->Values[nRow][Cndt07->Index] = 0;
    }
    __finally
    {
        TvCndt->EndUpdate();
    }
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::ChkGisZoomClick(TObject *Sender)
{
    PnlInfo->Visible = !ChkGisZoom->Checked;
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::ShockwaveFlash1FlashCall1(TObject *ASender, const WideString request)
{
    try
    {
        String sTemp;
        String sFunc;
        String sArgs;

        sTemp = request;

        int nFuncStrIdx = sTemp.Pos("\"");
        int nFuncEndIdx = sTemp.Pos("\" returntype");
        int nArgsStrIdx = sTemp.Pos("string>");
        int nArgsEndIdx = sTemp.Pos("</string");

        sFunc = sTemp.SubString(nFuncStrIdx + 1, nFuncEndIdx - (nFuncStrIdx + 1));
        sArgs = sTemp.SubString(nArgsStrIdx + 7, nArgsEndIdx - (nArgsStrIdx + 7));

        if (sFunc == "OnMapStart")
        {
            MapStart = true;

            String sShowIcon = ChkViewIcon->Checked ? "1" : "0";
            String sShowName = ChkViewName->Checked ? "1" : "0";
            TCommFlash::CallFunc(FRAMEGisMap1->ShockwaveFlash1, "ShowFacility", "RSE|" + sShowIcon + "|" + sShowName);
            TCommFlash::CallFunc(FRAMEGisMap1->ShockwaveFlash1, "MultiSelect",  "1");
        }
        else
        if (sFunc == "OnDrawTrafLink")
        {
            static bool bFirst = true;
            if (bFirst)
            {
                UpdateVdsIcon();
                bFirst = true;
            }
        }
        else
        if (sFunc == "OnMousePos")
        {
            if (FRAMEGisMap1->ModeSelect)
            {
                TStringList *pStringList = new TStringList;
                pStringList->CommaText = sArgs;
                String sMapX = pStringList->Strings[0]; //lat
                String sMapY = pStringList->Strings[1]; //lng
                delete pStringList;
                try {
                    //SePosX->Value = sMapX.ToDouble();
                    //SePosY->Value = sMapY.ToDouble();
                } catch(...) {}
            }
        }
        else
        if (sFunc == "OnSelLink")
        {
            if (FRAMEGisMap1->ModeSelect)// && EdRseSectName->Properties->ReadOnly == false)
            {
                TStringList *pStringList = new TStringList;
                pStringList->CommaText = sArgs;

                String sLevl = pStringList->Strings[0]; //링크레벨
                String sId   = pStringList->Strings[1]; //링크아이디
                String sZoom = pStringList->Strings[2]; //줌레벨
                String sPosX = pStringList->Strings[3]; //x
                String sPosY = pStringList->Strings[4]; //y
                String sMapX = pStringList->Strings[5]; //lat
                String sMapY = pStringList->Strings[6]; //lng

                delete pStringList;

                EdLinkId->Text = sId;
#if 0
                if (BtnLinkAdd->Enabled)
                {
                    if (Shift.Contains(ssCtrl))
                    {
                        BtnLinkAddClick((TObject*)BtnLinkAdd);
                    }
                }
#endif
            }
        }
        else
        if (sFunc == "OnClickFacility")
        {
            if (FRAMEGisMap1->ModeSelect)
            {
                TStringList *pStringList = new TStringList;
                pStringList->CommaText = sArgs;

                String sType = pStringList->Strings[0]; //유형
                String sId   = pStringList->Strings[1]; //아이디
                String sName = pStringList->Strings[2]; //아이디

                delete pStringList;

#if 0
                if (cxCheckBox1->Checked)
                {
                    EdStartSpotId->Text = sId;
                    EdStartSpotNm->Text = sName;
                }
                else
                if (cxCheckBox2->Checked)
                {
                    EdEndSpotId->Text = sId;
                    EdEndSpotNm->Text = sName;
                }
#endif
            }
        }
    }
    catch(Exception &exception)
    {
    }
}
//---------------------------------------------------------------------------

void __fastcall TVDSM020M::ChkViewIconClick(TObject *Sender)
{
    if (!MapStart) return;

    String sShowIcon = ChkViewIcon->Checked ? "1" : "0";
    String sShowName = ChkViewName->Checked ? "1" : "0";
    TCommFlash::CallFunc(FRAMEGisMap1->ShockwaveFlash1, "ShowFacility", "VDS|" + sShowIcon + "|" + sShowName);
}
//---------------------------------------------------------------------------