//--------------------------------------------------------------------------- #include #pragma hdrstop #include "AppGlobalF.h" #include "ITSDbF.h" #include "FRMLoginF.h" #include "ITSUtilF.h" #include "CDSCodeF.h" #include //--------------------------------------------------------------------------- #pragma package(smart_init) //--------------------------------------------------------------------------- ST_GISINFO g_GisInfo; ST_SELLINK g_SelLink; String CenterCd = ""; // Áö¿ª¼¾ÅÍ ÄÚµå String CenterId = ""; // Áö¿ª¼¾ÅÍ ¾ÆÀ̵ð String CenterName = ""; // Áö¿ª¼¾ÅÍ ¸íĪ int g_nPid = -1; // Application Process ID String g_sAppDir = ""; // Application Directory String g_sAppName= ""; // Program name String g_sCfgDir = ""; // Config File Directory String g_sLogDir = ""; // Program Log Directory String g_sTempDir = ""; // Program Temp Directory String g_sFormsDir = ""; // Program Forms Directory String g_sBlackBox = ""; String g_sLangDir = ""; String g_sMapDir = ""; APP_CONFIG g_AppCfg; LOGININFO *g_pLOGIN = NULL; LOG_INFO g_LogCfg; TITSLog *ITSLog = NULL; TITSLog *FDbLog = NULL; //TLangTrans *LangTrans = NULL; //--------------------------------------------------------------------------- void LoadIcon(TIniFile* AIniFile, String ASection, String AItem, String& AValue) { try { AValue = AIniFile->ReadString(ASection, AItem, ""); if (AValue != "") { AValue = g_sAppDir + "Image\\" + AValue; if (!FileExists(AValue)) AValue = ""; } } catch(Exception &e) { } } //--------------------------------------------------------------------------- bool LoadDefaultConfigInfo(String ACfgFile/*=""*/) { String sCfgFile; TIniFile *pIniFile = NULL; String sIniFile = ChangeFileExt(ExtractFileName(Application->ExeName), ".ini"); if (!ACfgFile.IsEmpty()) sIniFile = ACfgFile + ".ini"; sCfgFile = g_sCfgDir + sIniFile; g_AppCfg.sConfigFile = sCfgFile; g_AppCfg.AutoLogout.Enabled = false; g_AppCfg.AutoLogout.IntervalMin = 0; g_AppCfg.AutoLogout.LogoutExit = false; g_AppCfg.thr.pThread = NULL; g_AppCfg.thr.dwThreadId = 0; g_AppCfg.thr.nHandle = 0; g_AppCfg.thr.bRunning = false; g_AppCfg.bAppClose = false; try { String sTmp; pIniFile = new TIniFile(sCfgFile); g_AppCfg.sTitle = pIniFile->ReadString("APPLICATION", "TITLE", "±¤¿ª±³ÅëÁ¤º¸ ±³Åë°ü¸®½Ã½ºÅÛ"); g_AppCfg.sProcessId = pIniFile->ReadString("APPLICATION", "PROCESSID", "999999"); g_AppCfg.sLogDay = pIniFile->ReadString("APPLICATION", "LOGDAY", ""); g_AppCfg.sAppPath = pIniFile->ReadString("APPLICATION", "APP_PATH", ""); g_AppCfg.sSkinName = pIniFile->ReadString("APPLICATION", "SKINNAME", "Black"); if (g_AppCfg.sSkinName.IsEmpty()) g_AppCfg.sSkinName = "Blue"; sTmp = pIniFile->ReadString("APPLICATION", "SAVEFORM", "1"); g_AppCfg.bSaveForm = (sTmp == "1") ? true : false; sTmp = "1"; sTmp = pIniFile->ReadString("APPLICATION", "LOGINPROMPT", "1"); g_AppCfg.bLoginPrompt = (sTmp == "1") ? true : false; g_AppCfg.sDefUseId = pIniFile->ReadString("APPLICATION", "LASTUSER", ""); g_AppCfg.sLang = pIniFile->ReadString("APPLICATION", "LANGUAGE", "kr"); g_AppCfg.sLang = g_AppCfg.sLang.LowerCase(); if (g_AppCfg.sLang != "en" && g_AppCfg.sLang != "kr") g_AppCfg.sLang = "kr"; g_AppCfg.bDebug = false; sTmp = pIniFile->ReadString("APPLICATION", "DEBUG", "0"); if (sTmp == "1") g_AppCfg.bDebug = true; g_AppCfg.bTermChildProg = true; sTmp = pIniFile->ReadString("APPLICATION", "TERMCHILD", "1"); if (sTmp == "0") g_AppCfg.bTermChildProg = false; g_AppCfg.bOnlyOneScreen = true; sTmp = pIniFile->ReadString("APPLICATION", "ONESCREEN", "1"); if (sTmp == "0") g_AppCfg.bOnlyOneScreen = false; sTmp = pIniFile->ReadString("ALARM", "WINDOW", "1"); g_AppCfg.Alarm.Window = (sTmp == "1") ? true : false; sTmp = pIniFile->ReadString("ALARM", "ENABLED", "0"); g_AppCfg.Alarm.Enabled = (sTmp == "1") ? true : false; sTmp = pIniFile->ReadString("ALARM", "TIMEOUT", "10"); g_AppCfg.Alarm.TimeOut = sTmp.ToIntDef(0); if (g_AppCfg.Alarm.TimeOut == 0) g_AppCfg.Alarm.TimeOut = 10; if (g_AppCfg.Alarm.TimeOut > 60) g_AppCfg.Alarm.TimeOut = 60; sTmp = pIniFile->ReadString("TEMPERATURE", "ALARMVALUE", "45"); g_AppCfg.Temp.AlarmValue = sTmp.ToIntDef(0); sTmp = pIniFile->ReadString("INCIDENT", "WINDOW", "1"); g_AppCfg.Incident.Window = (sTmp == "1") ? true : false; sTmp = pIniFile->ReadString("INCIDENT", "ENABLED", "0"); g_AppCfg.Incident.Enabled = (sTmp == "1") ? true : false; sTmp = pIniFile->ReadString("INCIDENT", "TIMEOUT", "30"); g_AppCfg.Incident.TimeOut = sTmp.ToIntDef(0); if (g_AppCfg.Incident.TimeOut == 0) g_AppCfg.Incident.TimeOut = 30; if (g_AppCfg.Incident.TimeOut > 300) g_AppCfg.Incident.TimeOut = 60; sTmp = pIniFile->ReadString("AUTOLOGOUT", "ENABLED", "0"); g_AppCfg.AutoLogout.Enabled = (sTmp == "1") ? true : false; sTmp = pIniFile->ReadString("AUTOLOGOUT", "INTERVALMIN", "10"); g_AppCfg.AutoLogout.IntervalMin = sTmp.ToIntDef(0); if (g_AppCfg.AutoLogout.IntervalMin == 0) g_AppCfg.AutoLogout.IntervalMin = 10; sTmp = pIniFile->ReadString("AUTOLOGOUT", "LOGOUTEXIT", "0"); g_AppCfg.AutoLogout.LogoutExit = (sTmp == "1") ? true : false; String sSqlLog; g_AppCfg.itsdb.bSqlLog = false; g_AppCfg.itsdb.sProvider = pIniFile->ReadString("ITSDB", "PROVIDER", "OraOLEDB.Oracle.1"); g_AppCfg.itsdb.sServerName = pIniFile->ReadString("ITSDB", "SERVERNAME", "HANTE"); g_AppCfg.itsdb.sUserName = pIniFile->ReadString("ITSDB", "USERNAME", "hnits"); g_AppCfg.itsdb.sPassword = pIniFile->ReadString("ITSDB", "PASSWORD", "hnits"); //sSqlLog = pIniFile->ReadString("ITSDB", "SQLLOG", "0"); //if (sSqlLog == "1") g_AppCfg.itsdb.bSqlLog = true; //½Ã¼³¹° ¾ÆÀÌÄÜ °æ·Î ·Îµù¤§ LoadIcon(pIniFile, "VMS", "ICON_N", g_AppCfg.vms.ICON[icon_n]); LoadIcon(pIniFile, "VMS", "ICON_E", g_AppCfg.vms.ICON[icon_e]); LoadIcon(pIniFile, "VMS", "ICON_M", g_AppCfg.vms.ICON[icon_m]); LoadIcon(pIniFile, "VMS", "ICON_R", g_AppCfg.vms.ICON[icon_r]); LoadIcon(pIniFile, "VMS", "ICON_S", g_AppCfg.vms.ICON[icon_s]); LoadIcon(pIniFile, "VDS", "ICON_N", g_AppCfg.vds.ICON[icon_n]); LoadIcon(pIniFile, "VDS", "ICON_E", g_AppCfg.vds.ICON[icon_e]); LoadIcon(pIniFile, "VDS", "ICON_M", g_AppCfg.vds.ICON[icon_m]); LoadIcon(pIniFile, "VDS", "ICON_R", g_AppCfg.vds.ICON[icon_r]); LoadIcon(pIniFile, "VDS", "ICON_S", g_AppCfg.vds.ICON[icon_s]); CenterId = pIniFile->ReadString("CENTER", "CENTERID", "L01"); CenterName = pIniFile->ReadString("CENTER", "CENTERNAME", "Áß¾Ó¼¾ÅÍ"); CenterCd = String(StrToInt(CenterId.SubString(2, 2))); // GIS ¼³Á¤Á¤º¸ ·Îµù g_GisInfo.sApiKey = pIniFile->ReadString ("MAP", "APIKEY", ""); g_GisInfo.nZoomLevel = pIniFile->ReadInteger("MAP", "INITZOOM", 11); g_GisInfo.nMinZoom = pIniFile->ReadInteger("MAP", "MINZOOM", 1); g_GisInfo.nMaxZoom = pIniFile->ReadInteger("MAP", "MAXZOOM", 19); g_GisInfo.nFacilityZoom = pIniFile->ReadInteger("MAP", "FACILITYZOOM", 14); g_GisInfo.dCenterX = pIniFile->ReadString ("MAP", "CENTERX", "33.3536449").ToDouble(); g_GisInfo.dCenterY = pIniFile->ReadString ("MAP", "CENTERY", "126.5278103").ToDouble(); } __finally { if (pIniFile) delete pIniFile; pIniFile = NULL; WriteConfigInfo(sIniFile, "AUTOLOGOUT", "LOGOUTEXIT", "0"); } return true; } //--------------------------------------------------------------------------- bool CMM_InsertLoginHist(PLOGININFO pLogin, bool ALogin) { String sQry; bool bResult= false; TADOQuery *adoQry = NULL; if (!pLogin) return false; if (ALogin) { sQry = "INSERT INTO TB_USER_CNNC_HS( \r\n" " LOGIN_HMS, \r\n" " USER_ID, \r\n" " LOGOUT_HMS \r\n" " ) \r\n" "VALUES ( \r\n" " :p01, \r\n" " :p02, \r\n" " NULL \r\n" " ) \r\n"; } else { sQry = "UPDATE TB_USER_CNNC_HS SET \r\n" " LOGOUT_HMS = TO_CHAR(SYSDATE, 'YYYYMMDDHH24MISS') \r\n" " WHERE LOGIN_HMS = :p01 \r\n" " AND USER_ID = :p02 \r\n"; } try { try { adoQry = new TADOQuery(NULL); adoQry->Connection = ITSDb_GetConnection(); ITSDb_GetConnection()->BeginTrans(); adoQry->Close(); adoQry->SQL->Text = sQry; adoQry->Parameters->ParamByName("p01")->Value = pLogin->sLoginTime; adoQry->Parameters->ParamByName("p02")->Value = pLogin->sUserId; int nRowCnt = adoQry->ExecSQL(); ITSDb_GetConnection()->CommitTrans(); bResult = nRowCnt > 1 ? true : false; } catch (Exception &exception) { ITSDb_GetConnection()->RollbackTrans(); throw Exception(String(exception.ClassName()) + exception.Message); } catch (...) { ITSDb_GetConnection()->RollbackTrans(); } } __finally { if (adoQry) { adoQry->Close(); delete adoQry; } } return bResult; } //--------------------------------------------------------------------------- bool ITSLoginProc(String sConnSystem, String sDefUser, TComponent *Owner) { bool bResult= false; PLOGININFO pLogin = ITSDb_GetLoginInfo(); if (NULL == pLogin) return bResult; FRMLogin = new TFRMLogin(Owner); if (FRMLogin) { FRMLogin->EdUserID->Text = sDefUser; FRMLogin->ShowModal(); pLogin->bLogin = FRMLogin->m_bLogin; if (pLogin->bLogin) { pLogin->sUserId = FRMLogin->m_sUserID; pLogin->sUserName = FRMLogin->m_sUserName; pLogin->sUserRightId = FRMLogin->m_sUserRightID; pLogin->sUserRightName = FRMLogin->m_sUserRightName; pLogin->sConnSystem = sConnSystem; pLogin->sLoginIp = FRMLogin->GetLocalIp(); pLogin->sLoginTime = FRMLogin->m_sLoginTime; } else { pLogin->sUserId = "default"; pLogin->sUserName = "default"; pLogin->sUserRightId = "1"; pLogin->sUserRightName = ""; pLogin->sConnSystem = "OPR"; pLogin->sLoginSeq = "0"; pLogin->sLoginIp = "127.0.0.1"; pLogin->sLoginTime = Now().FormatString("yyyymmddhhnnss"); } delete FRMLogin; FRMLogin = NULL; bResult = pLogin->bLogin; } else { bResult = false; } if (bResult) CMM_InsertLoginHist(pLogin, true); return bResult; } //--------------------------------------------------------------------------- void ITSLogoutProc() { PLOGININFO pLogin = ITSDb_GetLoginInfo(); if (pLogin) { if (pLogin->bLogin) CMM_InsertLoginHist(pLogin, false); pLogin->bLogin = false; } } //--------------------------------------------------------------------------- int UserLogin() { if (ITSLoginProc("OPR", g_AppCfg.sDefUseId, Application)) { g_pLOGIN = ITSDb_GetLoginInfo(); if (g_pLOGIN) WriteConfigInfo(g_AppCfg.sConfigFile, "APPLICATION", "LASTUSER", g_pLOGIN->sUserId); } return g_pLOGIN == NULL ? 0 : 1; } //--------------------------------------------------------------------------- int UserLogout() { if (g_pLOGIN) WriteConfigInfo(g_AppCfg.sConfigFile, "APPLICATION", "LASTUSER", g_pLOGIN->sUserId); if (g_AppCfg.AutoLogout.LogoutExit) WriteConfigInfo(g_AppCfg.sConfigFile, "AUTOLOGOUT", "LOGOUTEXIT", "1"); else WriteConfigInfo(g_AppCfg.sConfigFile, "AUTOLOGOUT", "LOGOUTEXIT", "0"); ITSLogoutProc(); g_pLOGIN = NULL; return 0; } //--------------------------------------------------------------------------- /* * ȯ°æ¼³Á¤ Á¤º¸¸¦ ÀúÀåÇÏ´Â ÇÔ¼ö. * arguments * String : RegisterKey ¶Ç´Â ÆÄÀÏÀ̸§ * return * bool : ½ÇÆÐÇϸé false */ bool WriteConfigInfo(String sCfgFile, String sTitle, String sItem, String sValue) { String ConfigFile; TIniFile *pIniFile = NULL; ConfigFile = sCfgFile; try { pIniFile = new TIniFile(ConfigFile); if (pIniFile == NULL) { return false; } pIniFile->WriteString(sTitle, sItem, sValue); } catch(...) { } if (pIniFile) { pIniFile->Free(); pIniFile = NULL; } return true; } //--------------------------------------------------------------------------- /* * ȯ°æ¼³Á¤ Á¤º¸¸¦ Àоî¿À´Â ÇÔ¼ö. * arguments * String : RegisterKey ¶Ç´Â ÆÄÀÏÀ̸§ * return * bool : ½ÇÆÐÇϸé false */ bool ReadConfigInfo(String sCfgFile, String sTitle, String sItem, String &sValue) { bool bRes; String ConfigFile; TIniFile *pIniFile = NULL; bRes = false; ConfigFile = sCfgFile; try { pIniFile = new TIniFile(ConfigFile); if (pIniFile == NULL) { return bRes; } sValue = pIniFile->ReadString(sTitle, sItem, ""); if (sValue != "") { bRes = true; } } catch(...) { } if (pIniFile) { pIniFile->Free(); pIniFile = NULL; } return bRes; } //--------------------------------------------------------------------------- void ShowErrorMsg(String ATitle, String AErrMsg) { Application->NormalizeTopMosts(); Application->MessageBox(AErrMsg.c_str(), ATitle.c_str(), MB_OK|MB_ICONERROR|MB_APPLMODAL); Application->RestoreTopMosts(); } //---------------------------------------------------------------------------- String APP_FillCode(TcxComboBox *ACombo, String ACode) { String sReturn = ""; ACombo->Properties->Items->Clear(); TItsCode *FCodeRMF = ItsCodeManager->FLists.Find(ACode); if (FCodeRMF) { FOR_STL(TItsSubCode *, pSubCode, FCodeRMF->FSubLists) { if (pSubCode->USE_YN == "N") continue; ACombo->Properties->Items->Add(" [" + pSubCode->CMMN_CD + "] " + pSubCode->CMMN_CD_KOR_NM); if (sReturn == "") { sReturn = " [" + pSubCode->CMMN_CD + "] " + pSubCode->CMMN_CD_KOR_NM; } } } ACombo->ItemIndex = 0; return sReturn; } //---------------------------------------------------------------------------- String APP_GetCode(TcxComboBox *ACombo) { String sReturn = ""; if (ACombo->ItemIndex >= 0) { String sDesc = ACombo->Properties->Items->Strings[ACombo->ItemIndex]; String sCode = sDesc.SubString(sDesc.Pos("[") + 1, sDesc.Pos("]") - (sDesc.Pos("[") + 1)); sReturn = sCode; } return sReturn; } //---------------------------------------------------------------------------- String APP_GetCodeDesc(TcxComboBox *ACombo, String ACode) { String sReturn = ""; for (int ii = 0; ii < ACombo->Properties->Items->Count; ii++) { String sDesc = ACombo->Properties->Items->Strings[ii]; String sCode = sDesc.SubString(sDesc.Pos("[") + 1, sDesc.Pos("]") - (sDesc.Pos("[") + 1)); if (ACode == sCode) { sReturn = sDesc; break; } } return sReturn; } //---------------------------------------------------------------------------- String APP_GetCodeName(TcxComboBox *ACombo, String ACode) { String sReturn = ""; for (int ii = 0; ii < ACombo->Properties->Items->Count; ii++) { String sDesc = ACombo->Properties->Items->Strings[ii]; String sName = sDesc.SubString(sDesc.Pos("]") + 1, sDesc.Length()); String sCode = sDesc.SubString(sDesc.Pos("[") + 1, sDesc.Pos("]") - (sDesc.Pos("[") + 1)); if (ACode == sCode) { sReturn = sName.Trim(); break; } } return sReturn; } //---------------------------------------------------------------------------- String APP_GetCodeIdByName(TcxComboBox *ACombo, String AName) { String sReturn = "3"; for (int ii = 0; ii < ACombo->Properties->Items->Count; ii++) { String sDesc = ACombo->Properties->Items->Strings[ii]; String sName = sDesc.SubString(sDesc.Pos("]") + 1, sDesc.Length()); String sCode = sDesc.SubString(sDesc.Pos("[") + 1, sDesc.Pos("]") - (sDesc.Pos("[") + 1)); if (sName.Trim() == AName.Trim()) { sReturn = sCode; break; } } return sReturn; } //---------------------------------------------------------------------------- String APP_GetCodeDefCode(TcxComboBox *ACombo) { String sReturn = ""; if (ACombo->Properties->Items->Count > 0) { String sDesc = ACombo->Properties->Items->Strings[0]; String sCode = sDesc.SubString(sDesc.Pos("[") + 1, sDesc.Pos("]") - (sDesc.Pos("[") + 1)); sReturn = sCode; } return sReturn; } //---------------------------------------------------------------------------- String APP_GetCodeDefDesc(TcxComboBox *ACombo) { String sReturn = ""; if (ACombo->Properties->Items->Count > 0) { String sDesc = ACombo->Properties->Items->Strings[0]; sReturn = sDesc; } return sReturn; } //---------------------------------------------------------------------------- int APP_SetCode(TcxComboBox *ACombo, String ACode) { int nItemIndex = -1; for (int ii = 0; ii < ACombo->Properties->Items->Count; ii++) { String sDesc = ACombo->Properties->Items->Strings[ii]; String sCode = sDesc.SubString(sDesc.Pos("[") + 1, sDesc.Pos("]") - (sDesc.Pos("[") + 1)); if (ACode == sCode) { nItemIndex = ii; break; } } ACombo->ItemIndex = nItemIndex; return nItemIndex; } //---------------------------------------------------------------------------- ULONG ProcIDFromWnd(HWND hwnd) // À©µµ¿ì ÇÚµé·Î ÇÁ·Î¼¼½º ¾ÆÀ̵ð ¾ò±â { ULONG idProc; GetWindowThreadProcessId( hwnd, &idProc ); return idProc; } //---------------------------------------------------------------------------- HWND GetWinHandle(ULONG pid) // ÇÁ·Î¼¼½º ¾ÆÀ̵ð·Î À©µµ¿ì ÇÚµé ¾ò±â { HWND tempHwnd = FindWindow(NULL,NULL); // ÃÖ»óÀ§ À©µµ¿ì ÇÚµé ã±â while( tempHwnd != NULL ) { if( GetParent(tempHwnd) == NULL ) // ÃÖ»óÀ§ ÇÚµéÀÎÁö üũ, ¹öư µîµµ ÇÚµéÀ» °¡Áú ¼ö ÀÖÀ¸¹Ç·Î ¹«½ÃÇϱâ À§ÇØ if( pid == ProcIDFromWnd(tempHwnd) ) return tempHwnd; tempHwnd = GetWindow(tempHwnd, GW_HWNDNEXT); // ´ÙÀ½ À©µµ¿ì ÇÚµé ã±â } return NULL; } //---------------------------------------------------------------------------- String ITSUtil_FormatStr(String AStrDateTime, String AFormat) { #define SYEAR "-" #define STIME ":" #define SPACE " " String sDateTime = ""; String sInData = AnsiString(AStrDateTime); //ShowMessage("IN: " + AStrDateTime + " " + sInData + " " + AFormat); if (sInData.IsEmpty()) return sInData; //sDateTime = sInData; try { if (AFormat == STR_DATETIME) { if (sInData.Length() < 14) return sInData; sDateTime = sInData.SubString( 1, 4) + SYEAR + sInData.SubString( 5, 2) + SYEAR + sInData.SubString( 7, 2) + SPACE + sInData.SubString( 9, 2) + STIME + sInData.SubString(11, 2) + STIME + sInData.SubString(13, 2); } else if (AFormat == STR_HHNN) { if (sInData.Length() < 12) return sInData; sDateTime = sInData.SubString( 1, 4) + SYEAR + sInData.SubString( 5, 2) + SYEAR + sInData.SubString( 7, 2) + SPACE + sInData.SubString( 9, 2) + STIME + sInData.SubString(11, 2); } else if (AFormat == STR_DATEHOUR) { if (sInData.Length() < 10) return sInData; sDateTime = sInData.SubString( 1, 4) + SYEAR + sInData.SubString( 5, 2) + SYEAR + sInData.SubString( 7, 2) + SPACE + sInData.SubString( 9, 2); } else if (AFormat == STR_DATE) { if (sInData.Length() < 8) return sInData; sDateTime = sInData.SubString( 1, 4) + SYEAR + sInData.SubString( 5, 2) + SYEAR + sInData.SubString( 7, 2); } else if (AFormat == STR_MM) { if (sInData.Length() < 6) return sInData; sDateTime = sInData.SubString( 1, 4) + SYEAR + sInData.SubString( 5, 2); } else { sDateTime = sInData; } } catch(...) { } //ShowMessage("OUT: " + sDateTime); return sDateTime; } //--------------------------------------------------------------------------- TColor g_DispColor[MAX_DISPCOLOR]; void APP_InitDisplayColor() { g_DispColor[ 0] = Graphics::clBlue; g_DispColor[ 1] = Graphics::clRed; g_DispColor[ 2] = Graphics::clLime; g_DispColor[ 3] = Graphics::clMaroon; g_DispColor[ 4] = Graphics::clGreen; g_DispColor[ 5] = Graphics::clMenuHighlight; g_DispColor[ 6] = Graphics::clBackground; g_DispColor[ 7] = Graphics::clPurple; g_DispColor[ 8] = Graphics::clTeal; g_DispColor[ 9] = Graphics::clYellow; g_DispColor[10] = Graphics::clFuchsia; g_DispColor[11] = Graphics::clAqua; g_DispColor[12] = Graphics::clMoneyGreen; g_DispColor[13] = Graphics::clSkyBlue; g_DispColor[14] = Graphics::clRed; g_DispColor[15] = Graphics::clLime; g_DispColor[16] = Graphics::clYellow; g_DispColor[17] = Graphics::clBlue; g_DispColor[18] = Graphics::clFuchsia; g_DispColor[19] = Graphics::clAqua; g_DispColor[20] = Graphics::clMoneyGreen; g_DispColor[21] = Graphics::clActiveCaption; } //--------------------------------------------------------------------------- TColor APP_GetDisplayColor(int ASeq) { return g_DispColor[ASeq % MAX_DISPCOLOR]; } //--------------------------------------------------------------------------- void APP_DelVmsSizeCombo(TcxComboBox *cboBox) { TStrings *pStrItems; TVmsSizeType *Ov; pStrItems = ((TcxComboBox *)cboBox)->Properties->Items; for (int ii = pStrItems->Count-1; ii >= 0; ii--) { Ov = (TVmsSizeType *)pStrItems->Objects[ii]; if (Ov != NULL) { delete Ov; Ov = NULL; } } } //--------------------------------------------------------------------------- void APP_FillVmsSizeType(TcxComboBox *cboBox, String AType, bool bAddAll/*=false*/) { String sQry; TStrings *pStrItems; TADOQuery *pADO = NULL; APP_DelVmsSizeCombo(cboBox); pStrItems = ((TcxComboBox *)cboBox)->Properties->Items; ((TcxComboBox *)cboBox)->Properties->Items->Clear(); sQry = "SELECT CMMN_CD, \r\n" " CMMN_CD_KOR_NM, \r\n" " NVL(ATRB1, '320') AS FORMW, \r\n" " NVL(ATRB2, '64') AS FORMH \r\n" " FROM TB_CMMN_CD \r\n" " WHERE CMMN_CLSF_CD = 'VMP' \r\n" " AND USE_YN = 'Y' \r\n" " AND CMMN_CD IN (SELECT DISTINCT VMS_TYPE_CD \r\n" " FROM TB_VMS_CTLR) \r\n" //" WHERE VMS_USAG_TYPE_CD = :p01) \r\n" " ORDER BY CMMN_CD DESC \r\n"; try { try { pADO = new TADOQuery(NULL); pADO->Close(); pADO->Connection = ITSDb_GetConnection(); ITSDb_SQLText(pADO, sQry); //ITSDb_SQLBind(pADO, "p01", AType); ITSDb_SQLOpen(pADO); for( ; !pADO->Eof; pADO->Next()) { String sTypeCd = pADO->FieldByName("CMMN_CD")->AsString; String sTypeNm = pADO->FieldByName("CMMN_CD_KOR_NM")->AsString; String sWidth = pADO->FieldByName("FORMW")->AsString; String sHeight = pADO->FieldByName("FORMH")->AsString; int nW = sWidth.ToIntDef(384); int nH = sHeight.ToIntDef(64); pStrItems->AddObject(" [" + sTypeCd + "] " + sTypeNm + " (" + String(nW) + "x" + String(nH) + ")", new TVmsSizeType(sTypeCd, sTypeNm, nW, nH) ); } if (bAddAll) { String sAllName = "Àüü"; pStrItems->AddObject(" [ALL] Àüü" , new TVmsSizeType("ALL", sAllName, 384, 64)); } cboBox->ItemIndex = 0; } catch(EDatabaseError &E) { DBERRORMSG("APP_FillVmsSizeType", String(E.ClassName()), E.Message, sQry); throw Exception(String(E.ClassName()) + E.Message); } catch(Exception &exception) { DBERRORMSG("APP_FillVmsSizeType", String(exception.ClassName()), exception.Message, sQry); throw Exception(String(exception.ClassName()) + exception.Message); } } __finally { if (pADO) { pADO->Close(); delete pADO; } } } //--------------------------------------------------------------------------- TVmsSizeType* APP_GetVmsSizeTypeObject(TcxComboBox *cboBox) { TStrings *pStrItems; TVmsSizeType *Ov = NULL; int nItemIndex; pStrItems = ((TcxComboBox *)cboBox)->Properties->Items; nItemIndex= ((TcxComboBox *)cboBox)->ItemIndex; if (nItemIndex < 0) { return Ov; } Ov = (TVmsSizeType *)pStrItems->Objects[nItemIndex]; if (Ov == NULL) { Ov = NULL; } return Ov; } //--------------------------------------------------------------------------- void APP_ImageClear(TCanvas *c, int offX, int offY, int w, int h, TColor color) { try { c->Pen->Color = clWhite; c->Pen->Width = 0; c->Pen->Style = psClear; c->Brush->Style = bsSolid; c->Brush->Color = color; c->Rectangle(offX, offY, w+offX+2, h+offY+2); } catch(...) { } } //--------------------------------------------------------------------------- #include TDateTime APP_StrToDateTime(String AStrDateTime) { TDateTime dtReturnValue = NULL; if (AStrDateTime.IsEmpty()) return dtReturnValue; if (AStrDateTime.Length() != 14) return dtReturnValue; AnsiString sDateTime = AnsiString(AStrDateTime); try { #if 0 sDateTime.printf(L"%s-%s-%s %s:%s:%s", AStrDateTime.SubString( 1, 4).c_str(), AStrDateTime.SubString( 5, 2).c_str(), AStrDateTime.SubString( 7, 2).c_str(), AStrDateTime.SubString( 9, 2).c_str(), AStrDateTime.SubString(11, 2).c_str(), AStrDateTime.SubString(13, 2).c_str()); dtReturnValue = StrToDateTime(sDateTime); #endif // swscanf(sRgb.c_str(), L"%d,%d,%d", &r, &g, &b); int year, month, day, hour, minute, second; sscanf(sDateTime.c_str(), "%4d%2d%2d%2d%2d%2d", &year, &month, &day, &hour, &minute, &second); dtReturnValue = EncodeDateTime(year, month, day, hour, minute, second, 0); } catch(...) { } return dtReturnValue; } //---------------------------------------------------------------------------