FRAME_DatabaseStatusF.cpp 4.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #include "ITSSkinF.h"
  4. #include "ITSUtilF.h"
  5. #include "AppGlobalF.h"
  6. #include "ITSLangTransF.h"
  7. #pragma hdrstop
  8. #include "FRAME_DatabaseStatusF.h"
  9. #include "CDSDatabaseF.h"
  10. //---------------------------------------------------------------------------
  11. #pragma package(smart_init)
  12. #pragma link "cxButtons"
  13. #pragma link "cxCalc"
  14. #pragma link "cxClasses"
  15. #pragma link "cxControls"
  16. #pragma link "cxCustomData"
  17. #pragma link "cxData"
  18. #pragma link "cxDataStorage"
  19. #pragma link "cxEdit"
  20. #pragma link "cxFilter"
  21. #pragma link "cxGraphics"
  22. #pragma link "cxGrid"
  23. #pragma link "cxGridCustomTableView"
  24. #pragma link "cxGridCustomView"
  25. #pragma link "cxGridLevel"
  26. #pragma link "cxGridTableView"
  27. #pragma link "cxLabel"
  28. #pragma link "cxLookAndFeelPainters"
  29. #pragma link "cxLookAndFeels"
  30. #pragma link "cxStyles"
  31. #pragma link "cxTextEdit"
  32. #pragma link "dxSkinBlack"
  33. #pragma link "dxSkinBlue"
  34. #pragma link "dxSkinsCore"
  35. #pragma link "dxSkinscxPCPainter"
  36. #pragma link "cxContainer"
  37. #pragma link "cxProgressBar"
  38. #pragma link "dxSkinMcSkin"
  39. #pragma resource "*.dfm"
  40. //TFRAMEDatabaseStatus *FRAMEDatabaseStatus;
  41. //---------------------------------------------------------------------------
  42. __fastcall TFRAMEDatabaseStatus::TFRAMEDatabaseStatus(TComponent* Owner)
  43. : TFrame(Owner)
  44. {
  45. LangTrans->Translate(this, ITSDb_GetConnection());
  46. m_pGDC = TvList->DataController;
  47. }
  48. //---------------------------------------------------------------------------
  49. void __fastcall TFRAMEDatabaseStatus::UpdateList()
  50. {
  51. CMM_ClearGridTableView(TvList);
  52. int nRow = 0;
  53. try
  54. {
  55. TvList->BeginUpdate();
  56. try
  57. {
  58. ItsDatabaseManager->FLists.Lock();
  59. FOR_STL(TItsDatabase*, pObj, ItsDatabaseManager->FLists)
  60. {
  61. if (pObj->Completed == false) continue;
  62. nRow = m_pGDC->AppendRecord();
  63. m_pGDC->Values[nRow][Column01->Index] = pObj->TABLESPACE_NAME;
  64. m_pGDC->Values[nRow][Column02->Index] = pObj->TOTAL_MB;
  65. m_pGDC->Values[nRow][Column03->Index] = pObj->USED_MB;
  66. m_pGDC->Values[nRow][Column04->Index] = pObj->USED_PERCENT;
  67. }
  68. }
  69. __finally
  70. {
  71. ItsDatabaseManager->FLists.UnLock();
  72. }
  73. }
  74. __finally
  75. {
  76. TvList->EndUpdate();
  77. TvList->DataController->GotoFirst();
  78. }
  79. }
  80. //---------------------------------------------------------------------------
  81. void __fastcall TFRAMEDatabaseStatus::RefreshList()
  82. {
  83. CMM_ClearGridTableView(TvList);
  84. int nRow = 0;
  85. try
  86. {
  87. TvList->BeginUpdate();
  88. try
  89. {
  90. ItsDatabaseManager->FLists.Lock();
  91. FOR_STL(TItsDatabase*, pObj, ItsDatabaseManager->FLists)
  92. {
  93. nRow = m_pGDC->AppendRecord();
  94. m_pGDC->Values[nRow][Column01->Index] = pObj->TABLESPACE_NAME;
  95. m_pGDC->Values[nRow][Column02->Index] = pObj->TOTAL_MB;
  96. m_pGDC->Values[nRow][Column03->Index] = pObj->USED_MB;
  97. m_pGDC->Values[nRow][Column04->Index] = pObj->USED_PERCENT;
  98. }
  99. }
  100. __finally
  101. {
  102. ItsDatabaseManager->FLists.UnLock();
  103. }
  104. }
  105. __finally
  106. {
  107. TvList->EndUpdate();
  108. TvList->DataController->GotoFirst();
  109. }
  110. }
  111. //---------------------------------------------------------------------------
  112. void __fastcall TFRAMEDatabaseStatus::TvListCustomDrawCell(TcxCustomGridTableView *Sender,
  113. TcxCanvas *ACanvas, TcxGridTableDataCellViewInfo *AViewInfo,
  114. bool &ADone)
  115. {
  116. //OptionsSelection.InvertSelect = False
  117. //OptionsView.FocusRect = False
  118. if (AViewInfo->GridRecord->Selected)
  119. {
  120. //ACanvas->Brush->Color = Sender->LookAndFeelPainter->DefaultContentColor();
  121. //ACanvas->Font->Color = Sender->LookAndFeelPainter->DefaultContentTextColor();
  122. if (AViewInfo->GridRecord->Index % 2 == 0)
  123. {
  124. ACanvas->Brush->Color = Sender->LookAndFeelPainter->DefaultContentEvenColor();
  125. ACanvas->Font->Color = Sender->LookAndFeelPainter->DefaultContentTextColor();
  126. }
  127. else
  128. {
  129. ACanvas->Brush->Color = Sender->LookAndFeelPainter->DefaultContentOddColor();
  130. ACanvas->Font->Color = Sender->LookAndFeelPainter->DefaultContentTextColor();
  131. }
  132. }
  133. }
  134. //---------------------------------------------------------------------------