//--------------------------------------------------------------------------- #include #include "ITSSkinF.h" #include "ITSUtilF.h" #include "AppGlobalF.h" #include "ITSLangTransF.h" #include "ITSMapF.h" #include "WindowMsgF.h" #include "ITS_OPLibF.h" #include "CDSCodeF.h" #include "CDSFacilityF.h" #include "CDSNodeF.h" #pragma hdrstop #include "DSRM040MF.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "FRAME_DsrcListF" #pragma link "cxButtons" #pragma link "cxCalc" #pragma link "cxCheckBox" #pragma link "cxClasses" #pragma link "cxContainer" #pragma link "cxControls" #pragma link "cxCustomData" #pragma link "cxData" #pragma link "cxDataStorage" #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 link "dxSkinMcSkin" #pragma link "FRAME_OpenMapF" #pragma resource "*.dfm" TDSRM040M *DSRM040M = NULL; //--------------------------------------------------------------------------- void TDSRM040M_MapCallback(TObject *ASender, const String AFunc, const String AArgs, const bool AFirst) { try { if (!DSRM040M) return; DSRM040M->OpenMapCallback(ASender, AFunc, AArgs, AFirst); } catch(Exception &exception) { } } //--------------------------------------------------------------------------- __fastcall TDSRM040M::TDSRM040M(TComponent* Owner) : TForm(Owner) { LangTrans->Translate(this, ITSDb_GetConnection()); ITSSkin_Load(this); CMM_LoadForm(g_sFormsDir, this); FUpdate= false; FTitle = Caption; TvList->OptionsView->NoDataToDisplayInfoText = FrmLang->lblNoInfo->Caption;//""; TvLink->OptionsView->NoDataToDisplayInfoText = FrmLang->lblNoInfo->Caption;//"<¼­ºñ½º¸µÅ© Á¤º¸°¡ ¾ø½À´Ï´Ù>"; m_pGDC = TvList->DataController; FRAMEDsrcList1->PnlBottom->Visible = false; FRAMEDsrcList1->PnlTop->Visible = false; FRAMEDsrcList1->ColumnSel->Visible = false; //FRAMEDsrcList1->Column02->Visible = false; MyItsDsrcOfferSectManager = new TItsDsrcOfferSectManager(); MyItsDsrcOfferSectManager->LoadFromDb(); FLayerIdx = LyrTp_Dsrc; FRAMEOpenMap1->LayerIdx = FLayerIdx; FRAMEOpenMap1->ChkShowNmbr->Visible = false; FRAMEOpenMap1->BtnMapSelect->Visible = false; FRAMEOpenMap1->MapCallbackFunc = TDSRM040M_MapCallback; EditMode = false; } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::CommClose() { try { CMM_SaveForm(g_sFormsDir, this); } catch(...) { } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::FormShow(TObject *Sender) { Refresh(); FRAMEOpenMap1->OpenMap(); FormInit(); ChangeEditMode(1); TmrShow->Enabled = true; } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::FormInit() { //Á¦°ø±¸°£¸ñ·ÏÀÌ ÃʱâÈ­µÇ±âÀü¿¡ ÀÌÀüÁ¤º¸¸¦ Áöµµ¿¡¼­ Áö¿öÁØ´Ù. if (FRAMEOpenMap1->MapStart) { int nRow; TcxDataController *pGDC = TvLink->DataController; try { for (int ii = 0; ii < pGDC->RecordCount; ii++) { String sLinkId = pGDC->Values[ii][ColLink2->Index]; sJs.printf(L"updateEditLink('%s', 0)", sLinkId.c_str()); FRAMEOpenMap1->ExecScript(sJs); } } catch(...) { } } EdLinkId->Text = ""; EdRseSectId->Text = ""; EdRseSectName->Text = ""; SeCNGSSPD->Value = 10; SeDELYSPD->Value = 20; EdStartSpotId->Text = ""; EdStartSpotNm->Text = ""; EdEndSpotId->Text = ""; EdEndSpotNm->Text = ""; EdDrctNmbr->Text = "0"; EdDrctNum->Text = "0"; CMM_ClearGridTableView(TvLink); FNewDb = false; } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::TmrShowTimer(TObject *Sender) { TmrShow->Enabled = false; FRAMEDsrcList1->UpdateList(); UpdateList(); } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::UpdateList() { CMM_ClearGridTableView(TvList); int nRow; try { TvList->BeginUpdate(); FOR_STL(TItsDsrcOfferSect*, pObj, MyItsDsrcOfferSectManager->FLists) { if (pObj->DEL_YN == "Y") continue; nRow = m_pGDC->AppendRecord(); m_pGDC->Values[nRow][Column01->Index] = pObj->OFFR_SECT_ID; m_pGDC->Values[nRow][Column02->Index] = pObj->OFFR_DRCT_NM; m_pGDC->Values[nRow][Column03->Index] = pObj->ID; m_pGDC->Values[nRow][Column04->Index] = pObj->PRE_ID; m_pGDC->Values[nRow][Column99->Index] = (int)pObj; } } __finally { TvList->EndUpdate(); TvList->DataController->GotoFirst(); TvList->DataController->FocusedRecordIndex = 0; //CxList->SetFocus(); } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::UpdateEditLink() { if (!FRAMEOpenMap1->MapStart) return; TItsNode* pNode; String STRT_NM; String END_NM; int FLinkLevel = 2; try { if (FLinkLevel == 1) { ItsLinkManager->FLists.Lock(); try { FOR_STL(TItsLink*, pLink, ItsLinkManager->FLists) { if (pLink->DEL_YN == "Y") continue; if (pLink->IsVertex) { pNode = ItsNodeManager->FLists.Find(pLink->F_NODE_ID); if (pNode) STRT_NM = pNode->NODE_NAME; else STRT_NM = " "; pNode = ItsNodeManager->FLists.Find(pLink->T_NODE_ID); if (pNode) END_NM = pNode->NODE_NAME; else END_NM = " "; sJs.printf(L"addEditLink('%s', '%s', '%s', '%s', '%s', '%s')", pLink->LINK_ID.c_str(), pLink->ROAD_NAME.c_str(), STRT_NM.c_str(), END_NM.c_str(), pLink->X_CRDN_ARR.c_str(), pLink->Y_CRDN_ARR.c_str()); FRAMEOpenMap1->ExecScript(sJs); } } } __finally { ItsLinkManager->FLists.UnLock(); } FRAMEOpenMap1->ExecScript("makeEditLinkLayer()"); } else if (FLinkLevel == 2) { ItsIfscManager->FLists.Lock(); try { FOR_STL(TItsIfsc*, pIfsc, ItsIfscManager->FLists) { if (pIfsc->DEL_YN == "Y") continue; if (pIfsc->IsVertex) { sJs.printf(L"addEditLink('%s', '%s', '%s', '%s', '%s', '%s')", pIfsc->IFSC_ID.c_str(), pIfsc->IFSC_NM.c_str(), pIfsc->STRT_NM.c_str(), pIfsc->END_NM.c_str(), pIfsc->X_CRDN_ARR.c_str(), pIfsc->Y_CRDN_ARR.c_str()); FRAMEOpenMap1->ExecScript(sJs); } } } __finally { ItsIfscManager->FLists.UnLock(); } FRAMEOpenMap1->ExecScript("makeEditLinkLayer()"); } else if (FLinkLevel == 3) { ItsRoadManager->FLists.Lock(); try { FOR_STL(TItsRoad*, pRoad, ItsRoadManager->FLists) { if (pRoad->DEL_YN == "Y") continue; if (pRoad->IsVertex) { sJs.printf(L"addEditLink('%s', '%s', '%s', '%s', '%s', '%s')", pRoad->ROAD_ID.c_str(), pRoad->ROAD_NM.c_str(), pRoad->STRT_NM.c_str(), pRoad->END_NM.c_str(), pRoad->X_CRDN_ARR.c_str(), pRoad->Y_CRDN_ARR.c_str()); FRAMEOpenMap1->ExecScript(sJs); } } } __finally { ItsRoadManager->FLists.UnLock(); } FRAMEOpenMap1->ExecScript("makeEditLinkLayer()"); } } catch(...) { } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::BtnCloseClick(TObject *Sender) { Close(); } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::FormClose(TObject *Sender, TCloseAction &Action) { CommClose(); DSRM040M = NULL; Action = caFree; } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::FormCloseQuery(TObject *Sender, bool &CanClose) { #if 0 if (FUpdate) { POST_MSG(Application->MainForm->Handle, WM_DATABASE_REFRESH, WP_MSG_14, 0); } #endif if (MyItsDsrcOfferSectManager) { delete MyItsDsrcOfferSectManager; MyItsDsrcOfferSectManager = NULL; } FRAMEDsrcList1->OnCloseQuery(CanClose); FRAMEOpenMap1->OnCloseQuery(CanClose); } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::DisplayInfo(TItsDsrcOfferSect* AObj) { FormInit(); if (!AObj) return; EdRseSectId->Text = AObj->OFFR_SECT_ID; EdRseSectName->Text = AObj->OFFR_DRCT_NM; SeCNGSSPD->Value = StrToFloatDef(AObj->CNGS_BASI_SPED, 0); SeDELYSPD->Value = StrToFloatDef(AObj->DELY_BASI_SPED, 0); EdStartSpotId->Text = AObj->ID; EdStartSpotNm->Text = AObj->TARGETNM; EdEndSpotId->Text = AObj->PRE_ID; EdEndSpotNm->Text = AObj->PRENM; EdDrctNmbr->Text = AObj->OBU_ENTR_DRCT_NMBR; EdDrctNum->Text = AObj->IXR_DRCT_NUM; ChangeEditMode(3); DisplaySectLink(AObj); } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::DisplaySectLink(TItsDsrcOfferSect* AObj) { if (!AObj) return; CMM_ClearGridTableView(TvLink); String sLinkIds = ""; try { int nRow; TcxDataController *pGDC = TvLink->DataController; TvLink->BeginUpdate(); FOR_STL(TItsDsrcOfferSectInfr *, pObj, AObj->FSectLists) { String sLinkId = pObj->IFSC_ID; nRow = pGDC->AppendRecord(); pGDC->Values[nRow][ColLink2->Index] = sLinkId; TItsIfsc *pLink = ItsIfscManager->FLists.Find(sLinkId); if (pLink) { TItsNode *pNode; pGDC->Values[nRow][ColLink3->Index] = pLink->F_NODE_ID; pGDC->Values[nRow][ColLink5->Index] = pLink->T_NODE_ID; pNode = ItsNodeManager->FLists.Find(pLink->F_NODE_ID); if (pNode) { pGDC->Values[nRow][ColLink4->Index] = pNode->NODE_NAME; } pNode = ItsNodeManager->FLists.Find(pLink->T_NODE_ID); if (pNode) { pGDC->Values[nRow][ColLink6->Index] = pNode->NODE_NAME; } if (sLinkIds == "") sLinkIds = sLinkId; else sLinkIds = sLinkIds + ","+sLinkId; } } } __finally { TvLink->EndUpdate(); } RefreshSectLink(); if (sLinkIds != "") { sJs.printf(L"extentLayerObject(%d, '%s')", LyrTp_Traffic, sLinkIds.c_str()); FRAMEOpenMap1->ExecScript(sJs); } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::UpdateRseIcon() { if (!FRAMEOpenMap1->MapStart) return; String arrObj = ""; String sTemp; try { try { FRAMEDsrcList1->MyItsDsrcManager->FLists.Lock(); FOR_STL(TItsDsrc*, pObj, FRAMEDsrcList1->MyItsDsrcManager->FLists) { if (pObj->DEL_YN == "Y") continue; if (arrObj != "") arrObj += "|"; sTemp.printf(L"%s,%s,%s,%.6f,%.6f,0,0,0,0", pObj->CTLR_NMBR.c_str(), pObj->CTLR_ID.c_str(), pObj->ISTL_LCTN_NM.c_str(), pObj->X_CRDN, pObj->Y_CRDN); arrObj += sTemp; } } __finally { FRAMEDsrcList1->MyItsDsrcManager->FLists.UnLock(); if (arrObj != "") { sJs.printf(L"addFacility(%d, '%s')", FLayerIdx, arrObj.c_str()); FRAMEOpenMap1->ExecScript(sJs); sJs.printf(L"showLayerText(%d, %d)", FLayerIdx, (ChkViewIcon->Checked) ? 1: 0); FRAMEOpenMap1->ExecScript(sJs); } } } catch(...) { } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::BtnEditClick(TObject *Sender) { if (BtnEdit->Caption == FrmLang->lblEdit->Caption)//"ÆíÁý") { ChangeEditMode(0); FNewDb = false; } else { String sSectId = EdRseSectId->Text; ChangeEditMode(1); TItsDsrcOfferSect *pObj = MyItsDsrcOfferSectManager->FLists.Find(sSectId); if (pObj) { CMM_SetGridRow(CxList, TvList, sSectId, Column01->Index); DisplayInfo(pObj); } } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::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;//µ¥ÀÌÅÍ ÆíÁý Ãë¼Ò"; EditMode = true; } 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; EditMode = 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;//µ¥ÀÌÅÍ ÆíÁý Ãë¼Ò"; EditMode = true; } 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; EditMode = false; } break; } if (AEdit == 0 || AEdit == 2) { CxList->Enabled = false; } else { CxList->Enabled = true; } GrpInfo->Enabled = EditMode; GrpLink->Enabled = EditMode; EdRseSectName->Properties->ReadOnly = bEnabled; SeCNGSSPD->Properties->ReadOnly = bEnabled; SeDELYSPD->Properties->ReadOnly = bEnabled; cxCheckBox1->Enabled = !bEnabled; cxCheckBox2->Enabled = !bEnabled; BtnLinkAdd->Enabled = !bEnabled; BtnLinkDel->Enabled = !bEnabled; } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::BtnInsertClick(TObject *Sender) { FormInit(); //½Å±Ô¾ÆÀ̵𸦠¾ò¾î¿Í¼­ È­¸éÀ» ÃʱâÈ­ÇÑ´Ù. String sSectId; if (!MyItsDsrcOfferSectManager->GetNextOffrSectId(sSectId)) { Application->MessageBox(L"»õ·Î¿î Á¦°ø±¸°£ ID¸¦ »ý¼ºÇÏÁö ¸øÇÏ¿´½À´Ï´Ù.\r\nÇÁ·Î±×·¥ Á¾·áÈÄ¿¡ ´Ù½Ã ½ÃµµÇØ º¸¼¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } EdRseSectId->Text = sSectId; ChangeEditMode(2); FNewDb = true; } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::BtnDeleteClick(TObject *Sender) { int nIdx = m_pGDC->FocusedRecordIndex; if (nIdx < 0) return; String sSectId = EdRseSectId->Text; if (sSectId.IsEmpty()) { Application->MessageBox(L"»èÁ¦ÇÒ DSRC Á¦°ø±¸°£À» ¸ñ·Ï¿¡¼­ ¼±ÅÃÇϼ¼¿ä.\r\n¸ñ·Ï¿¡¼­ ´õºíŬ¸¯ÇÏ¿© ¼±ÅÃÇÕ´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } String sMsg; sMsg = "Á¦°ø±¸°£ ID: " + sSectId; sMsg+= "\r\n¼±ÅÃÇϽŠDSRC Á¦°ø±¸°£ Á¤º¸¸¦ »èÁ¦ÇϽðڽÀ´Ï±î?\r\n°ü·ÃÁ¤º¸µµ ÇÔ²² »èÁ¦ µË´Ï´Ù."; if (Application->MessageBox(sMsg.c_str(), FTitle.c_str(), MB_YESNO|MB_ICONQUESTION|MB_APPLMODAL) != IDYES) return; TItsDsrcOfferSect *pObj = MyItsDsrcOfferSectManager->FLists.Find(sSectId); if (pObj) { if (MyItsDsrcOfferSectManager->DeleteOfferSect(pObj->OFFR_SECT_ID)) { pObj->DEL_YN = "Y"; UpdateList(); } FUpdate = true; Application->MessageBox(L"DSRC Á¦°ø±¸°£ Á¤º¸»èÁ¦\r\nDSRC Á¦°ø±¸°£ Á¤º¸¸¦ »èÁ¦ ÇÏ¿´½À´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONINFORMATION|MB_APPLMODAL); FormInit(); ChangeEditMode(1); } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::BtnSaveClick(TObject *Sender) { if (EdRseSectId->Text.IsEmpty() || EdRseSectName->Text.Trim().IsEmpty() || EdStartSpotNm->Text.Trim().IsEmpty() || EdEndSpotNm->Text.Trim().IsEmpty() || EdStartSpotId->Text.IsEmpty() || EdEndSpotId->Text.IsEmpty() || EdDrctNmbr->Text.Trim().IsEmpty() || EdDrctNum->Text.Trim().IsEmpty() ) { Application->MessageBox(L"¡ÚÇ׸ñÀº Çʼö ÀÔ·Â Ç׸ñÀÔ´Ï´Ù.\r\n¸ðµÎ ÀÔ·ÂÈÄ ÁøÇàÇØ ÁÖ¼¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } String sSectId = EdRseSectId->Text; String STRT_ID = EdStartSpotId->Text.Trim(); String END_ID = EdEndSpotId->Text.Trim(); if (TvLink->DataController->RecordCount == 0) { Application->MessageBox(L"Á¦°ø±¸°£ ¸µÅ©Á¤º¸°¡ ¾ø½À´Ï´Ù.\r\n¸µÅ©Á¤º¸¸¦ ÀÔ·ÂÈÄ ÁøÇàÇØ ÁÖ¼¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } if (STRT_ID == END_ID) { Application->MessageBox(L"Ÿ°Ù DSRC¿Í ÀÌÀü DSRCÀÇ Á¤º¸°¡ °°½À´Ï´Ù.\r\nŸ°Ù/ÀÌÀü DSRC Á¤º¸¸¦ È®ÀÎ ÈÄ ÁøÇàÇØ ÁÖ¼¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } MyItsDsrcOfferSectManager->FLists.Lock(); FOR_STL(TItsDsrcOfferSect*, tmp, MyItsDsrcOfferSectManager->FLists) { if (tmp->OFFR_SECT_ID == sSectId) continue; if (tmp->ID == STRT_ID && tmp->PRE_ID == END_ID) { Application->MessageBox(L"Ÿ°Ù DSRC¿Í ÀÌÀü DSRCÀÇ Á¤º¸°¡ ÀÌ¹Ì Á¸ÀçÇÕ´Ï´Ù.\r\nŸ°Ù/ÀÌÀü DSRC Á¤º¸¸¦ È®ÀÎ ÈÄ ÁøÇàÇØ ÁÖ¼¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); MyItsDsrcOfferSectManager->FLists.UnLock(); return; } } MyItsDsrcOfferSectManager->FLists.UnLock(); TItsDsrcOfferSect *pObj; if (FNewDb) pObj = new TItsDsrcOfferSect(); else pObj = MyItsDsrcOfferSectManager->FLists.Find(sSectId); if (pObj) { pObj->OFFR_SECT_ID = sSectId; pObj->OFFR_DRCT_NM = EdRseSectName->Text.Trim(); pObj->CNGS_BASI_SPED = VarToStr(SeCNGSSPD->Value); pObj->DELY_BASI_SPED = VarToStr(SeDELYSPD->Value); pObj->ID = STRT_ID; pObj->OBU_ENTR_DRCT_NMBR = EdDrctNmbr->Text.Trim(); pObj->PRE_ID = END_ID; pObj->IXR_DRCT_NUM = EdDrctNum->Text.Trim();//pObj->OBU_ENTR_DRCT_NMBR; pObj->TARGETNM = EdStartSpotNm->Text; pObj->PRENM = EdEndSpotNm->Text; pObj->DEL_YN = "N"; pObj->Completed = true; pObj->MEM_DEL = "N"; pObj->FSectLists.RemoveAll(); try { TvLink->BeginUpdate(); for (int ii = 0; ii < TvLink->DataController->RecordCount; ii++) { String sLinkId = TvLink->DataController->Values[ii][ColLink2->Index]; TItsDsrcOfferSectInfr *pSectObj = new TItsDsrcOfferSectInfr(); pSectObj->OFFR_SECT_ID = pObj->OFFR_SECT_ID; pSectObj->IFSC_ID = sLinkId; pSectObj->ORD = ii+1; pSectObj->DEL_YN = "N"; pObj->FSectLists.Push(pSectObj->ORD, pSectObj); } } __finally { TvLink->EndUpdate(); } bool bResult; bResult = MyItsDsrcOfferSectManager->SaveOfferSect(pObj); if (bResult) { Application->MessageBox(FrmLang->lblDbSave->Caption.c_str(),//L"DSRC Á¦°ø±¸°£ Á¤º¸ÀúÀå\r\nDSRC Á¦°ø±¸°£ Á¤º¸¸¦ ÀúÀå ÇÏ¿´½À´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONINFORMATION|MB_APPLMODAL); if (FNewDb) { MyItsDsrcOfferSectManager->FLists.Push(pObj->OFFR_SECT_ID, pObj); } FUpdate = true; UpdateList(); CMM_SetGridRow(CxList, TvList, sSectId, Column01->Index); int nRow = TvList->DataController->FocusedRecordIndex; if( nRow <= -1 ) return; int nMemPtr = TvList->DataController->Values[nRow][Column99->Index]; TItsDsrcOfferSect* pObj = (TItsDsrcOfferSect*)nMemPtr; DisplayInfo(pObj); } } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::TvListCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo, TMouseButton AButton, TShiftState AShift, bool &AHandled) { if (!ACellViewInfo) return; int nRow = TvList->DataController->FocusedRecordIndex; if( nRow <= -1 ) return; int nMemPtr = TvList->DataController->Values[nRow][Column99->Index]; TItsDsrcOfferSect* pObj = (TItsDsrcOfferSect*)nMemPtr; DisplayInfo(pObj); } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::FRAMEDsrcList1TvListCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo, TMouseButton AButton, TShiftState AShift, bool &AHandled) { if (!ACellViewInfo) return; int nRow = FRAMEDsrcList1->TvList->DataController->FocusedRecordIndex; if( nRow <= -1 ) return; int nMemPtr = FRAMEDsrcList1->TvList->DataController->Values[nRow][FRAMEDsrcList1->Column99->Index]; TItsDsrc* pObj = (TItsDsrc*)nMemPtr; sJs.printf(L"selectLayerObject(%d, '%s', %d)", FLayerIdx, pObj->CTLR_NMBR.c_str(), FRAMEOpenMap1->MapZoom); FRAMEOpenMap1->ExecScript(sJs); } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::cxCheckBox1Click(TObject *Sender) { if (cxCheckBox1->Checked) { if (cxCheckBox2->Checked) cxCheckBox2->Checked = false; } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::cxCheckBox2Click(TObject *Sender) { if (cxCheckBox2->Checked) { if (cxCheckBox1->Checked) cxCheckBox1->Checked = false; } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::RefreshSectLink() { if (!FRAMEOpenMap1->MapStart) return; try { int nRow; TcxDataController *pGDC = TvLink->DataController; TvLink->BeginUpdate(); try { int nSeq = 1; for (int ii = 0; ii < pGDC->RecordCount; ii++) { pGDC->Values[ii][ColSeq->Index] = nSeq; String sLinkId = pGDC->Values[ii][ColLink2->Index]; sJs.printf(L"updateEditLink('%s', %d)", sLinkId.c_str(), nSeq); FRAMEOpenMap1->ExecScript(sJs); if (nSeq++ > ITSMAP_MAX_DISPCOLOR) nSeq = 1; } } catch(...) { } } __finally { TvLink->EndUpdate(); } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::BtnLinkDelClick(TObject *Sender) { int nSelRows = TvLink->Controller->SelectedRowCount; if (nSelRows <= 0) { Application->MessageBox(L"»èÁ¦¸¦ ¿øÇÏ´Â ¼­ºñ½º±¸°£À» ¸ñ·Ï¿¡¼­ ¼±ÅÃÇϼ¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } for (int ii = 0; ii < nSelRows; ii++) { int nSelIdx = TvLink->Controller->SelectedRows[ii]->RecordIndex; String sLinkId = TvLink->DataController->Values[nSelIdx][ColLink2->Index]; sJs.printf(L"updateEditLink('%s', 0)", sLinkId.c_str()); FRAMEOpenMap1->ExecScript(sJs); } TvLink->Controller->DeleteSelection(); //RefreshSectLink(); } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::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; } TItsIfsc *pLink = ItsIfscManager->FLists.Find(sNewId); if (pLink) { nRow = pGDC->AppendRecord(); pGDC->Values[nRow][ColLink2->Index] = sNewId; TItsNode *pNode; pGDC->Values[nRow][ColLink3->Index] = pLink->F_NODE_ID; pGDC->Values[nRow][ColLink5->Index] = pLink->T_NODE_ID; pNode = ItsNodeManager->FLists.Find(pLink->F_NODE_ID); if (pNode) { pGDC->Values[nRow][ColLink4->Index] = pNode->NODE_NAME; } pNode = ItsNodeManager->FLists.Find(pLink->T_NODE_ID); if (pNode) { pGDC->Values[nRow][ColLink6->Index] = pNode->NODE_NAME; } } else { Application->MessageBox(L"µ¥ÀÌÅͺ£À̽º¿¡ µî·ÏµÇ¾î ÀÖÁö ¾Ê´Â ¼­ºñ½º±¸°£ ÀÔ´Ï´Ù.\r\nµ¥ÀÌÅͺ£À̽ºÀÇ Á¤º¸¸¦ È®ÀÎÇϼ¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } } __finally { TvLink->EndUpdate(); } EdLinkId->Text = ""; RefreshSectLink(); } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::TvLinkCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo, TMouseButton AButton, TShiftState AShift, bool &AHandled) { if (!FRAMEOpenMap1->MapStart) return; if (!ACellViewInfo) return; int nRow = TvLink->DataController->FocusedRecordIndex; if( nRow <= -1 ) return; String sLinkId = TvLink->DataController->Values[nRow][ColLink2->Index]; sJs.printf(L"extentLayerObject(%d, '%s')", LyrTp_Traffic, sLinkId.c_str()); FRAMEOpenMap1->ExecScript(sJs); //EdLinkId->Text = sLinkId; } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::ChkGisZoomClick(TObject *Sender) { GrpInfo->Visible = !ChkGisZoom->Checked; } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::OpenMapCallback(TObject *ASender, const String AFunc, const String AArgs, const bool AFirst) { try { if (AFirst) { //Áöµµ¸¦ ÆíÁý¸ðµå·Î º¯°æ sJs.printf(L"setEditMode(%d, 1)", FLayerIdx); FRAMEOpenMap1->ExecScript(sJs); //ÆíÁý·¹ÀÌ¾î »ý¼º FRAMEOpenMap1->ExecScript("initEditLayer()"); //¹è°æ¸µÅ©·¹ÀÌ¾î »ý¼º UpdateEditLink(); //½Ã¼³¹°¾ÆÀÌÄÜ µî·Ï UpdateRseIcon(); //È­¸éÀ» ½Ã¼³¹° ¿©¿ªÀ¸·Î È®´ë sJs.printf(L"extentLayer(%d)", FLayerIdx); FRAMEOpenMap1->ExecScript(sJs); return; } if (AFunc.Pos("onlinkclick")) { TStringList *pStringList = new TStringList; pStringList->CommaText = AArgs; try { String sLyrType = pStringList->Strings[0]; String sLinkId = pStringList->Strings[1]; if (EditMode) { //AddRemoveLink(sLinkId); EdLinkId->Text = sLinkId; } } catch(Exception &e) { } delete pStringList; } if (AFunc.Pos("onfacilityclick")) { if (EditMode) { TStringList *pStringList = new TStringList; pStringList->CommaText = AArgs; try { String sZoom = pStringList->Strings[0]; String sNmbr = pStringList->Strings[1]; TItsDsrc *pObj = ItsDsrcManager->FLists.Find(sNmbr); if (pObj) { if (cxCheckBox1->Checked) { EdStartSpotId->Text = pObj->CTLR_NMBR; EdStartSpotNm->Text = pObj->ISTL_LCTN_NM; } else if (cxCheckBox2->Checked) { EdEndSpotId->Text = pObj->CTLR_NMBR; EdEndSpotNm->Text = pObj->ISTL_LCTN_NM; } } } catch(Exception &e) { } delete pStringList; } } } catch(Exception &exception) { } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::ChkViewIconClick(TObject *Sender) { if (!FRAMEOpenMap1->MapStart) return; sJs.printf(L"showLayerText(%d, %d)", FLayerIdx, (ChkViewIcon->Checked) ? 1: 0); FRAMEOpenMap1->ExecScript(sJs); } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::ColSeqCustomDrawCell(TcxCustomGridTableView *Sender, TcxCanvas *ACanvas, TcxGridTableDataCellViewInfo *AViewInfo, bool &ADone) { if (AViewInfo->GridRecord->RecordIndex < 0) return; if (VarIsNull(AViewInfo->Value)) return; try { int nIdx = AViewInfo->Value; if (nIdx < 0) return; ACanvas->Brush->Color = ITSMap_GetDisplayColor(nIdx); ACanvas->Font->Color = ACanvas->Brush->Color; } catch(...) { } } //--------------------------------------------------------------------------- void __fastcall TDSRM040M::EdDrctNmbrKeyPress(TObject *Sender, wchar_t &Key) { if (Key > '9' || Key < '0') { if (Key != VK_BACK && Key != VK_TAB && Key != '-') Key = 0; } } //---------------------------------------------------------------------------