//--------------------------------------------------------------------------- #include #include "ITSSkinF.h" #include "ITSUtilF.h" #include "AppGlobalF.h" #include "ITSLangTransF.h" #include "ITSMapF.h" #include "WindowMsgF.h" #include "ITS_OPLibF.h" #pragma hdrstop #include "DSRM010MF.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "FRAME_DsrcListF" #pragma link "cxButtons" #pragma link "cxCheckBox" #pragma link "cxContainer" #pragma link "cxControls" #pragma link "cxDropDownEdit" #pragma link "cxEdit" #pragma link "cxGraphics" #pragma link "cxGroupBox" #pragma link "cxLabel" #pragma link "cxLookAndFeelPainters" #pragma link "cxLookAndFeels" #pragma link "cxMaskEdit" #pragma link "cxSpinEdit" #pragma link "cxSplitter" #pragma link "cxTextEdit" #pragma link "dxSkinBlack" #pragma link "dxSkinBlue" #pragma link "dxSkinsCore" #pragma link "dxSkinMcSkin" #pragma link "FRAME_OpenMapF" #pragma resource "*.dfm" TDSRM010M *DSRM010M = NULL; //--------------------------------------------------------------------------- void TDSRM010M_MapCallback(TObject *ASender, const String AFunc, const String AArgs, const bool AFirst) { try { if (!DSRM010M) return; DSRM010M->OpenMapCallback(ASender, AFunc, AArgs, AFirst); } catch(Exception &exception) { } } //--------------------------------------------------------------------------- __fastcall TDSRM010M::TDSRM010M(TComponent* Owner) : TForm(Owner) { LangTrans->Translate(this, ITSDb_GetConnection()); ITSSkin_Load(this); CMM_LoadForm(g_sFormsDir, this); FUpdate= false; FTitle = Caption; //FRAMEDsrcList1->Column02->Visible = false; FRAMEDsrcList1->PnlTop->Visible = false; FRAMEDsrcList1->PnlBottom->Visible = false; FRAMEDsrcList1->ColumnSel->Visible = false; m_pGDC = FRAMEDsrcList1->TvList->DataController; FLayerIdx = LyrTp_Dsrc; FRAMEOpenMap1->LayerIdx = FLayerIdx; FRAMEOpenMap1->MapCallbackFunc = TDSRM010M_MapCallback; EditMode = false; } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::CommClose() { try { CMM_SaveForm(g_sFormsDir, this); } catch(...) { } } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::FormShow(TObject *Sender) { Refresh(); FRAMEOpenMap1->OpenMap(); APP_FillCode(CbMnfcCmpyCd, "RMF"); #if 0 CbMnfcCmpyCd->Properties->Items->Clear(); TItsCode *FCodeRMF = ItsCodeManager->FLists.Find("RMF"); if (FCodeRMF) { FOR_STL(TItsSubCode *, pSubCode, FCodeRMF->FSubLists) { if (pSubCode->USE_YN == "N") continue; CbMnfcCmpyCd->Properties->Items->Add(" [" + pSubCode->CMMN_CD + "] " + pSubCode->CMMN_CD_KOR_NM); } } CbMnfcCmpyCd->ItemIndex = 0; #endif FormInit(); ChangeEditMode(1); TmrShow->Enabled = true; } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::FormInit() { EdId->Text = ""; EdRseId->Text = ""; EdRoadSpotId->Text = ""; EdLogCnncId->Text = ""; EdLogCnncPwd->Text = ""; EdIstlLctnNm->Text = ""; SePosX->Value = 0; SePosY->Value = 0; EdIP->Text = ""; EdPort->Text = ""; CbMnfcCmpyCd->ItemIndex = 0; FNewDb = false; } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::TmrShowTimer(TObject *Sender) { TmrShow->Enabled = false; FRAMEDsrcList1->UpdateList(); } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::BtnCloseClick(TObject *Sender) { Close(); } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::FormClose(TObject *Sender, TCloseAction &Action) { CommClose(); DSRM010M = NULL; Action = caFree; } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::FormCloseQuery(TObject *Sender, bool &CanClose) { if (FUpdate) { POST_MSG(Application->MainForm->Handle, WM_DATABASE_REFRESH, WP_MSG_14, 0); } FRAMEDsrcList1->OnCloseQuery(CanClose); FRAMEOpenMap1->OnCloseQuery(CanClose); } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::DisplayInfo(TItsDsrc* AObj, bool AMoveObj/*=true*/) { FormInit(); if (!AObj) return; if (AMoveObj) { sJs.printf(L"selectLayerObject(%d, '%s', %d)", FLayerIdx, AObj->CTLR_NMBR.c_str(), FRAMEOpenMap1->MapZoom); FRAMEOpenMap1->ExecScript(sJs); } EdId->Text = AObj->CTLR_NMBR; EdRseId->Text = AObj->CTLR_ID; EdRoadSpotId->Text = AObj->ROAD_SPOT_ID; EdLogCnncId->Text = AObj->LOG_CNNC_ID; EdLogCnncPwd->Text = AObj->LOG_CNNC_PW; EdIstlLctnNm->Text = AObj->ISTL_LCTN_NM; SePosX->Value = AObj->X_CRDN; SePosY->Value = AObj->Y_CRDN; EdIP->Text = AObj->CTLR_IP; EdPort->Text = String(AObj->CTLR_PORT); SeCLCT_ABNR_BASI->Value = AObj->CLCT_ABNR_BASI; SeAbnrAll->Value = SeCLCT_ABNR_BASI->Value; CMM_SetComboBoxItem(CbMnfcCmpyCd, AObj->MNFC_CMPY_CD); ChangeEditMode(3); } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::UpdateIcon() { if (!FRAMEOpenMap1->MapStart) return; sJs.printf(L"removeLayerObject(%d)", FLayerIdx); FRAMEOpenMap1->ExecScript(sJs); String arrObj = ""; String sTemp; TItsFacility *pFacility; 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); } } } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::BtnEditClick(TObject *Sender) { String sId = EdId->Text; TItsDsrc *pObj = FRAMEDsrcList1->MyItsDsrcManager->FLists.Find(sId); FNewDb = false; if (BtnEdit->Caption == FrmLang->lblEdit->Caption)//"ÆíÁý") { //ÆíÁý¸ðµå ½ÃÀÛ ChangeEditMode(0); if (pObj) { //½Ã¼³¹°¾ÆÀÌÄÜÀ» ÆíÁý¾ÆÀÌÄÜÀ¸·Î º¯°æ //function editFacilityObject(ALyrIdx, ANmbr, AComm(0:¿À·ù-ÆíÁý,1:Á¤»ó), AEdit(ÆíÁý¸ðµå:1-ÆíÁý,0-ÆíÁýÃë¼Ò)) sJs.printf(L"editFacilityObject(%d, %s, 1, 1)", FLayerIdx, pObj->CTLR_NMBR.c_str()); FRAMEOpenMap1->ExecScript(sJs); } } else { //ÆíÁý¸ðµå Ãë¼Ò ChangeEditMode(1); if (pObj) { //¿ø·¡ Á¤º¸¸¦ È­¸é¿¡ Ç¥Ãâ CMM_SetGridRow(FRAMEDsrcList1->CxList, FRAMEDsrcList1->TvList, sId, FRAMEDsrcList1->Column01->Index); DisplayInfo(pObj, false); #if 0 //Áöµµ½Ã¼³¹°¾ÆÀÌÄÜÀ» ¿ø·¡¾ÆÀÌÄÜÀ¸·Î º¯°æ sJs.printf(L"editFacilityObject(%d, %s, 0, 0)", FLayerIdx, pObj->CTLR_NMBR.c_str()); FRAMEOpenMap1->ExecScript(sJs); #else //Ãß°¡ ¸ðµå¿¡¼­ Ãë¼ÒÇÏ´Â °æ¿ì Áöµµ¿¡ ½Å±Ô·Î Ãß°¡ÇÑ °´Ã¼¸¦ ã¾Æ¼­ »èÁ¦ÇØ ÁÖ´Â°Í º¸´Ù //»õ·Ó°Ô ´Ù½Ã ±×¸®ÀÚ UpdateIcon(); #endif } else { //°´Ã¼°¡ ¾ø´Â °æ¿ì´Â Ãß°¡ ¸ðµå¿¡¼­ Ãë¼ÒÇÑ °æ¿ìÀÓ sJs.printf(L"removeFacilityObject(%d, %s)", FLayerIdx, sId.c_str()); FRAMEOpenMap1->ExecScript(sJs); } } } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::ChangeEditMode(int AEdit) { 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; 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) { FRAMEDsrcList1->CxList->Enabled = false; } else { FRAMEDsrcList1->CxList->Enabled = true; } PnlEdit->Enabled = EditMode; #if 1 EdId->Properties->ReadOnly = bEnabled; EdRseId->Properties->ReadOnly = bEnabled; EdRoadSpotId->Properties->ReadOnly = bEnabled; EdLogCnncId->Properties->ReadOnly = bEnabled; EdLogCnncPwd->Properties->ReadOnly = bEnabled; EdIstlLctnNm->Properties->ReadOnly = bEnabled; SePosX->Properties->ReadOnly = bEnabled; SePosY->Properties->ReadOnly = bEnabled; EdIP->Properties->ReadOnly = bEnabled; EdPort->Properties->ReadOnly = bEnabled; CbMnfcCmpyCd->Properties->ReadOnly = bEnabled; SeCLCT_ABNR_BASI->Properties->ReadOnly = bEnabled; #endif } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::BtnInsertClick(TObject *Sender) { FormInit(); //½Å±Ô¾ÆÀ̵𸦠¾ò¾î¿Í¼­ È­¸éÀ» ÃʱâÈ­ÇÑ´Ù. String sRseId; if (!FRAMEDsrcList1->MyItsDsrcManager->GetNextDsrcId(sRseId)) { Application->MessageBox(L"»õ·Î¿î DSRC ID¸¦ »ý¼ºÇÏÁö ¸øÇÏ¿´½À´Ï´Ù.\r\nÇÁ·Î±×·¥ Á¾·áÈÄ¿¡ ´Ù½Ã ½ÃµµÇØ º¸¼¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } EdId->Text = sRseId; EdRseId->Text = sRseId; SePosX->Value = FRAMEOpenMap1->CenterX; SePosY->Value = FRAMEOpenMap1->CenterY; //Áöµµ¿¡ »õ·Î¿î ½Ã¼³¹° ¾ÆÀÌÄÜ Ãß°¡Çϸ鼭 ÆíÁý¸ðµå·Î º¯°æ String arrObj = ""; arrObj.printf(L"%s,New,New,%.6f,%.6f,0", sRseId.c_str(), FRAMEOpenMap1->CenterX, FRAMEOpenMap1->CenterY); sJs.printf(L"addFacilityObject(%d, '%s')", FLayerIdx, arrObj.c_str()); FRAMEOpenMap1->ExecScript(sJs); ChangeEditMode(2); FNewDb = true; } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::BtnDeleteClick(TObject *Sender) { if (!FRAMEOpenMap1->MapStart) return; int nIdx = m_pGDC->FocusedRecordIndex; if (nIdx < 0) return; String sId = EdId->Text; if (sId.IsEmpty()) { Application->MessageBox(L"»èÁ¦ÇÒ DSRC¸¦ ¸ñ·Ï¿¡¼­ ¼±ÅÃÇϼ¼¿ä.\r\n¸ñ·Ï¿¡¼­ ´õºíŬ¸¯ÇÏ¿© ¼±ÅÃÇÕ´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } String sMsg; sMsg = "ID: " + sId; sMsg+= "\r\n¼±ÅÃÇϽŠDSRC Á¤º¸¸¦ »èÁ¦ÇϽðڽÀ´Ï±î?"; if (Application->MessageBox(sMsg.c_str(), FTitle.c_str(), MB_YESNO|MB_ICONQUESTION|MB_APPLMODAL) != IDYES) return; TItsDsrc *pObj = FRAMEDsrcList1->MyItsDsrcManager->FLists.Find(sId); if (pObj) { if (FRAMEDsrcList1->MyItsDsrcManager->DeleteDsrc(pObj)) { pObj->DEL_YN = "Y"; FRAMEDsrcList1->UpdateList(); UpdateIcon(); } FUpdate = true; #if 0 TItsFacility *pFacility = ItsFacilityManager->FLists.Find(sId); if (pFacility) { FUpdate = true; } #endif Application->MessageBox(L"DSRC Á¤º¸»èÁ¦\r\nDSRC Á¤º¸¸¦ »èÁ¦ ÇÏ¿´½À´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONINFORMATION|MB_APPLMODAL); FormInit(); ChangeEditMode(1); UpdateIcon(); //POST_MSG(Application->MainForm->Handle, WM_DATABASE_REFRESH, WP_MSG_14, 0); } } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::BtnSaveClick(TObject *Sender) { if (EdId->Text.IsEmpty() || EdRseId->Text.Trim().IsEmpty() || EdRoadSpotId->Text.IsEmpty() || SePosX->Value == 0 || SePosY->Value == 0 || CbMnfcCmpyCd->Text.IsEmpty() ) { Application->MessageBox(L"¡ÚÇ׸ñÀº Çʼö ÀÔ·Â Ç׸ñÀÔ´Ï´Ù.\r\n¸ðµÎ ÀÔ·ÂÈÄ ÁøÇàÇØ ÁÖ¼¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } String sId = EdId->Text; String sDsrcId = EdRseId->Text.Trim(); if (!ITSUtil_CheckIpAddress(EdIP->Text.Trim())) { Application->MessageBox(L"Á¦¾î±â IP°¡ À¯È¿ÇÏÁö ¾Ê½À´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } FRAMEDsrcList1->MyItsDsrcManager->FLists.Lock(); FOR_STL(TItsDsrc*, pTmpObj, FRAMEDsrcList1->MyItsDsrcManager->FLists) { if (pTmpObj->DEL_YN == "Y") continue; if (pTmpObj->CTLR_NMBR == sId) continue; //ÀÚ±âÀڽŠif (pTmpObj->CTLR_ID == sDsrcId) { Application->MessageBox(L"DSRC ID°¡ ÀÌ¹Ì »ç¿ë ÁßÀÔ´Ï´Ù. DSRC ID¸¦ È®ÀÎÇϼ¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); FRAMEDsrcList1->MyItsDsrcManager->FLists.UnLock(); return; } } FRAMEDsrcList1->MyItsDsrcManager->FLists.UnLock(); TItsDsrc *pObj; if (FNewDb) pObj = new TItsDsrc(); else pObj = FRAMEDsrcList1->MyItsDsrcManager->FLists.Find(sId); if (pObj) { pObj->CTLR_NMBR = sId; String sOldRseId = pObj->CTLR_ID; pObj->CTLR_ID = EdRseId->Text.Trim(); pObj->ROAD_SPOT_ID = EdRoadSpotId->Text.Trim(); pObj->LOG_CNNC_ID = EdLogCnncId->Text.Trim(); pObj->LOG_CNNC_PW = EdLogCnncPwd->Text.Trim(); pObj->ISTL_LCTN_NM = EdIstlLctnNm->Text.Trim(); pObj->X_CRDN = SePosX->Value; pObj->Y_CRDN = SePosY->Value; pObj->CTLR_IP = EdIP->Text.Trim(); pObj->CTLR_PORT = EdPort->Text.Trim().ToIntDef(0); pObj->MNFC_CMPY_CD = ITSUtil_GetCode(CbMnfcCmpyCd->Text); pObj->CLCT_ABNR_BASI = (SeCLCT_ABNR_BASI->Value); pObj->Completed = true; pObj->MEM_DEL = "N"; bool bResult; if (FNewDb) { pObj->DEL_YN = "N"; bResult = FRAMEDsrcList1->MyItsDsrcManager->InsertDsrc(pObj); if (bResult) { FRAMEDsrcList1->MyItsDsrcManager->FLists.Push(sId, pObj); } } else { bResult = FRAMEDsrcList1->MyItsDsrcManager->UpdateDsrc(sOldRseId, pObj); } if (bResult) { Application->MessageBox(FrmLang->lblDbSave->Caption.c_str(),//L"DSRC Á¤º¸ÀúÀå\r\nDSRC Á¤º¸¸¦ ÀúÀå ÇÏ¿´½À´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONINFORMATION|MB_APPLMODAL); FUpdate = true; FRAMEDsrcList1->UpdateList(); UpdateIcon(); CMM_SetGridRow(FRAMEDsrcList1->CxList, FRAMEDsrcList1->TvList, sId, FRAMEDsrcList1->Column01->Index); DisplayInfo(pObj, true); //POST_MSG(Application->MainForm->Handle, WM_DATABASE_REFRESH, WP_MSG_14, 0); } } } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::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; DisplayInfo(pObj, true); } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::EdPortKeyPress(TObject *Sender, wchar_t &Key) { if (Key > '9' || Key < '0') { if (Key != VK_BACK && Key != VK_TAB && Key != '-') Key = 0; } } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::BtnSaveAllClick(TObject *Sender) { String sMsg; sMsg = ""; sMsg+= "\r\n¼öÁý ÀÌ»ó ±âÁØ Á¤º¸¸¦ Àüü Àû¿ë ÇϽðڽÀ´Ï±î?"; if (Application->MessageBox(sMsg.c_str(), FTitle.c_str(), MB_YESNO|MB_ICONQUESTION|MB_APPLMODAL) != IDYES) return; int nCLCT_ABNR_BASI = (SeAbnrAll->Value); if (FRAMEDsrcList1->MyItsDsrcManager->UpdateClctAbnrBasi(nCLCT_ABNR_BASI)) { SeCLCT_ABNR_BASI->Value = SeAbnrAll->Value; FUpdate = true; Application->MessageBox(FrmLang->lblDbSave->Caption.c_str(),//L"¼öÁý ÀÌ»ó ±âÁØ\r\n¼öÁý ÀÌ»ó ±âÁØ Á¤º¸¸¦ ÀúÀå ÇÏ¿´½À´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONINFORMATION|MB_APPLMODAL); } } //--------------------------------------------------------------------------- void __fastcall TDSRM010M::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); //½Ã¼³¹°¾ÆÀÌÄÜ µî·Ï UpdateIcon(); sJs.printf(L"extentLayer(%d)", FLayerIdx); FRAMEOpenMap1->ExecScript(sJs); return; } if (AFunc.Pos("onfacilitydragend")) { TStringList *pStringList = new TStringList; pStringList->CommaText = AArgs; try { String sNmbr = pStringList->Strings[0]; String sCenterLat = pStringList->Strings[1]; String sCenterLng = pStringList->Strings[2]; SePosX->Value = sCenterLat.ToDouble(); SePosY->Value = sCenterLng.ToDouble(); } catch(Exception &e) { } delete pStringList; } } catch(Exception &exception) { } } //---------------------------------------------------------------------------