VMS0000MF.cpp 18 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #include "AppGlobalF.h"
  4. #include "ITSSkinF.h"
  5. #include "ITSUtilF.h"
  6. #include "CDSVmsIfscF.h"
  7. #include "CDSIfsc_VMSF.h"
  8. #include "FrmVmsOprMainF.h"
  9. #include "ITSLangTransF.h"
  10. #pragma hdrstop
  11. #include "VMS0000MF.h"
  12. //---------------------------------------------------------------------------
  13. #pragma package(smart_init)
  14. #pragma link "cxContainer"
  15. #pragma link "cxControls"
  16. #pragma link "cxEdit"
  17. #pragma link "cxGraphics"
  18. #pragma link "cxGroupBox"
  19. #pragma link "cxLabel"
  20. #pragma link "cxLookAndFeelPainters"
  21. #pragma link "cxLookAndFeels"
  22. #pragma link "cxPC"
  23. #pragma link "cxPCdxBarPopupMenu"
  24. #pragma link "cxSplitter"
  25. #pragma link "dxSkinBlack"
  26. #pragma link "dxSkinBlue"
  27. #pragma link "dxSkinCaramel"
  28. #pragma link "dxSkinCoffee"
  29. #pragma link "dxSkinDarkRoom"
  30. #pragma link "dxSkinDarkSide"
  31. #pragma link "dxSkinFoggy"
  32. #pragma link "dxSkinGlassOceans"
  33. #pragma link "dxSkiniMaginary"
  34. #pragma link "dxSkinLilian"
  35. #pragma link "dxSkinLiquidSky"
  36. #pragma link "dxSkinLondonLiquidSky"
  37. #pragma link "dxSkinMcSkin"
  38. #pragma link "dxSkinMoneyTwins"
  39. #pragma link "dxSkinOffice2007Black"
  40. #pragma link "dxSkinOffice2007Blue"
  41. #pragma link "dxSkinOffice2007Green"
  42. #pragma link "dxSkinOffice2007Pink"
  43. #pragma link "dxSkinOffice2007Silver"
  44. #pragma link "dxSkinOffice2010Black"
  45. #pragma link "dxSkinOffice2010Blue"
  46. #pragma link "dxSkinOffice2010Silver"
  47. #pragma link "dxSkinsCore"
  48. #pragma link "dxSkinscxPCPainter"
  49. #pragma link "dxSkinSeven"
  50. #pragma link "dxSkinSharp"
  51. #pragma link "dxSkinSilver"
  52. #pragma link "dxSkinStardust"
  53. #pragma link "cxClasses"
  54. #pragma link "cxCustomData"
  55. #pragma link "cxData"
  56. #pragma link "cxDataStorage"
  57. #pragma link "cxFilter"
  58. #pragma link "cxGrid"
  59. #pragma link "cxGridCustomTableView"
  60. #pragma link "cxGridCustomView"
  61. #pragma link "cxGridLevel"
  62. #pragma link "cxGridTableView"
  63. #pragma link "cxStyles"
  64. #pragma link "cxTextEdit"
  65. #pragma link "cxGridCardView"
  66. #pragma link "cxGridCustomLayoutView"
  67. #pragma link "cxCheckBox"
  68. #pragma link "FRAME_VmsStateF"
  69. #pragma link "cxCalc"
  70. #pragma link "cxGridBandedTableView"
  71. #pragma link "FRAME_FacilityStatusListF"
  72. #pragma resource "*.dfm"
  73. TVMS0000M *VMS0000M = NULL;
  74. //---------------------------------------------------------------------------
  75. __fastcall TVMS0000M::TVMS0000M(TComponent* Owner)
  76. : TForm(Owner)
  77. {
  78. LangTrans->Translate(this, ITSDb_GetConnection());
  79. ITSSkin_Load(this);
  80. LoadLocalSkin();
  81. //if (FormStyle != fsMDIChild)
  82. CMM_LoadForm(g_sFormsDir, this);
  83. PgVmsMonitoring->Properties->ActivePage = TabVmsString;
  84. //FrmVmsOprMain->dxStatusBar->Panels->Items[isbGisPos]->Visible = true;
  85. VMS00MAP = new TVMS00MAP(PnlMapBack, (TForm*)this);
  86. PnlInfoLeft->Width = VmsCtlrManager->FMaxWidth + 12/*폼여백*/ + 34/*기타여백*/;
  87. FListForm = new TList;
  88. FSelVmsObj= NULL;
  89. FSelForm = NULL;
  90. FReady = false;
  91. FMonitoringType = enMonitoringPhase;
  92. }
  93. //---------------------------------------------------------------------------
  94. void __fastcall TVMS0000M::CommClose()
  95. {
  96. try
  97. {
  98. if (FrmVmsOprMain->dxStatusBar->Panels->Items[isbGisPos]->Visible)
  99. FrmVmsOprMain->dxStatusBar->Panels->Items[isbGisPos]->Visible = false;
  100. SAFE_DELETE(VMS00MAP);
  101. ClearFormList();
  102. SAFE_DELETE(FListForm);
  103. //if (FormStyle != fsMDIChild)
  104. CMM_SaveForm(g_sFormsDir, this);
  105. }
  106. catch(...)
  107. {
  108. }
  109. }
  110. //---------------------------------------------------------------------------
  111. void __fastcall TVMS0000M::ClearFormList()
  112. {
  113. try
  114. {
  115. LockWindowUpdate(Handle);
  116. for(int ii = 0; ii < FListForm->Count; ii++)
  117. {
  118. TVMSBACKM *pForm = (TVMSBACKM*)FListForm->Items[ii];
  119. pForm->Hide();
  120. SAFE_DELETE(pForm);
  121. }
  122. FListForm->Clear();
  123. }
  124. __finally
  125. {
  126. LockWindowUpdate(0);
  127. }
  128. }
  129. //---------------------------------------------------------------------------
  130. void __fastcall TVMS0000M::FormCreate(TObject *Sender)
  131. {
  132. if (VMS00MAP)
  133. {
  134. VMS00MAP->Parent = PnlMapBack;
  135. VMS00MAP->Show();
  136. }
  137. CreateVmsMsgForm(VmsCtlrManager->FMaxWidth);
  138. FRAMEFacilityStatusList1->UpdateList();
  139. }
  140. //---------------------------------------------------------------------------
  141. void __fastcall TVMS0000M::ChkWidthClick(TObject *Sender)
  142. {
  143. int nStringW(0), nStringH(0), nFigureW(0), nFigureH(0);
  144. int nWidth, nPnlWidth;
  145. if (ChkWidth->Checked)
  146. {
  147. nWidth = VmsCtlrManager->FMinWidth;
  148. }
  149. else
  150. {
  151. nWidth = VmsCtlrManager->FMaxWidth;
  152. }
  153. nPnlWidth = nWidth;
  154. try
  155. {
  156. LockWindowUpdate(Handle);
  157. for(int ii = 0; ii < FListForm->Count; ii++)
  158. {
  159. TVMSBACKM *pForm = (TVMSBACKM*)FListForm->Items[ii];
  160. pForm->SetFormSize(nWidth);
  161. nPnlWidth = pForm->FViewWidth;
  162. }
  163. }
  164. __finally
  165. {
  166. PnlInfoLeft->Width = nPnlWidth + 12/*폼여백*/ + 14/*기타여백*/;
  167. LockWindowUpdate(0);
  168. }
  169. }
  170. //---------------------------------------------------------------------------
  171. void __fastcall TVMS0000M::CreateVmsMsgForm(int AWidth)
  172. {
  173. FReady = false;
  174. ClearFormList();
  175. TVMSBACKM *pStringForm = NULL;
  176. TVMSBACKM *pFigureForm = NULL;
  177. VmsCtlrManager->FLists.Lock();
  178. try
  179. {
  180. LockWindowUpdate(Handle);
  181. TVMSFORM0 *pForm = NULL;
  182. FOR_STL(TVmsCtlr*, pObj, VmsCtlrManager->FLists)
  183. {
  184. if (pObj->DEL_YN == "Y") continue;
  185. pForm = NULL;
  186. if (1)//if (pObj->VMS_USAG_TYPE_CD == "VUTN") //문자식
  187. {
  188. if (!pStringForm)
  189. {
  190. pStringForm = new TVMSBACKM(this, Handle, TabVmsString->Caption.Trim(), 1);
  191. pStringForm->FMonitoringType = FMonitoringType;
  192. pStringForm->Parent = TabVmsString;
  193. pStringForm->Show();
  194. FListForm->Add(pStringForm);
  195. }
  196. if (pStringForm) pStringForm->AddVmsForm(String(pObj->VMS_CTLR_NMBR));
  197. }
  198. else
  199. if (0) //if (pObj->VMS_USAG_TYPE_CD == "VUTP") //도형식
  200. {
  201. if (!pFigureForm)
  202. {
  203. pFigureForm = new TVMSBACKM(this, Handle, TabVmsFigure->Caption.Trim(), 1);
  204. pFigureForm->FMonitoringType = FMonitoringType;
  205. pFigureForm->Parent = TabVmsFigure;
  206. pFigureForm->Show();
  207. FListForm->Add(pFigureForm);
  208. }
  209. if (pFigureForm) pFigureForm->AddVmsForm(String(pObj->VMS_CTLR_NMBR));
  210. }
  211. }
  212. }
  213. __finally
  214. {
  215. VmsCtlrManager->FLists.UnLock();
  216. PnlInfoLeft->Width = AWidth + 12/*폼여백*/ + 34/*기타여백*/;
  217. LockWindowUpdate(0);
  218. ChkWidthClick((TObject*)ChkWidth);
  219. }
  220. FReady = true;
  221. }
  222. //---------------------------------------------------------------------------
  223. void __fastcall TVMS0000M::FormShow(TObject *Sender)
  224. {
  225. Refresh();
  226. Application->ProcessMessages();
  227. TmrShow->Enabled = true;
  228. }
  229. //---------------------------------------------------------------------------
  230. void __fastcall TVMS0000M::FormActivate(TObject *Sender)
  231. {
  232. ActivateForm(true);
  233. }
  234. //---------------------------------------------------------------------------
  235. void __fastcall TVMS0000M::FormDeactivate(TObject *Sender)
  236. {
  237. ActivateForm(false);
  238. }
  239. //---------------------------------------------------------------------------
  240. void __fastcall TVMS0000M::LoadLocalSkin()
  241. {
  242. }
  243. //---------------------------------------------------------------------------
  244. void __fastcall TVMS0000M::TmrShowTimer(TObject *Sender)
  245. {
  246. TmrShow->Enabled = false;
  247. }
  248. //---------------------------------------------------------------------------
  249. void __fastcall TVMS0000M::FormClose(TObject *Sender, TCloseAction &Action)
  250. {
  251. try {
  252. CommClose();
  253. VMS0000M = NULL;
  254. Action = caFree;
  255. } catch(...) {}
  256. }
  257. //---------------------------------------------------------------------------
  258. void __fastcall TVMS0000M::OnMainFormMessage(TMessage &Msg)
  259. {
  260. }
  261. //---------------------------------------------------------------------------
  262. void __fastcall TVMS0000M::OnVmsStateRefreshMessage(TMessage &Msg)
  263. {
  264. FRAMEFacilityStatusList1->RefreshList();
  265. for(int ii = 0; ii < FListForm->Count; ii++)
  266. {
  267. TVMSBACKM *pForm = (TVMSBACKM*)FListForm->Items[ii];
  268. pForm->RefreshVmsStatus();
  269. }
  270. FRAMEVmsState1->SelVmsObj = FSelVmsObj;
  271. if (VMS00MAP) VMS00MAP->UpdateFacilityStatus();
  272. }
  273. //---------------------------------------------------------------------------
  274. void __fastcall TVMS0000M::OnVmsFormRefreshMessage(TMessage &Msg)
  275. {
  276. for(int ii = 0; ii < FListForm->Count; ii++)
  277. {
  278. TVMSBACKM *pForm = (TVMSBACKM*)FListForm->Items[ii];
  279. pForm->RefreshVmsMessage();
  280. }
  281. }
  282. //---------------------------------------------------------------------------
  283. void __fastcall TVMS0000M::OnVmsIncidentRefreshMessage(TMessage &Msg)
  284. {
  285. if (VMS00MAP) VMS00MAP->UpdateIncidentStatus();
  286. }
  287. //---------------------------------------------------------------------------
  288. void __fastcall TVMS0000M::OnVmsSelectMessage(TMessage &Msg)
  289. {
  290. try {
  291. FSelVmsObj = (TVmsCtlr*)Msg.WParam;
  292. FRAMEVmsState1->SelVmsObj = FSelVmsObj;
  293. if (!FSelVmsObj) return;
  294. TVMSFORM0 *pSelForm = (TVMSFORM0*)Msg.LParam;
  295. if (pSelForm == FSelForm) return;
  296. if (FSelForm) FSelForm->SelectForm(false);
  297. FSelForm = pSelForm;
  298. if (FSelForm) FSelForm->SelectForm(true);
  299. //VMS정보제공구간 소통정보 업데이트
  300. LoadVmsIfscInfo(String(FSelVmsObj->VMS_CTLR_NMBR));
  301. } catch(...) {};
  302. }
  303. //---------------------------------------------------------------------------
  304. void __fastcall TVMS0000M::OnVmsSelectDblClickMessage(TMessage &Msg)
  305. {
  306. try {
  307. FSelVmsObj = (TVmsCtlr*)Msg.WParam;
  308. FRAMEVmsState1->SelVmsObj = FSelVmsObj;
  309. if (!FSelVmsObj) return;
  310. TVMSFORM0 *pSelForm = (TVMSFORM0*)Msg.LParam;
  311. if (FSelForm) FSelForm->SelectForm(false);
  312. FSelForm = pSelForm;
  313. if (FSelForm) FSelForm->SelectForm(true);
  314. //VMS정보제공구간 소통정보 업데이트
  315. LoadVmsIfscInfo(String(FSelVmsObj->VMS_CTLR_NMBR));
  316. if (VMS00MAP) VMS00MAP->SelectObjectByPos(FSelVmsObj->X_CRDN, FSelVmsObj->Y_CRDN, true);
  317. } catch(...) {};
  318. }
  319. //---------------------------------------------------------------------------
  320. void __fastcall TVMS0000M::FRAMEFacilityStatusList1TvListCellDblClick(TcxCustomGridTableView *Sender,
  321. TcxGridTableDataCellViewInfo *ACellViewInfo, TMouseButton AButton,
  322. TShiftState AShift, bool &AHandled)
  323. {
  324. if (!ACellViewInfo) return;
  325. try {
  326. TcxDataController *pGDC = FRAMEFacilityStatusList1->TvList->DataController;
  327. int nRow = pGDC->FocusedRecordIndex;
  328. if (nRow < 0) return;
  329. int nMemIdx = pGDC->Values[nRow][FRAMEFacilityStatusList1->Column99->Index];
  330. TVmsCtlr *pObj = (TVmsCtlr*)nMemIdx;
  331. if (!pObj) return;
  332. FSelVmsObj = pObj;
  333. FRAMEVmsState1->SelVmsObj = FSelVmsObj;
  334. LoadVmsIfscInfo(String(FSelVmsObj->VMS_CTLR_NMBR));
  335. if (VMS00MAP) VMS00MAP->SelectObjectByPos(pObj->X_CRDN, pObj->Y_CRDN, true);
  336. } catch(...) {}
  337. }
  338. //---------------------------------------------------------------------------
  339. void __fastcall TVMS0000M::LoadVmsIfscInfo(String AVmsNmbr)
  340. {
  341. CMM_ClearGridTableView(TvList);
  342. CMM_ClearGridTableView(TvIfsc);
  343. TcxDataController *pGDC = TvList->DataController;
  344. TVmsCtlr *pObj = VmsCtlrManager->FLists.Find(AVmsNmbr);
  345. if (!pObj) return;
  346. try
  347. {
  348. int nRow;
  349. TvList->BeginUpdate();
  350. pGDC->BeginUpdate();
  351. FOR_STL(TVmsIfscRltn*, pIfscRltn, pObj->FIfscRltn)
  352. {
  353. TVmsIfsc *pVmsIfsc = VmsIfscManager->FLists.Find(pIfscRltn->VMS_IFSC_ID);
  354. if (!pVmsIfsc) continue;
  355. nRow = pGDC->AppendRecord();
  356. String sDsplPrrt = String(pIfscRltn->DSPL_PRRT);
  357. pGDC->Values[nRow][Column01->Index] = sDsplPrrt;
  358. pGDC->Values[nRow][Column02->Index] = String(pIfscRltn->VMS_IFSC_ID);
  359. pGDC->Values[nRow][Column03->Index] = pVmsIfsc->VMS_IFSC_NM;
  360. pGDC->Values[nRow][Column04->Index] = pVmsIfsc->DSPL_STRT_NODE_NM + " -> " + pVmsIfsc->DSPL_END_NODE_NM;
  361. pGDC->Values[nRow][Column05->Index] = ITSUtil_FormatStr(pVmsIfsc->PRCN_DT, STR_DATETIME);
  362. String sVmsGrad = pVmsIfsc->CMTR_GRAD_CD;
  363. if (sVmsGrad == "1") sVmsGrad = "원활";
  364. else if (sVmsGrad == "2") sVmsGrad = "지체";
  365. else if (sVmsGrad == "3") sVmsGrad = "정체";
  366. else sVmsGrad = "정보없음";
  367. pGDC->Values[nRow][Column06->Index] = sVmsGrad;
  368. pGDC->Values[nRow][Column07->Index] = String(pVmsIfsc->SPED);
  369. pGDC->Values[nRow][Column08->Index] = String(pVmsIfsc->TRVL_HH);
  370. pGDC->Values[nRow][Column99->Index] = (int)pVmsIfsc;
  371. }
  372. }
  373. __finally
  374. {
  375. pGDC->EndUpdate();
  376. TvList->EndUpdate();
  377. }
  378. }
  379. //---------------------------------------------------------------------------
  380. void __fastcall TVMS0000M::LoadIfscInfo()
  381. {
  382. CMM_ClearGridTableView(TvIfsc);
  383. TcxDataController *pGDC = TvIfsc->DataController;
  384. int nSelIdx = CMM_GetRecordIndex(TvList);
  385. if (nSelIdx < 0) return;
  386. pGDC = TvList->DataController;
  387. int nMemPtr = pGDC->Values[nSelIdx][Column99->Index];
  388. TVmsIfsc *pVmsIfsc = (TVmsIfsc*)nMemPtr;
  389. if (!pVmsIfsc) return;
  390. pGDC = TvIfsc->DataController;
  391. try
  392. {
  393. int nRow;
  394. TvIfsc->BeginUpdate();
  395. pGDC->BeginUpdate();
  396. FOR_STL(TVmsLinkIfsc*, pLinkIfsc, pVmsIfsc->FLists)
  397. {
  398. nRow = pGDC->AppendRecord();
  399. TIfsc *pIfsc = IfscManager->FLists.Find(pLinkIfsc->IFSC_ID);
  400. if (!pIfsc) continue;
  401. pGDC->Values[nRow][cxGridColumn1->Index] = String(pLinkIfsc->ORD);
  402. pGDC->Values[nRow][cxGridColumn2->Index] = pIfsc->IFSC_ID;
  403. pGDC->Values[nRow][cxGridColumn3->Index] = pIfsc->IFSC_NM;
  404. pGDC->Values[nRow][cxGridColumn4->Index] = pIfsc->STRT_NM + " -> " + pIfsc->END_NM;
  405. pGDC->Values[nRow][cxGridColumn5->Index] = ITSUtil_FormatStr(pIfsc->PRCN_DT, STR_DATETIME);
  406. String sGrad = pIfsc->CMTR_GRAD_CD;
  407. if (sGrad == "1") sGrad = "원활";
  408. else if (sGrad == "2") sGrad = "지체";
  409. else if (sGrad == "3") sGrad = "정체";
  410. else sGrad = "정보없음";
  411. pGDC->Values[nRow][cxGridColumn6->Index] = sGrad;
  412. pGDC->Values[nRow][cxGridColumn7->Index] = String(pIfsc->SPED);
  413. pGDC->Values[nRow][cxGridColumn8->Index] = String(pIfsc->TRVL_HH);
  414. pGDC->Values[nRow][cxGridColumn9->Index] = String(pIfsc->SECT_LNGT);
  415. }
  416. }
  417. __finally
  418. {
  419. pGDC->EndUpdate();
  420. TvIfsc->EndUpdate();
  421. }
  422. }
  423. //---------------------------------------------------------------------------
  424. void __fastcall TVMS0000M::TvListFocusedRecordChanged(TcxCustomGridTableView *Sender,
  425. TcxCustomGridRecord *APrevFocusedRecord, TcxCustomGridRecord *AFocusedRecord,
  426. bool ANewItemRecordFocusingChanged)
  427. {
  428. if (!AFocusedRecord) return;
  429. LoadIfscInfo();
  430. }
  431. //---------------------------------------------------------------------------
  432. void __fastcall TVMS0000M::cxGridColumn6CustomDrawCell(TcxCustomGridTableView *Sender,
  433. TcxCanvas *ACanvas, TcxGridTableDataCellViewInfo *AViewInfo,
  434. bool &ADone)
  435. {
  436. try
  437. {
  438. TColor tColor = ACanvas->Brush->Color;
  439. String sGrade = AViewInfo->GridRecord->DisplayTexts[AViewInfo->Item->Index];
  440. if (sGrade.Pos("원활")) tColor = clLime;
  441. else if (sGrade.Pos("지체")) tColor = clYellow;
  442. else if (sGrade.Pos("정체")) tColor = clRed;
  443. else tColor = clGray;
  444. ACanvas->SetBrushColor(tColor);
  445. }
  446. catch(Exception &e)
  447. {
  448. }
  449. }
  450. //---------------------------------------------------------------------------
  451. void __fastcall TVMS0000M::MoveGisFacility(String AType, String AId)
  452. {
  453. }
  454. //---------------------------------------------------------------------------
  455. void __fastcall TVMS0000M::ScrollBoxMouseWheel(TObject *Sender, TShiftState Shift,
  456. int WheelDelta, TPoint &MousePos, bool &Handled)
  457. {
  458. TScrollBox *pScrollBox = (TScrollBox*)Sender;
  459. pScrollBox->VertScrollBar->Position -= WheelDelta;
  460. }
  461. //---------------------------------------------------------------------------
  462. void __fastcall TVMS0000M::ActivateForm(bool AActivate)
  463. {
  464. try
  465. {
  466. int nTabIndex = PgVmsMonitoring->ActivePageIndex;
  467. for(int ii = 0; ii < FListForm->Count; ii++)
  468. {
  469. TVMSBACKM *pForm = (TVMSBACKM*)FListForm->Items[ii];
  470. if (AActivate)
  471. {
  472. if (nTabIndex == ii) pForm->Play = true;
  473. else pForm->Play = false;
  474. }
  475. else
  476. pForm->Play = false;
  477. }
  478. }
  479. catch(Exception &e)
  480. {
  481. }
  482. }
  483. //---------------------------------------------------------------------------
  484. void __fastcall TVMS0000M::PgVmsMonitoringPageChanging(TObject *Sender, TcxTabSheet *NewPage,
  485. bool &AllowChange)
  486. {
  487. if (!FReady) return;
  488. try
  489. {
  490. int nTabIndex = NewPage->TabIndex;
  491. for(int ii = 0; ii < FListForm->Count; ii++)
  492. {
  493. TVMSBACKM *pForm = (TVMSBACKM*)FListForm->Items[ii];
  494. if (nTabIndex == ii) pForm->Play = true;
  495. else pForm->Play = false;
  496. }
  497. }
  498. catch(Exception &e)
  499. {
  500. }
  501. }
  502. //---------------------------------------------------------------------------
  503. void __fastcall TVMS0000M::TvIfscCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo,
  504. TMouseButton AButton, TShiftState AShift,
  505. bool &AHandled)
  506. {
  507. if (!ACellViewInfo) return;
  508. TcxGridDataController *pDc = TvIfsc->DataController;
  509. int nRow = pDc->FocusedRecordIndex;
  510. if( nRow <= -1 )
  511. return;
  512. String sIfscIf = VarToStr(pDc->Values[nRow][cxGridColumn2->Index]);
  513. if (VMS00MAP) VMS00MAP->SelectLinkById(2, sIfscIf, true);
  514. }
  515. //---------------------------------------------------------------------------