ITS0010MF.cpp 3.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #include "ITSSkinF.h"
  4. #include "ITSUtilF.h"
  5. #include "ITSDbF.h"
  6. #include "AppGlobalF.h"
  7. #include "ITSLangTransF.h"
  8. #pragma hdrstop
  9. #include "ITS0010MF.h"
  10. //---------------------------------------------------------------------------
  11. #pragma package(smart_init)
  12. #pragma link "FRAME_TrafficLinkListF"
  13. #pragma link "FRAME_TrafficRoadListF"
  14. #pragma link "FRAME_TrafficServiceLinkListF"
  15. #pragma link "cxButtons"
  16. #pragma link "cxContainer"
  17. #pragma link "cxControls"
  18. #pragma link "cxEdit"
  19. #pragma link "cxGraphics"
  20. #pragma link "cxGroupBox"
  21. #pragma link "cxLookAndFeelPainters"
  22. #pragma link "cxLookAndFeels"
  23. #pragma link "cxPC"
  24. #pragma link "cxPCdxBarPopupMenu"
  25. #pragma link "dxSkinBlack"
  26. #pragma link "dxSkinBlue"
  27. #pragma link "dxSkinsCore"
  28. #pragma link "dxSkinscxPCPainter"
  29. #pragma link "cxLabel"
  30. #pragma resource "*.dfm"
  31. TITS0010M *ITS0010M = NULL;
  32. //---------------------------------------------------------------------------
  33. __fastcall TITS0010M::TITS0010M(TComponent* Owner)
  34. : TForm(Owner)
  35. {
  36. LangTrans->Translate(this, ITSDb_GetConnection());
  37. ITSSkin_Load(this);
  38. CMM_LoadForm(g_sFormsDir, this);
  39. FRAMETrafficLinkList1->ChkDispExt->Visible = false;
  40. FRAMETrafficServiceLinkList1->ChkDispExt->Visible = false;
  41. FRAMETrafficRoadList1->ChkDispExt->Visible = false;
  42. }
  43. //---------------------------------------------------------------------------
  44. /*
  45. * 닫기버튼 이나 x버튼 클릭시 공통으로 처리하는 로직이들어간다..
  46. * Form과 DataModule class를 delete시킨다.
  47. * arguments
  48. *
  49. * return
  50. * void
  51. */
  52. void __fastcall TITS0010M::CommClose()
  53. {
  54. try
  55. {
  56. CMM_SaveForm(g_sFormsDir, this);
  57. }
  58. catch(...)
  59. {
  60. }
  61. }
  62. //---------------------------------------------------------------------------
  63. /*
  64. * Form을 보여줄때 호출되는 event 메서드이다.
  65. * arguments
  66. * Sender : event handler 객체
  67. * return
  68. * void
  69. */
  70. void __fastcall TITS0010M::FormShow(TObject *Sender)
  71. {
  72. Refresh();
  73. FormInit();
  74. TmrShow->Enabled = true;
  75. }
  76. //---------------------------------------------------------------------------
  77. /*
  78. * form 초기화
  79. *
  80. * arguments
  81. *
  82. * return
  83. * void
  84. */
  85. void __fastcall TITS0010M::FormInit()
  86. {
  87. }
  88. //---------------------------------------------------------------------------
  89. /*
  90. * Form이 Show되고 난 후 최초 1회 수행되는 타이머 이벤트
  91. * arguments
  92. * Sender : event handler 객체
  93. * return
  94. * void
  95. */
  96. void __fastcall TITS0010M::TmrShowTimer(TObject *Sender)
  97. {
  98. TmrShow->Enabled = false;
  99. RefreshData();
  100. }
  101. //---------------------------------------------------------------------------
  102. /*
  103. * Refresh Data Event Function
  104. * arguments
  105. *
  106. * return
  107. * void
  108. */
  109. void __fastcall TITS0010M::RefreshData()
  110. {
  111. // 검색조건에 의한 링크 데이터 조회
  112. try
  113. {
  114. FRAMETrafficLinkList1->UpdateList();
  115. FRAMETrafficServiceLinkList1->UpdateList();
  116. FRAMETrafficRoadList1->UpdateList();
  117. //cxGroupBox3->Caption = "▶ 현재 소통정보";// (최종가공시각: " + FRAMETrafficLinkList1->FLastAnsTime + ")";
  118. }
  119. __finally
  120. {
  121. }
  122. }
  123. //---------------------------------------------------------------------------
  124. /*
  125. * Close 버튼 클릭 이벤트 핸들러
  126. * arguments
  127. * Sender : event handler 객체
  128. * return
  129. * void
  130. */
  131. void __fastcall TITS0010M::BtnCloseClick(TObject *Sender)
  132. {
  133. Close();
  134. }
  135. //---------------------------------------------------------------------------
  136. void __fastcall TITS0010M::FormClose(TObject *Sender, TCloseAction &Action)
  137. {
  138. CommClose();
  139. ITS0010M = NULL;
  140. Action = caFree;
  141. }
  142. //---------------------------------------------------------------------------
  143. void __fastcall TITS0010M::BtnSearchClick(TObject *Sender)
  144. {
  145. Application->ProcessMessages();
  146. TSqlCursor sqlCrs((TControl*)BtnSearch);
  147. RefreshData();
  148. }
  149. //---------------------------------------------------------------------------