123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202 |
- //---------------------------------------------------------------------------
- #include <vcl.h>
- #include "ITSSkinF.h"
- #include "ITSUtilF.h"
- #include "FrmResourceF.h"
- #include "ITSLangTransF.h"
- #include "AppGlobalF.h"
- #pragma hdrstop
- #include "FRAME_VdsDtctListF.h"
- //---------------------------------------------------------------------------
- #pragma package(smart_init)
- #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 "cxLookAndFeelPainters"
- #pragma link "cxLookAndFeels"
- #pragma link "cxStyles"
- #pragma link "cxTextEdit"
- #pragma link "dxSkinBlack"
- #pragma link "dxSkinBlue"
- #pragma link "dxSkinsCore"
- #pragma link "dxSkinscxPCPainter"
- #pragma link "cxLabel"
- #pragma link "cxDropDownEdit"
- #pragma link "cxMaskEdit"
- #pragma resource "*.dfm"
- //TFRAMEVdsDtctList *FRAMEVdsDtctList;
- //---------------------------------------------------------------------------
- __fastcall TFRAMEVdsDtctList::TFRAMEVdsDtctList(TComponent* Owner)
- : TFrame(Owner)
- {
- LangTrans->Translate(this, ITSDb_GetConnection());
- ColumnSel->Options->Filtering = false;
- m_pGDC = TvList->DataController;
- TvList->OptionsView->GroupByBox = false;
- TvList->OptionsView->NoDataToDisplayInfoText = FrmLang->lblNoInfo->Caption;//"<VDS 검지기 정보가 없습니다>";
- APP_FillCode(CbType, "DTT");
- APP_FillCode(Cb_DTCT_DIR, "VCD");
- }
- //---------------------------------------------------------------------------
- void __fastcall TFRAMEVdsDtctList::UpdateList(int AType/*=0*/)
- {
- CMM_ClearGridTableView(TvList);
- int nRow = 0;
- try
- {
- TvList->BeginUpdate();
- try
- {
- VdsCtlrManager->FLists.Lock();
- FOR_STL(TVdsCtlr*, pVds, VdsCtlrManager->FLists)
- {
- if (pVds->DEL_YN == "Y") continue;
- if (AType == 1 && pVds->VDS_TYPE_CD == "C") continue; //교차로감시제어기제외
- if (AType == 2 && pVds->VDS_TYPE_CD == "I") continue; //영상검지기제외
- FOR_STL(TVdsDtct*, pObj, pVds->FDtcts)
- {
- if (pObj->DEL_YN == "Y") continue;
- //if (pObj->USE_YN != "Y") continue;
- nRow = m_pGDC->AppendRecord();
- m_pGDC->Values[nRow][ColumnSel->Index] = false; //선택
- m_pGDC->Values[nRow][Column00->Index] = "-"; //편집
- m_pGDC->Values[nRow][Column01->Index] = pVds->VDS_CTLR_NMBR+"."+pVds->VDS_NM; //제어기 위치
- //m_pGDC->Values[nRow][Column01->Index] = pVds->VDS_CTLR_NMBR; //제어기 위치
- m_pGDC->Values[nRow][Column02->Index] = pObj->VDS_DTCT_NMBR; //검지기번호
- m_pGDC->Values[nRow][Column09->Index] = String(pObj->DETECT_LANE); //검지차로
- m_pGDC->Values[nRow][Column04->Index] = String(pObj->ISTL_LANE); //설치차로
- //m_pGDC->Values[nRow][Column05->Index] = pObj->VDS_DTCT_NM;
- if (pVds->VDS_TYPE_CD == "C")
- m_pGDC->Values[nRow][Column05->Index] = pObj->VDS_DTCT_NM;
- else
- m_pGDC->Values[nRow][Column05->Index] = pVds->VDS_NM;
- m_pGDC->Values[nRow][Column06->Index] = pObj->VDS_DTCT_ID;
- m_pGDC->Values[nRow][Column07->Index] = APP_GetCodeName(CbType, pObj->DTCT_TYPE);
- m_pGDC->Values[nRow][Column08->Index] = APP_GetCodeName(Cb_DTCT_DIR, pObj->DTCT_DIR);
- m_pGDC->Values[nRow][Column99->Index] = (int)pObj;
- }
- }
- }
- __finally
- {
- VdsCtlrManager->FLists.UnLock();
- }
- }
- __finally
- {
- LblRecords->Caption = "("+FormatFloat("##,##0", m_pGDC->FilteredRecordCount) +"/"+FormatFloat("##,##0", m_pGDC->RecordCount) + ")";
- TvList->EndUpdate();
- TvList->DataController->GotoFirst();
- TvList->DataController->FocusedRecordIndex = 0;
- //CxList->SetFocus();
- CMM_ExpandCollapseChk(TvList, true);
- }
- }
- //---------------------------------------------------------------------------
- void __fastcall TFRAMEVdsDtctList::BtnAllSelectClick(TObject *Sender)
- {
- TcxButton *pBtn = (TcxButton*)Sender;
- CMM_CheckAllListItem(TvList, ColumnSel->Index, pBtn->Tag);
- }
- //---------------------------------------------------------------------------
- int __fastcall TFRAMEVdsDtctList::GetSelIds(String &ALinkIds)
- {
- ALinkIds = "";
- if (TvList->ViewData->RecordCount <= 0) return 0;
- int nIndex = m_pGDC->FocusedRecordIndex;
- if( nIndex < 0 )
- return 0;
- String sLinkId = VarToStr(m_pGDC->Values[nIndex][Column02->Index]);
- ALinkIds = sLinkId;
- return 1;
- }
- //---------------------------------------------------------------------------
- int __fastcall TFRAMEVdsDtctList::GetSelIds(TStringList *AStringList)
- {
- int nSelCnt = 0;
- try
- {
- TvList->BeginUpdate();
- int nRowCnt = TvList->ViewData->RecordCount;
- for (int ii = 0; ii < nRowCnt; ii++)
- {
- TcxCustomGridRow* ARow = TvList->ViewData->Rows[ii];
- if (((bool)ARow->Values[ColumnSel->Index]))
- {
- AStringList->Add(ARow->Values[Column02->Index]);
- nSelCnt++;
- }
- }
- }
- __finally
- {
- TvList->EndUpdate();
- }
- return nSelCnt;
- }
- //---------------------------------------------------------------------------
- void __fastcall TFRAMEVdsDtctList::TvListDataControllerFilterChanged(TObject *Sender)
- {
- CMM_SetFilterLike(TvList);
- LblRecords->Caption = "("+FormatFloat("##,##0", m_pGDC->FilteredRecordCount) +"/"+FormatFloat("##,##0", m_pGDC->RecordCount) + ")";
- }
- //---------------------------------------------------------------------------
- void __fastcall TFRAMEVdsDtctList::BtnExlSaveClick(TObject *Sender)
- {
- TcxGrid *pGrid = CxList;
- TcxGridTableView *pView = TvList;
- String sTitle= lblFileName->Caption;//"VDS검지기정보";
- CMM_ExportToExcelFile(sTitle, pGrid, pView, (TForm*)this);
- }
- //---------------------------------------------------------------------------
- void __fastcall TFRAMEVdsDtctList::OnCloseQuery(bool &CanClose)
- {
- }
- //---------------------------------------------------------------------------
- void __fastcall TFRAMEVdsDtctList::ChkExpandClick(TObject *Sender)
- {
- CMM_ExpandCollapseChk(TvList, ChkExpand->Checked);
- }
- //---------------------------------------------------------------------------
|