/**************************************************************************** * @source : * @description : **************************************************************************** * DATE AUTHOR DESCRIPTION * -------------------------------------------------------------------------- * 2011/12/24 Á¤½ÂÈ£ ÃÖÃÊÀÛ¼º * ****************************************************************************/ //--------------------------------------------------------------------------- #include #include "ITSSkinF.h" #include "ITSUtilF.h" #include "AppGlobalF.h" #include "CDSCodeF.h" #pragma hdrstop #include "VDSH070MF.h" #include "VDSH0701F.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 "cxLookAndFeelPainters" #pragma link "cxLookAndFeels" #pragma link "cxMaskEdit" #pragma link "cxPC" #pragma link "cxPCdxBarPopupMenu" #pragma link "cxSplitter" #pragma link "cxTextEdit" #pragma link "dxSkinBlack" #pragma link "dxSkinBlue" #pragma link "dxSkinCaramel" #pragma link "dxSkinCoffee" #pragma link "dxSkinDarkRoom" #pragma link "dxSkinDarkSide" #pragma link "dxSkinFoggy" #pragma link "dxSkinGlassOceans" #pragma link "dxSkiniMaginary" #pragma link "dxSkinLilian" #pragma link "dxSkinLiquidSky" #pragma link "dxSkinLondonLiquidSky" #pragma link "dxSkinMcSkin" #pragma link "dxSkinMoneyTwins" #pragma link "dxSkinOffice2007Black" #pragma link "dxSkinOffice2007Blue" #pragma link "dxSkinOffice2007Green" #pragma link "dxSkinOffice2007Pink" #pragma link "dxSkinOffice2007Silver" #pragma link "dxSkinOffice2010Black" #pragma link "dxSkinOffice2010Blue" #pragma link "dxSkinOffice2010Silver" #pragma link "dxSkinsCore" #pragma link "dxSkinscxPCPainter" #pragma link "dxSkinSeven" #pragma link "dxSkinSharp" #pragma link "dxSkinSilver" #pragma link "dxSkinStardust" #pragma link "FRAME_VdsDtctListF" #pragma link "cxCalendar" #pragma link "cxLabel" #pragma link "cxSpinEdit" #pragma link "cxTimeEdit" #pragma resource "*.dfm" TVDSH070M *VDSH070M = NULL; //--------------------------------------------------------------------------- __fastcall TVDSH070M::TVDSH070M(TComponent* Owner) : TForm(Owner) { ITSSkin_Load(this); CMM_LoadForm(g_sFormsDir, this); FTitle = "VDS-°ËÁö±â »óÅÂÀÌ·Â"; m_pFormList = new TList(); TsList01->TabVisible = false; //FRAMEVdsDtctList1->PnlTop->Visible = false; FRAMEVdsDtctList1->PnlBottom->Visible = false; //FRAMEVdsDtctList1->ColumnSel->Visible = false; } //--------------------------------------------------------------------------- /* * ´Ý±â¹öư À̳ª x¹öư Ŭ¸¯½Ã °øÅëÀ¸·Î ó¸®ÇÏ´Â ·ÎÁ÷À̵é¾î°£´Ù.. * Form°ú DataModule class¸¦ delete½ÃŲ´Ù. * arguments * * return * void */ void __fastcall TVDSH070M::CommClose() { try { for (int idx = m_pFormList->Count-1; idx >= 0; idx--) { m_pFormList->Delete(idx); } delete m_pFormList; CMM_SaveForm(g_sFormsDir, this); } catch(...) { } } //--------------------------------------------------------------------------- /* * FormÀ» º¸¿©ÁÙ¶§ È£ÃâµÇ´Â event ¸Þ¼­µåÀÌ´Ù. * arguments * Sender : event handler °´Ã¼ * return * void */ void __fastcall TVDSH070M::FormShow(TObject *Sender) { Refresh(); FormInit(); TmrShow->Enabled = true; } //--------------------------------------------------------------------------- /* * form ÃʱâÈ­ * * arguments * * return * void */ void __fastcall TVDSH070M::FormInit() { DtStDate->Date = Now() - 1; DtEdDate->Date = Now() - 1; //DtEdTime->EditValue = Now().FormatString("hh"); DtStTime->Time = StrToDateTime("00:00"); DtEdTime->Time = StrToDateTime("23:59"); } //--------------------------------------------------------------------------- /* * FormÀÌ ShowµÇ°í ³­ ÈÄ ÃÖÃÊ 1ȸ ¼öÇàµÇ´Â ŸÀÌ¸Ó À̺¥Æ® * arguments * Sender : event handler °´Ã¼ * return * void */ void __fastcall TVDSH070M::TmrShowTimer(TObject *Sender) { TmrShow->Enabled = false; FRAMEVdsDtctList1->UpdateList(); } //--------------------------------------------------------------------------- /* * Refresh Data Event Function * arguments * * return * void */ void __fastcall TVDSH070M::RefreshData() { // °Ë»öÁ¶°Ç¿¡ ÀÇÇÑ ¸µÅ© µ¥ÀÌÅÍ Á¶È¸ try { //SelListData(); } __finally { } } //--------------------------------------------------------------------------- /* * Search ¹öư Ŭ¸¯ À̺¥Æ® Çڵ鷯 * arguments * Sender : event handler °´Ã¼ * return * void */ void __fastcall TVDSH070M::BtnSearchClick(TObject *Sender) { TcxGrid *pCxList; TcxGridTableView *pTvList = NULL; int nIdCol = -1; pCxList = FRAMEVdsDtctList1->CxList; pTvList = FRAMEVdsDtctList1->TvList; nIdCol = FRAMEVdsDtctList1->Column02->Index; if (!pTvList) return; TcxDataController *pGDC = pTvList->DataController; #if 0 int nIndex = pGDC->FocusedRecordIndex; if( nIndex < 0 ) { Application->MessageBox(L"VDS-°ËÁö±â¸¦ ¸ÕÀú ¼±Åà Çϼ¼¿ä.", FTitle.c_str(), MB_OK|MB_ICONWARNING|MB_APPLMODAL); ActiveControl = pCxList; return; } FSelId = VarToStr(pGDC->Values[nIndex][nIdCol]); #else int nSelects = CMM_GetSelectCount(FRAMEVdsDtctList1->TvList, FRAMEVdsDtctList1->ColumnSel->Index, FRAMEVdsDtctList1->Column02->Index, FSelId); if (0 == nSelects) { Application->MessageBox(L"°Ë»ö ¸ñ·ÏÀ» ¼±ÅÃÇÏÁö ¾Ê¾Ò½À´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONWARNING|MB_APPLMODAL); FRAMEVdsDtctList1->CxList->SetFocus(); return; } #endif String sStTime, sEdTime, sTemp; #if 0 sStTime = DtStDate->Date.FormatString("yyyymmdd") + DtStTime->Time.FormatString("hh"); sEdTime = DtEdDate->Date.FormatString("yyyymmdd") + DtEdTime->Time.FormatString("hh"); #else sStTime = DtStDate->Date.FormatString("yyyymmdd") + DtStTime->Time.FormatString("hhnn"); sEdTime = DtEdDate->Date.FormatString("yyyymmdd") + DtEdTime->Time.FormatString("hhnn"); #endif if (sStTime > sEdTime) { Application->MessageBox(L"°Ë»ö ½ÃÀ۽ð¢ÀÌ °Ë»ö Á¾·á½Ã°¢ º¸´Ù Å®´Ï´Ù.", FTitle.c_str(), MB_OK|MB_ICONWARNING|MB_APPLMODAL); ActiveControl = DtStDate; return; } #if 0 sStTime = sStTime + "0000"; sEdTime = sEdTime + "5959"; #else sStTime = sStTime + "00"; sEdTime = sEdTime + "59"; #endif FStatType = 0; String sTitle; sTitle.printf(L"(%s~%s) %s ", sStTime.c_str(), sEdTime.c_str(), FSelId.c_str()); String sCaption; #if 0 sCaption.printf(L"%s [%s] ", CbStatType->Text.c_str(), FSelId.c_str()); #else //sCaption.printf(L"%s [%s] ", CbStatType->Text.c_str(), FSelId.c_str()); //sCaption = CMM_GetSelectTitle(FRAMEVdsDtctList1->TvList, FRAMEVdsDtctList1->ColumnSel->Index, FRAMEVdsDtctList1->Column02->Index); sCaption = " »óÅÂÀÌ·Â "; #endif try { Application->ProcessMessages(); LockWindowUpdate(Handle); TcxTabSheet *pSheet = CMM_AddTabSheet(PgTab, sCaption); if (!pSheet) return; VDSH0701 = new TVDSH0701(this, Handle, FSelId, sStTime, sEdTime, FStatType); VDSH0701->Parent = pSheet; VDSH0701->Show(); PgTab->ActivePage = pSheet; pSheet = PgTab->ActivePage; m_pFormList->Add(VDSH0701); } __finally { LockWindowUpdate(0); } } //--------------------------------------------------------------------------- /* * Close ¹öư Ŭ¸¯ À̺¥Æ® Çڵ鷯 * arguments * Sender : event handler °´Ã¼ * return * void */ void __fastcall TVDSH070M::BtnCloseClick(TObject *Sender) { Close(); } //--------------------------------------------------------------------------- /* * Á¶È¸°á°ú ÆûÀÌ ´ÝÈú¶§ ¸Þ½ÃÁö¸¦ ¹Þ¾Æ ó¸®ÇÑ´Ù. * arguments * Sender : event handler °´Ã¼ * return * void */ void __fastcall TVDSH070M::OnSubFormClose(TMessage Msg) { int nActiveIdx = PgTab->ActivePageIndex; if (nActiveIdx <= 0) return; LockWindowUpdate(Handle); TcxTabSheet *pSheet = PgTab->ActivePage; if (pSheet) { delete pSheet; } nActiveIdx--; // ù¹øÂ° ÅÇÀº È­¸é¿¡ ¼û°ÜÁ® ÀÖ´Ù. m_pFormList->Delete(nActiveIdx); LockWindowUpdate(0); } //--------------------------------------------------------------------------- /* * Tab ControlÀÇ TabÀ» ´õºíŬ¸¯ÇÏ¿© ´Ý´Â´Ù. * arguments * Sender : event handler °´Ã¼ * return * void */ void __fastcall TVDSH070M::PgTabDblClick(TObject *Sender) { TPoint APoint; APoint = PgTab->MouseDownPos; if (PgTab->IndexOfTabAt(APoint.x, APoint.y) != -1) POST_MSG(Handle, WM_SUBFORM_CLOSE, 0, 0); } //--------------------------------------------------------------------------- void __fastcall TVDSH070M::FormClose(TObject *Sender, TCloseAction &Action) { CommClose(); VDSH070M = NULL; Action = caFree; } //---------------------------------------------------------------------------