VMSM510MF_OLD.cpp 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #include <IOUtils.hpp>
  4. #include "ITSSkinF.h"
  5. #include "ITSUtilF.h"
  6. #include "AppGlobalF.h"
  7. #pragma hdrstop
  8. #include "VMSM510MF_OLD.h"
  9. //---------------------------------------------------------------------------
  10. #pragma package(smart_init)
  11. #pragma link "cxButtons"
  12. #pragma link "cxCalendar"
  13. #pragma link "cxContainer"
  14. #pragma link "cxControls"
  15. #pragma link "cxDropDownEdit"
  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 "cxMaskEdit"
  23. #pragma link "cxPC"
  24. #pragma link "cxPCdxBarPopupMenu"
  25. #pragma link "cxSpinEdit"
  26. #pragma link "cxSplitter"
  27. #pragma link "cxTextEdit"
  28. #pragma link "cxTimeEdit"
  29. #pragma link "dxSkinBlack"
  30. #pragma link "dxSkinBlue"
  31. #pragma link "dxSkinCaramel"
  32. #pragma link "dxSkinCoffee"
  33. #pragma link "dxSkinDarkRoom"
  34. #pragma link "dxSkinDarkSide"
  35. #pragma link "dxSkinFoggy"
  36. #pragma link "dxSkinGlassOceans"
  37. #pragma link "dxSkiniMaginary"
  38. #pragma link "dxSkinLilian"
  39. #pragma link "dxSkinLiquidSky"
  40. #pragma link "dxSkinLondonLiquidSky"
  41. #pragma link "dxSkinMcSkin"
  42. #pragma link "dxSkinMoneyTwins"
  43. #pragma link "dxSkinOffice2007Black"
  44. #pragma link "dxSkinOffice2007Blue"
  45. #pragma link "dxSkinOffice2007Green"
  46. #pragma link "dxSkinOffice2007Pink"
  47. #pragma link "dxSkinOffice2007Silver"
  48. #pragma link "dxSkinOffice2010Black"
  49. #pragma link "dxSkinOffice2010Blue"
  50. #pragma link "dxSkinOffice2010Silver"
  51. #pragma link "dxSkinsCore"
  52. #pragma link "dxSkinscxPCPainter"
  53. #pragma link "dxSkinSeven"
  54. #pragma link "dxSkinSharp"
  55. #pragma link "dxSkinSilver"
  56. #pragma link "dxSkinStardust"
  57. #pragma link "cxRadioGroup"
  58. #pragma link "cxClasses"
  59. #pragma link "cxCustomData"
  60. #pragma link "cxData"
  61. #pragma link "cxDataStorage"
  62. #pragma link "cxDBData"
  63. #pragma link "cxFilter"
  64. #pragma link "cxGrid"
  65. #pragma link "cxGridCustomTableView"
  66. #pragma link "cxGridCustomView"
  67. #pragma link "cxGridDBTableView"
  68. #pragma link "cxGridLevel"
  69. #pragma link "cxGridTableView"
  70. #pragma link "cxStyles"
  71. #pragma link "cxCheckBox"
  72. #pragma link "cxImage"
  73. #pragma link "cxButtonEdit"
  74. #pragma link "cxBlobEdit"
  75. #pragma resource "*.dfm"
  76. TVMSM510M_OLD *VMSM510M_OLD = NULL;
  77. //---------------------------------------------------------------------------
  78. __fastcall TVMSM510M_OLD::TVMSM510M_OLD(TComponent* Owner)
  79. : TForm(Owner)
  80. {
  81. ITSSkin_Load(this);
  82. //CMM_LoadForm(g_sFormsDir, this);
  83. FUpdate= false;
  84. FTitle = Caption;//"VMS 객체이미지 선택";
  85. FListSymb = new TList;
  86. EditMode = false;
  87. m_bSelected = false;
  88. TvList->OptionsView->DataRowHeight = 0;
  89. TvList->OptionsView->CellAutoHeight = true;
  90. TvList->OptionsView->Indicator = true;
  91. TvList->OptionsCustomize->ColumnMoving = false;
  92. TvList->OptionsCustomize->ColumnSorting = false;
  93. TvList->Columns[0]->Width = 50;
  94. TvList->Columns[0]->Options->HorzSizing = false;
  95. }
  96. //---------------------------------------------------------------------------
  97. void __fastcall TVMSM510M_OLD::CommClose()
  98. {
  99. try
  100. {
  101. ClearSymbloList();
  102. SAFE_DELETE(FListSymb);
  103. //CMM_SaveForm(g_sFormsDir, this);
  104. }
  105. catch(...)
  106. {
  107. }
  108. }
  109. //---------------------------------------------------------------------------
  110. void __fastcall TVMSM510M_OLD::FormShow(TObject *Sender)
  111. {
  112. Refresh();
  113. FormInit();
  114. TmrShow->Enabled = true;
  115. }
  116. //---------------------------------------------------------------------------
  117. void __fastcall TVMSM510M_OLD::FormInit()
  118. {
  119. EdNmbr->Text = "";
  120. EdImagePath->Text = "";
  121. ImgPreView->Picture->Bitmap->FreeImage();
  122. ImgPreView->Picture->Bitmap = NULL;
  123. FNewDb = false;
  124. }
  125. //---------------------------------------------------------------------------
  126. void __fastcall TVMSM510M_OLD::TmrShowTimer(TObject *Sender)
  127. {
  128. TmrShow->Enabled = false;
  129. LoadImageSymbol();
  130. }
  131. //---------------------------------------------------------------------------
  132. void __fastcall TVMSM510M_OLD::BtnCloseClick(TObject *Sender)
  133. {
  134. Close();
  135. }
  136. //---------------------------------------------------------------------------
  137. void __fastcall TVMSM510M_OLD::FormClose(TObject *Sender, TCloseAction &Action)
  138. {
  139. CommClose();
  140. VMSM510M = NULL;
  141. Action = caFree;
  142. }
  143. //---------------------------------------------------------------------------
  144. void __fastcall TVMSM510M_OLD::FormCloseQuery(TObject *Sender, bool &CanClose)
  145. {
  146. //
  147. }
  148. //---------------------------------------------------------------------------
  149. void __fastcall TVMSM510M_OLD::DisplayInfo()
  150. {
  151. FormInit();
  152. int nRow = TvList->DataController->FocusedRecordIndex;
  153. if( nRow <= -1 )
  154. return;
  155. TcxGridDataController *pDc = TvList->DataController;
  156. nRow = pDc->FocusedRecordIndex;
  157. if (nRow < FListSymb->Count)
  158. {
  159. Graphics::TBitmap *bitmap = (Graphics::TBitmap*)FListSymb->Items[nRow];
  160. ImgPreView->Picture->Bitmap->Assign(bitmap);
  161. }
  162. EdNmbr->Text = VarToStr(pDc->Values[nRow][ColLink1->Index]);
  163. EdImagePath->Text = VarToStr(pDc->Values[nRow][ColImagePath->Index]);
  164. }
  165. //---------------------------------------------------------------------------
  166. void __fastcall TVMSM510M_OLD::ClearSymbloList()
  167. {
  168. for(int ii = 0; ii < FListSymb->Count; ii++)
  169. {
  170. Graphics::TBitmap *bitmap = (Graphics::TBitmap *)FListSymb->Items[ii];
  171. delete bitmap;
  172. }
  173. FListSymb->Clear();
  174. }
  175. //---------------------------------------------------------------------------
  176. void __fastcall TVMSM510M_OLD::LoadImageSymbol()
  177. {
  178. FormInit();
  179. CMM_ClearGridTableView(TvList);
  180. ClearSymbloList();
  181. String sQry;
  182. TADOQuery *pADO = NULL;
  183. #if 0
  184. if (FImageType == 1) //이미지 심볼
  185. {
  186. sQry = "SELECT SYMB_LIB_NMBR, \r\n"
  187. " IMAG_DATA, \r\n"
  188. " SYMB_EXPL, SYMB_FILE_NM, SYMB_TYPE \r\n"
  189. " FROM TB_VMS_SYMB_LIB \r\n"
  190. " WHERE SYMB_LIB_NMBR BETWEEN 6000 AND 6999 \r\n"
  191. " AND DEL_YN = 'N' \r\n"
  192. " AND SYMB_TYPE = '" + SYMB_TYPE + "' \r\n"
  193. " ORDER BY SYMB_LIB_NMBR \r\n";
  194. }
  195. else
  196. if (FImageType == 2) //소통정보이미지
  197. {
  198. sQry = "SELECT SYMB_LIB_NMBR, \r\n"
  199. " IMAG_DATA, \r\n"
  200. " SYMB_EXPL, SYMB_FILE_NM, SYMB_TYPE \r\n"
  201. " FROM TB_VMS_SYMB_LIB \r\n"
  202. " WHERE SYMB_LIB_NMBR BETWEEN 8000 AND 8999 \r\n"
  203. " AND DEL_YN = 'N' \r\n"
  204. " ORDER BY SYMB_LIB_NMBR \r\n";
  205. }
  206. else
  207. if (FImageType == 3) //소통정보배경이미지
  208. {
  209. sQry = "SELECT SYMB_LIB_NMBR, \r\n"
  210. " IMAG_DATA, \r\n"
  211. " SYMB_EXPL, SYMB_FILE_NM, SYMB_TYPE \r\n"
  212. " FROM TB_VMS_SYMB_LIB \r\n"
  213. " WHERE SYMB_LIB_NMBR BETWEEN 7000 AND 7999 \r\n"
  214. " AND DEL_YN = 'N' \r\n"
  215. " ORDER BY SYMB_LIB_NMBR \r\n";
  216. }
  217. else
  218. if (FImageType == 4) //동영상, 5: 스트리밍영상
  219. {
  220. sQry = "SELECT SYMB_LIB_NMBR, \r\n"
  221. " IMAG_DATA, \r\n"
  222. " SYMB_EXPL, SYMB_FILE_NM, SYMB_TYPE \r\n"
  223. " FROM TB_VMS_SYMB_LIB \r\n"
  224. " WHERE SYMB_LIB_NMBR BETWEEN 5000 AND 5999 \r\n"
  225. " AND DEL_YN = 'N' \r\n"
  226. " ORDER BY SYMB_LIB_NMBR \r\n";
  227. }
  228. else return;
  229. #else
  230. sQry = "SELECT T.VMS_FORM_OBJ_ID, \r\n"
  231. " T.PICT_DATA, \r\n"
  232. " T.PICT_NM, \r\n"
  233. " T.PICT_EXT \r\n"
  234. " FROM TB_VMS_FORM_OBJ_PICT T \r\n"
  235. " WHERE 1=1 \r\n"
  236. " AND T.USE_YN = 'Y' \r\n"
  237. " ORDER BY T.VMS_FORM_OBJ_ID \r\n";
  238. #endif
  239. int nRowHeight = 0;
  240. try
  241. {
  242. int nRow;
  243. TcxDataController *pGDC = TvList->DataController;
  244. TvList->BeginUpdate();
  245. try
  246. {
  247. pADO = new TADOQuery(NULL);
  248. pADO->Close();
  249. pADO->Connection = ITSDb_GetConnection();
  250. ITSDb_SQLText(pADO, sQry);
  251. ITSDb_SQLOpen(pADO);
  252. String imageFilePath;
  253. String saveDirPath = TPath::GetTempPath() + "VMS\\";
  254. ForceDirectories(saveDirPath.c_str());
  255. for( ; !pADO->Eof; pADO->Next())
  256. {
  257. nRow = pGDC->AppendRecord();
  258. String VMS_FORM_OBJ_ID = pADO->FieldByName("VMS_FORM_OBJ_ID")->AsString;
  259. String PICT_EXT = pADO->FieldByName("PICT_EXT")->AsString;
  260. pGDC->Values[nRow][ColLink1->Index] = VMS_FORM_OBJ_ID;
  261. pGDC->Values[nRow][ColLink2->Index] = pADO->FieldByName("PICT_DATA")->AsVariant;
  262. pGDC->Values[nRow][ColLink3->Index] = pADO->FieldByName("PICT_NM")->AsString;
  263. pGDC->Values[nRow][ColLink4->Index] = PICT_EXT;
  264. TMemoryStream *pImgStream = new TMemoryStream();
  265. pImgStream->LoadFromStream(pADO->CreateBlobStream(pADO->FieldByName("PICT_DATA"), bmRead));
  266. imageFilePath = saveDirPath + VMS_FORM_OBJ_ID + "." + PICT_EXT;
  267. pImgStream->SaveToFile(imageFilePath);
  268. SAFE_DELETE(pImgStream);
  269. pGDC->Values[nRow][ColImagePath->Index] = imageFilePath;
  270. #if 0
  271. /* 이미지를 가지고 가는 곳에서 이것을 참조하기 때문에 주석으로 막지 말자.... */
  272. Graphics::TBitmap *bitmap = new Graphics::TBitmap;
  273. bitmap->LoadFromStream(pADO->CreateBlobStream(pADO->FieldByName("IMAG_DATA"), bmRead));
  274. FListSymb->Add(bitmap);
  275. if (bitmap->Height+2 > nRowHeight) nRowHeight = bitmap->Height+3;
  276. #endif
  277. }
  278. }
  279. catch(EDatabaseError &E)
  280. {
  281. DBERRORMSG("TVMSM510M::LoadImageSymbol", String(E.ClassName()), E.Message, sQry);
  282. throw Exception(String(E.ClassName()) + E.Message);
  283. }
  284. catch(Exception &e)
  285. {
  286. DBERRORMSG("TVMSM510M::LoadImageSymbol", String(e.ClassName()), e.Message, sQry);
  287. throw Exception(String(e.ClassName()) + e.Message);
  288. }
  289. }
  290. __finally
  291. {
  292. if (pADO)
  293. {
  294. pADO->Close();
  295. delete pADO;
  296. }
  297. //TvList->OptionsView->DataRowHeight = nRowHeight;
  298. TvList->EndUpdate();
  299. }
  300. }
  301. //---------------------------------------------------------------------------
  302. void __fastcall TVMSM510M_OLD::TvListCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo,
  303. TMouseButton AButton, TShiftState AShift,
  304. bool &AHandled)
  305. {
  306. if (!ACellViewInfo) return;
  307. DisplayInfo();
  308. Sleep(200);
  309. BtnSelImageClick((TObject*)BtnSelImage);
  310. }
  311. //---------------------------------------------------------------------------
  312. void __fastcall TVMSM510M_OLD::TvListFocusedRecordChanged(TcxCustomGridTableView *Sender,
  313. TcxCustomGridRecord *APrevFocusedRecord, TcxCustomGridRecord *AFocusedRecord,
  314. bool ANewItemRecordFocusingChanged)
  315. {
  316. if (!AFocusedRecord) return;
  317. DisplayInfo();
  318. }
  319. //---------------------------------------------------------------------------
  320. void __fastcall TVMSM510M_OLD::BtnSelImageClick(TObject *Sender)
  321. {
  322. if (EdNmbr->Text == "" || EdImagePath->Text == "")
  323. {
  324. Application->MessageBox(lblText1->Caption.c_str(),//L"VMS 객체이미지 선택\r\nVMS 객체이미지를 목록에서 선택하세요.",
  325. FTitle.c_str(),
  326. MB_OK|MB_ICONERROR|MB_APPLMODAL);
  327. return;
  328. }
  329. m_bSelected = true;
  330. Close();
  331. }
  332. //---------------------------------------------------------------------------