//--------------------------------------------------------------------------- #include #include "ITSSkinF.h" #include "ITSUtilF.h" #include "AppGlobalF.h" #include "FrmResourceF.h" #include "ITSLangTransF.h" #pragma hdrstop #include "FRAME_BlackBoxEventListF.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "cxCalc" #pragma link "cxClasses" #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 "cxLookAndFeelPainters" #pragma link "cxLookAndFeels" #pragma link "cxStyles" #pragma link "cxTextEdit" #pragma link "dxSkinBlack" #pragma link "dxSkinBlue" #pragma link "dxSkinsCore" #pragma link "dxSkinscxPCPainter" #pragma resource "*.dfm" //TFRAMEBlackBoxEventList *FRAMEBlackBoxEventList; //--------------------------------------------------------------------------- __fastcall TFRAMEBlackBoxEventList::TFRAMEBlackBoxEventList(TComponent* Owner) : TFrame(Owner) { TvList->OptionsView->NoDataToDisplayInfoText = FrmLang->lblNoInfo->Caption;//"<ÇöÀç ¹ß»ýÇÑ À̺¥Æ®Á¤º¸°¡ ¾ø½À´Ï´Ù>"; #if 0 FCodeIST = ItsCodeManager->FLists.Find("IST"); //µ¹¹ß»óȲ ¿øº» ÄÚµå : IST FCodeLTCU = ItsCodeManager->FLists.Find("LTCU"); //¼ÒÅë µî±Þ ÄÚµå : LTCU FCodeICM = ItsCodeManager->FLists.Find("ICM"); //µ¹¹ß»óȲ È®ÀÎ ¹æ¹ý ÄÚµå : ICM FCodeIDTU = ItsCodeManager->FLists.Find("IDTU"); //µ¹¹ß»óȲ À¯Çü ºÐ·ù ÄÚµå : IDTU FCodeACTU = ItsCodeManager->FLists.Find("ACTU"); //µ¹¹ß»óȲ À¯Çü ÄÚµå : ACTU, CRTU, EVTU, WETU Áß Çϳª FCodeCRTU = ItsCodeManager->FLists.Find("CRTU"); //µ¹¹ß»óȲ À¯Çü ÄÚµå : ACTU, CRTU, EVTU, WETU Áß Çϳª FCodeEVTU = ItsCodeManager->FLists.Find("EVTU"); //µ¹¹ß»óȲ À¯Çü ÄÚµå : ACTU, CRTU, EVTU, WETU Áß Çϳª FCodeWETU = ItsCodeManager->FLists.Find("WETU"); //µ¹¹ß»óȲ À¯Çü ÄÚµå : ACTU, CRTU, EVTU, WETU Áß Çϳª FCodeSRLU = ItsCodeManager->FLists.Find("SRLU"); //µ¹¹ß»óȲ ½É°¢µµ ÄÚµå : SRLU FCodePRTU = ItsCodeManager->FLists.Find("PRTU"); //ÅëÇà Á¦ÇÑ À¯Çü ÄÚµå : PRTU FCodeRSL = ItsCodeManager->FLists.Find("RSL"); //´ëÀÀ ¼öÁØ ÄÚµå : RSL FCodeISS = ItsCodeManager->FLists.Find("ISS"); //µ¹¹ß»óȲ ÁøÇà ´Ü°è ÄÚµå : ISS FCodeICM = ItsCodeManager->FLists.Find("ICM"); //µ¹¹ß»óȲ Á¾·á È®ÀÎ ¹æ¹ý ÄÚµå : ICM FCodeDFW = ItsCodeManager->FLists.Find("DFW"); //±â»ó ÄÚµå : DFW FCodeVIT = ItsCodeManager->FLists.Find("VIT"); //VMS µ¹¹ß À¯Çü ÄÚµå : VIT FCodeIDT = ItsCodeManager->FLists.Find("IDT"); //VMS µ¹¹ß À¯Çü ¼¼ºÎ ÄÚµå : IDT FCodeEDT = ItsCodeManager->FLists.Find("EDT"); //VMS µ¹¹ß À¯Çü ¼¼ºÎ ÄÚµå : EDT #endif Col16->Visible = false; Col16->VisibleForCustomization = false; } //--------------------------------------------------------------------------- void __fastcall TFRAMEBlackBoxEventList::UpdateList() { CMM_ClearGridTableView(TvList); TcxDataController *pGDC = TvList->DataController; int nRow = 0; try { TvList->BeginUpdate(); try { ItsEventManager->FLists.Lock(); FOR_STL(TItsEvent *, pObj, ItsEventManager->FLists) { nRow = pGDC->AppendRecord(); pGDC->Values[nRow][Col00->Index] = pObj->BDS_MNGM_NMBR; pGDC->Values[nRow][Col01->Index] = pObj->OPNC_NMBR; pGDC->Values[nRow][Col02->Index] = pObj->MDM_NMBR; pGDC->Values[nRow][Col03->Index] = pObj->USIM_NMBR; pGDC->Values[nRow][Col04->Index] = pObj->VHCL_NMBR; pGDC->Values[nRow][Col05->Index] = pObj->OWNR_NM; pGDC->Values[nRow][Col06->Index] = pObj->PRCT_NM; pGDC->Values[nRow][Col07->Index] = ITSUtil_StrToDateTime(pObj->OCRR_DT).FormatString(STR_DATETIME); pGDC->Values[nRow][Col16->Index] = pObj->TRMN_ID; pGDC->Values[nRow][Col08->Index] = pObj->EVT_TYPE; pGDC->Values[nRow][Col09->Index] = pObj->X_CRDN; pGDC->Values[nRow][Col10->Index] = pObj->Y_CRDN; pGDC->Values[nRow][Col11->Index] = pObj->GPS_DRCT; pGDC->Values[nRow][Col12->Index] = pObj->SPED; pGDC->Values[nRow][Col13->Index] = pObj->VHRN_MODE; pGDC->Values[nRow][Col14->Index] = pObj->TRMN_VER; pGDC->Values[nRow][Col15->Index] = pObj->IMGN_PATH; pGDC->Values[nRow][Col88->Index] = pObj->ID; if (pObj->LINK_ID != "") { TItsLink *pLink = ItsLinkManager->FLists.Find(pObj->LINK_ID); if (pLink) { pGDC->Values[nRow][Col20->Index] = pObj->LINK_ID; pGDC->Values[nRow][Col21->Index] = pLink->ROAD_NAME; } } pGDC->Values[nRow][Column99->Index] = (int)pObj; } } __finally { ItsEventManager->FLists.UnLock(); } } __finally { TvList->EndUpdate(); TvList->DataController->GotoFirst(); TvList->DataController->FocusedRecordIndex = 0; } } //---------------------------------------------------------------------------