home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 4 / Apprentice-Release4.iso / Source Code / C++ / Applications / CheckBook 2.1d1 / Sources / UThermView.cp < prev    next >
Encoding:
Text File  |  1995-12-04  |  3.8 KB  |  115 lines  |  [TEXT/MPS ]
  1. //----------------------------------------------------------------------------------------
  2. // UThermView.cp
  3. // Copyright ©1994 Access Informatics.
  4. //
  5. /*
  6.     History:
  7.         2/8/93    PBM Started history
  8.  
  9. */
  10. //----------------------------------------------------------------------------------------
  11.  
  12. #ifndef __UTHERMVIEW__
  13. #include "UThermView.h"
  14. #endif
  15.  
  16. #ifndef __UMACAPPUTILITIES__
  17. #include "UMacAppUtilities.h"
  18. #endif
  19.  
  20. #ifndef __UMENUMGR__
  21. #include "UMenuMgr.h"
  22. #endif
  23.  
  24. #ifndef __FONTS__
  25. #include "Fonts.h"
  26. #endif
  27.  
  28. //----------------------------------------------------------------------------------------
  29. // Constants:
  30.  
  31.     
  32. //========================================================================================
  33. // Global Initialization Procedure
  34. //========================================================================================
  35. #pragma segment MAOpen
  36. MA_DEFINE_CLASS_M1(TThermView, TView);
  37.  
  38. //----------------------------------------------------------------------------------------
  39. // InitUViewTherm: 
  40. //----------------------------------------------------------------------------------------
  41. #pragma segment DlgInit
  42.  
  43. void InitUThermView()
  44. {
  45.     // So the linker doesn't dead strip class info 
  46.     macroDontDeadStrip(TThermView);
  47. } // InitUViewTherm 
  48.  
  49.  
  50. //========================================================================================
  51. // CLASS TThermView
  52. //========================================================================================
  53.  
  54.  
  55. //----------------------------------------------------------------------------------------
  56. // TThermView::Initialize: 
  57. //----------------------------------------------------------------------------------------
  58. #pragma segment AOpen
  59.  
  60. TThermView::TThermView() // Override 
  61. {
  62.     fMaximumValue = 100;    // just a nominal value
  63.     fCurrentValue = 0;
  64. } 
  65.     
  66.  
  67. //----------------------------------------------------------------------------------------
  68. // Draw: 
  69. //----------------------------------------------------------------------------------------
  70. // There are two rectangles, the bar itself and the remainder area
  71. // they are drawn in the grey and light blue that the finder uses.
  72. #pragma segment ARes
  73.  
  74. void TThermView::Draw(const VRect& /* area */) // Override 
  75. {
  76.     CRect aQDRect;            // the view
  77.     CRect barQDRect;        // the bar
  78.     CRect remainderQDRect;    // the remainder of the bar area
  79.     
  80.     this->GetQDExtent(aQDRect);
  81.     barQDRect = remainderQDRect = aQDRect;
  82.     
  83.     if(fMaximumValue <= 0)
  84.         return;
  85.     
  86.     PenNormal();
  87.     
  88.     long width = aQDRect.right - aQDRect.left;        // full width of bar
  89.     
  90.     width = (width *  fCurrentValue) / fMaximumValue;
  91.     barQDRect.right = barQDRect.left + width;
  92.     remainderQDRect.left = remainderQDRect.right - width;
  93.     
  94.     SetIfColor(fBackColor);    // gRGB
  95.     PaintRect(aQDRect);    // paint the backround
  96.  
  97.     SetIfColor(fBarColor);    // draw the bar
  98.     PaintRect(barQDRect);
  99.     
  100.     SetIfColor(gRGBBlack);
  101.     FrameRect(aQDRect);
  102. } // TThermView::Draw 
  103.  
  104. void TThermView::SetMaximum(long value)
  105. {
  106.     fMaximumValue = value;
  107. }
  108.  
  109. void TThermView::SetCurrent(long value)
  110. {
  111.     fCurrentValue = value;
  112.     this->DrawContents();
  113. }
  114.  
  115. Boolean TThermView::HasColour