//--------------------------------------------------------------------------- #include #include "ITSSkinF.h" #include "ITSUtilF.h" #include "AppGlobalF.h" #include "ITSLangTransF.h" #include "ITSMapF.h" #include "WindowMsgF.h" #pragma hdrstop #include "CCAM100MF.h" #include "CCAM101MF.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "cxButtons" #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 "dxSkinBlue" #pragma link "dxSkinsCore" #pragma link "FRAME_CCamListF" #pragma link "FRAME_OpenMapF" #pragma resource "*.dfm" TCCAM100M *CCAM100M = NULL; //--------------------------------------------------------------------------- void TCCAM100M_MapCallback(TObject *ASender, const String AFunc, const String AArgs, const bool AFirst) { try { if (!CCAM100M) return; CCAM100M->OpenMapCallback(ASender, AFunc, AArgs, AFirst); } catch(Exception &exception) { } } //--------------------------------------------------------------------------- __fastcall TCCAM100M::TCCAM100M(TComponent* Owner) : TForm(Owner) { LangTrans->Translate(this, ITSDb_GetConnection()); ITSSkin_Load(this); CMM_LoadForm(g_sFormsDir, this); FUpdate= false; FTitle = Caption;//"À¥Ä«¸Þ¶ó ±âº»Á¤º¸ °ü¸®"; FRAMECCamList1->PnlTop->Visible = false; FRAMECCamList1->PnlBottom->Visible = false; FRAMECCamList1->ColumnSel->Visible = false; m_pGDC = FRAMECCamList1->TvList->DataController; FLayerIdx = LyrTp_CCam; FRAMEOpenMap1->LayerIdx = FLayerIdx; FRAMEOpenMap1->MapCallbackFunc = TCCAM100M_MapCallback; EditMode = false; } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::CommClose() { try { CMM_SaveForm(g_sFormsDir, this); } catch(...) { } } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::FormShow(TObject *Sender) { Refresh(); FRAMEOpenMap1->OpenMap(); //APP_FillCode(CbType, "CTVT"); CCamCtlrManager->FLists.Lock(); try { FOR_STL(TCCamCtlr*, pObj, CCamCtlrManager->FLists) { if (pObj->DEL_YN == "Y") continue; pObj->FData3 = NULL; } } __finally { CCamCtlrManager->FLists.UnLock(); } FormInit(); ChangeEditMode(1); TmrShow->Enabled = true; } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::FormInit() { EdNmbr->Text = ""; EdCCamId->Text = ""; EdCCamNm->Text = ""; ISTL_LCTN_NM->Text = ""; ISTL_LCTN_ADDR->Text = ""; //CbUsagType->ItemIndex = 0; CbType->ItemIndex = 0; SePosX->Value = 0; SePosY->Value = 0; EdCtlrIp->Text = ""; EdCmncPort->Text = ""; Ed_CCAM_IP->Text = ""; Ed_CMRA_PORT->Text = ""; Ed_CMRA_ID->Text = ""; Ed_CMRA_PSWD->Text = ""; Se_CMRA_CHNL->Value = 1; Ed_STRM_SVR_IP->Text = ""; Ed_STRM_RTSP_ADDR->Text = ""; Ed_STRM_RTMP_ADDR->Text = ""; Ed_STRM_HTTP_ADDR->Text = ""; Se_GROUP_NO->Value = 1; Se_LOCAL_NO->Value = 1; FNewDb = false; } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::TmrShowTimer(TObject *Sender) { TmrShow->Enabled = false; FRAMECCamList1->UpdateList(); } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::BtnCloseClick(TObject *Sender) { Close(); } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::FormClose(TObject *Sender, TCloseAction &Action) { CommClose(); CCAM100M = NULL; Action = caFree; } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::FormCloseQuery(TObject *Sender, bool &CanClose) { if (FUpdate) { POST_MSG(Application->MainForm->Handle, WM_DATABASE_REFRESH, WP_MSG_14, 0); } FRAMECCamList1->OnCloseQuery(CanClose); FRAMEOpenMap1->OnCloseQuery(CanClose); } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::DisplayInfo(TCCamCtlr* AObj, bool AMoveObj/*=true*/) { FormInit(); if (!AObj) return; if (AMoveObj) { sJs.printf(L"selectLayerObject(%d, '%s', %d)", FLayerIdx, AObj->CCAM_CTLR_NMBR.c_str(), FRAMEOpenMap1->MapZoom); FRAMEOpenMap1->ExecScript(sJs); } EdNmbr->Text = String(AObj->CCAM_CTLR_NMBR); EdCCamId->Text = AObj->CCAM_CTLR_ID; EdCCamNm->Text = AObj->CCAM_NM; ISTL_LCTN_NM->Text = AObj->ISTL_LCTN_NM; ISTL_LCTN_ADDR->Text = AObj->ISTL_LCTN_ADDR; APP_SetCode(CbType, AObj->CCAM_TYPE_CD); SePosX->Value = AObj->X_CRDN; SePosY->Value = AObj->Y_CRDN; EdCtlrIp->Text = AObj->CCAM_CTLR_IP; //EdCmncPort->Text = AObj->CCAM_CTLR_PORT; //Ed_CCAM_IP->Text = AObj->CCTV_IP; Ed_CMRA_PORT->Text = AObj->CMRA_PORT; Ed_CMRA_ID->Text = AObj->CMRA_ID; Ed_CMRA_PSWD->Text = AObj->CMRA_PSWD; Se_CMRA_CHNL->Value = AObj->CMRA_CHNL; Ed_STRM_SVR_IP->Text = AObj->STRM_SVR_IP; Ed_STRM_RTSP_ADDR->Text = AObj->STRM_RTSP_ADDR; Ed_STRM_RTMP_ADDR->Text = AObj->STRM_RTMP_ADDR; Ed_STRM_HTTP_ADDR->Text = AObj->STRM_HTTP_ADDR; Ed_STRM_SESN_NM->Text = AObj->STRM_SESN_NM; Se_GROUP_NO->Value = AObj->GROUP_NO; Se_LOCAL_NO->Value = AObj->CCAM_CTLR_LOCAL_NO; // FRAMEGisMap1->SelectObjectByPos(SePosX->Value, SePosY->Value, true); ChangeEditMode(3); } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::UpdateIcon() { if (!FRAMEOpenMap1->MapStart) return; sJs.printf(L"removeLayerObject(%d)", FLayerIdx); FRAMEOpenMap1->ExecScript(sJs); String arrObj = ""; String sTemp; CCamCtlrManager->FLists.Lock(); try { FOR_STL(TCCamCtlr*, pObj, CCamCtlrManager->FLists) { if (pObj->DEL_YN == "Y") continue; if (arrObj != "") arrObj += "|"; sTemp.printf(L"%s,%s,%s,%.6f,%.6f,0,0,0,0", pObj->CCAM_CTLR_NMBR.c_str(), pObj->CCAM_CTLR_ID.c_str(), pObj->CCAM_NM.c_str(), pObj->X_CRDN, pObj->Y_CRDN); arrObj += sTemp; } } __finally { CCamCtlrManager->FLists.UnLock(); if (arrObj != "") { sJs.printf(L"addFacility(%d, '%s')", FLayerIdx, arrObj.c_str()); FRAMEOpenMap1->ExecScript(sJs); } } } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::BtnEditClick(TObject *Sender) { String sId = EdNmbr->Text; TCCamCtlr *pObj = CCamCtlrManager->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->CCAM_CTLR_NMBR.c_str()); FRAMEOpenMap1->ExecScript(sJs); } } else { //ÆíÁý¸ðµå Ãë¼Ò ChangeEditMode(1); if (pObj) { //¿ø·¡ Á¤º¸¸¦ È­¸é¿¡ Ç¥Ãâ CMM_SetGridRow(FRAMECCamList1->CxList, FRAMECCamList1->TvList, sId, FRAMECCamList1->Column01->Index); DisplayInfo(pObj, false); #if 0 //Áöµµ½Ã¼³¹°¾ÆÀÌÄÜÀ» ¿ø·¡¾ÆÀÌÄÜÀ¸·Î º¯°æ sJs.printf(L"editFacilityObject(%d, %s, 0, 0)", FLayerIdx, pObj->CCAM_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 TCCAM100M::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) { FRAMECCamList1->CxList->Enabled = false; } else { FRAMECCamList1->CxList->Enabled = true; } PnlEdit->Enabled = EditMode; } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::BtnInsertClick(TObject *Sender) { FormInit(); //½Å±Ô¾ÆÀ̵𸦠¾ò¾î¿Í¼­ È­¸éÀ» ÃʱâÈ­ÇÑ´Ù. int nNmbr, nId; if (!CCamCtlrManager->GetNextCCamId(nNmbr, nId)) { Application->MessageBox(lblText1->Caption.c_str(),//L"»õ·Î¿î À¥Ä«¸Þ¶ó Á¤º¸¸¦ »ý¼ºÇÏÁö ¸øÇÏ¿´½À´Ï´Ù.\r\nÇÁ·Î±×·¥ Á¾·áÈÄ¿¡ ´Ù½Ã ½ÃµµÇØ º¸¼¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } EdNmbr->Text = String(nNmbr); SePosX->Value = FRAMEOpenMap1->CenterX; SePosY->Value = FRAMEOpenMap1->CenterY; //Áöµµ¿¡ »õ·Î¿î ½Ã¼³¹° ¾ÆÀÌÄÜ Ãß°¡Çϸ鼭 ÆíÁý¸ðµå·Î º¯°æ String arrObj = ""; arrObj.printf(L"%d,New,New,%.6f,%.6f,0", nNmbr, FRAMEOpenMap1->CenterX, FRAMEOpenMap1->CenterY); sJs.printf(L"addFacilityObject(%d, '%s')", FLayerIdx, arrObj.c_str()); FRAMEOpenMap1->ExecScript(sJs); ChangeEditMode(2); FNewDb = true; } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::BtnDeleteClick(TObject *Sender) { if (!FRAMEOpenMap1->MapStart) return; int nIdx = m_pGDC->FocusedRecordIndex; if (nIdx < 0) return; String sId = EdNmbr->Text; if (sId.IsEmpty()) { Application->MessageBox(lblText2->Caption.c_str(),//L"»èÁ¦ÇÒ À¥Ä«¸Þ¶ó¸¦ ¸ñ·Ï¿¡¼­ ¼±ÅÃÇϼ¼¿ä.\r\n¸ñ·Ï¿¡¼­ ´õºíŬ¸¯ÇÏ¿© ¼±ÅÃÇÕ´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } String sMsg; sMsg = lblText3->Caption + ": " + sId;//"À¥Ä«¸Þ¶ó¹øÈ£: " + sId; sMsg+= "\r\n" + lblText4->Caption;//"¼±ÅÃÇϽŠÀ¥Ä«¸Þ¶ó Á¤º¸¸¦ »èÁ¦ÇϽðڽÀ´Ï±î?"; if (Application->MessageBox(sMsg.c_str(), FTitle.c_str(), MB_YESNO|MB_ICONQUESTION|MB_APPLMODAL) != IDYES) return; TCCamCtlr *pObj = CCamCtlrManager->FLists.Find(sId); if (pObj) { if (CCamCtlrManager->DeleteCCam(pObj)) { pObj->DEL_YN = "Y"; FRAMECCamList1->UpdateList(); UpdateIcon(); } FUpdate = true; Application->MessageBox(lblText5->Caption.c_str(),//L"À¥Ä«¸Þ¶ó Á¤º¸»èÁ¦\r\nÀ¥Ä«¸Þ¶ó Á¤º¸¸¦ »èÁ¦ ÇÏ¿´½À´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONINFORMATION|MB_APPLMODAL); FormInit(); ChangeEditMode(1); UpdateIcon(); } } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::BtnSaveClick(TObject *Sender) { if (EdNmbr->Text.IsEmpty() || EdCCamId->Text.Trim().IsEmpty() || EdCCamNm->Text.Trim().IsEmpty() || SePosX->Value == 0 || SePosY->Value == 0 || // CbType->Text.IsEmpty() || EdCtlrIp->Text.IsEmpty()) { Application->MessageBox(FrmLang->lblNecessary->Caption.c_str(),//L"¡ÚÇ׸ñÀº Çʼö ÀÔ·Â Ç׸ñÀÔ´Ï´Ù.\r\n¸ðµÎ ÀÔ·ÂÈÄ ÁøÇàÇØ ÁÖ¼¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } String sNmbr = EdNmbr->Text; String sCCamId = EdCCamId->Text.Trim(); if (!ITSUtil_CheckIpAddress(EdCtlrIp->Text.Trim())) { Application->MessageBox(lblText6->Caption.c_str(),//L"Á¦¾î±â IP°¡ À¯È¿ÇÏÁö ¾Ê½À´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } if (Ed_CCAM_IP->Text.Trim() != "") { if (!ITSUtil_CheckIpAddress(Ed_CCAM_IP->Text.Trim())) { Application->MessageBox(lblText7->Caption.c_str(),//L"À¥Ä«¸Þ¶ó IP°¡ À¯È¿ÇÏÁö ¾Ê½À´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } } if (Ed_STRM_SVR_IP->Text.Trim() != "") { if (!ITSUtil_CheckIpAddress(Ed_STRM_SVR_IP->Text.Trim())) { Application->MessageBox(cxLabel14->Caption.c_str(),//L"½ºÆ®¸®¹Ö¼­¹ö IP°¡ À¯È¿ÇÏÁö ¾Ê½À´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } } CCamCtlrManager->FLists.Lock(); FOR_STL(TCCamCtlr*, pTmpObj, CCamCtlrManager->FLists) { if (pTmpObj->DEL_YN == "Y") continue; if (pTmpObj->CCAM_CTLR_NMBR == sNmbr) continue; //ÀÚ±âÀڽŠif (pTmpObj->CCAM_CTLR_ID == sCCamId) { Application->MessageBox(lblText8->Caption.c_str(),//L"À¥Ä«¸Þ¶ó ID°¡ ÀÌ¹Ì »ç¿ë ÁßÀÔ´Ï´Ù. À¥Ä«¸Þ¶ó ID¸¦ È®ÀÎÇϼ¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); return; } } CCamCtlrManager->FLists.UnLock(); TCCamCtlr *pObj; if (FNewDb) pObj = new TCCamCtlr(); else pObj = CCamCtlrManager->FLists.Find(sNmbr); if (pObj) { pObj->CCAM_CTLR_NMBR = sNmbr; pObj->CCAM_CTLR_ID = sCCamId; pObj->CCAM_NM = EdCCamNm->Text.Trim(); pObj->CCAM_CTLR_IP = EdCtlrIp->Text; pObj->CCAM_CTLR_PORT = EdCmncPort->Text.ToIntDef(0); pObj->CCAM_CTLR_LOCAL_NO = Se_LOCAL_NO->Value; pObj->CCAM_TYPE_CD = "";//APP_GetCode(CbType); pObj->ISTL_LCTN_NM = ISTL_LCTN_NM->Text.Trim(); pObj->ISTL_LCTN_ADDR = ISTL_LCTN_ADDR->Text.Trim(); pObj->X_CRDN = SePosX->Value; pObj->Y_CRDN = SePosY->Value; //pObj->CCTV_IP = Ed_CCTV_IP->Text; pObj->CMRA_PORT = Ed_CMRA_PORT->Text.ToIntDef(0); pObj->CMRA_ID = Ed_CMRA_ID->Text; pObj->CMRA_PSWD = Ed_CMRA_PSWD->Text; pObj->CMRA_CHNL = Se_CMRA_CHNL->Value; pObj->STRM_SESN_NM = Ed_STRM_SESN_NM->Text; pObj->STRM_SVR_IP = Ed_STRM_SVR_IP->Text; pObj->STRM_RTSP_ADDR = Ed_STRM_RTSP_ADDR->Text; pObj->STRM_RTMP_ADDR = Ed_STRM_RTMP_ADDR->Text; pObj->STRM_HTTP_ADDR = Ed_STRM_HTTP_ADDR->Text; pObj->LINK_ID = ""; pObj->GROUP_NO = Se_GROUP_NO->Value; pObj->Completed = true; pObj->MEM_DEL = "N"; bool bResult; if (FNewDb) { pObj->DEL_YN = "N"; bResult = CCamCtlrManager->InsertCCam(pObj); if (bResult) { CCamCtlrManager->FLists.Push(sNmbr, pObj); } } else { bResult = CCamCtlrManager->UpdateCCam(pObj); } if (bResult) { Application->MessageBox(lblText9->Caption.c_str(),//L"À¥Ä«¸Þ¶ó Á¤º¸ÀúÀå\r\nÀ¥Ä«¸Þ¶óÁ¤ º¸¸¦ ÀúÀå ÇÏ¿´½À´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONINFORMATION|MB_APPLMODAL); FUpdate = true; FRAMECCamList1->UpdateList(); UpdateIcon(); CMM_SetGridRow(FRAMECCamList1->CxList, FRAMECCamList1->TvList, sNmbr, FRAMECCamList1->Column01->Index); DisplayInfo(pObj, true); } } } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::FRAMECCamList1TvListCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo, TMouseButton AButton, TShiftState AShift, bool &AHandled) { if (!ACellViewInfo) return; int nRow = FRAMECCamList1->TvList->DataController->FocusedRecordIndex; if( nRow <= -1 ) return; int nMemPtr = FRAMECCamList1->TvList->DataController->Values[nRow][FRAMECCamList1->Column99->Index]; TCCamCtlr* pObj = (TCCamCtlr*)nMemPtr; DisplayInfo(pObj, true); } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::Ed_CMRA_PORTKeyPress(TObject *Sender, wchar_t &Key) { if (Key > '9' || Key < '0') { if (Key != VK_BACK && Key != VK_TAB && Key != '-') Key = 0; } } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::Se_CMRA_CHNLPropertiesChange(TObject *Sender) { if (((TcxSpinEdit*)Sender)->Value < ((TcxSpinEdit*)Sender)->Properties->MinValue) ((TcxSpinEdit*)Sender)->Value = ((TcxSpinEdit*)Sender)->Properties->MinValue; else if(((TcxSpinEdit*)Sender)->Value > ((TcxSpinEdit*)Sender)->Properties->MaxValue && ((TcxSpinEdit*)Sender)->Properties->MaxValue) ((TcxSpinEdit*)Sender)->Value = ((TcxSpinEdit*)Sender)->Properties->MaxValue; } //--------------------------------------------------------------------------- void __fastcall TCCAM100M::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) { } } //---------------------------------------------------------------------------