home *** CD-ROM | disk | FTP | other *** search
/ The Pier Shareware 6 / The_Pier_Shareware_Number_6_(The_Pier_Exchange)_(1995).iso / 038 / dho_9a.zip / SLIDER.CC < prev    next >
Text File  |  1994-10-12  |  2KB  |  92 lines
  1. // Developer Helper Object Set, (C) 1994 Thomas E. Bednarz, Jr.
  2. //  All rights reserved
  3.  
  4. #include"slider.h"
  5. #include"winbase.h"
  6. #include"object.h"
  7. #define INCL_WIN
  8. #define INCL_WINSTDSLIDER
  9. #include<os2.h>
  10.  
  11.  
  12. //-------------------------------------------------------------------
  13. //   TSlider
  14. TSlider::TSlider(TWinBase *parent, ULONG resource):
  15.     TControl(parent, resource)
  16. {
  17.  
  18. }
  19.  
  20.  
  21. //-------------------------------------------------------------------
  22. //   ~TSlider
  23. TSlider::~TSlider()
  24. {
  25.  
  26. }
  27.  
  28.  
  29. //-------------------------------------------------------------------
  30. //   placeAtTick
  31. void TSlider::placeAtTick(SHORT no)
  32. {
  33.    SendMessage(SLM_SETSLIDERINFO,
  34.                  MPFROM2SHORT(SMA_SLIDERARMPOSITION,
  35.                                     SMA_INCREMENTVALUE),
  36.                  (MPARAM)no);
  37. }
  38.  
  39.  
  40. //-------------------------------------------------------------------
  41. //   tickSize
  42. void TSlider::tickSize(SHORT pix)
  43. {
  44.    SendMessage(SLM_SETTICKSIZE,
  45.                  MPFROM2SHORT(SMA_SETALLTICKS,
  46.                                     pix),
  47.                  (MPARAM)NULL);
  48.  
  49. }
  50.  
  51.  
  52. //-------------------------------------------------------------------
  53. //   setTickText
  54. void TSlider::setTickText(SHORT tick, CHAR *text)
  55. {
  56.    SendMessage(SLM_SETSCALETEXT,
  57.                  MPFROMSHORT(tick),
  58.                  MPFROMP(text));
  59.  
  60. }
  61.  
  62.  
  63. //-------------------------------------------------------------------
  64. //   DetentShaftCenter
  65. void TSlider::DetentShaftCenter(void)
  66. {
  67.    SHORT armpos = SendMessage(SLM_QUERYSLIDERINFO, MPFROM2SHORT(SMA_SLIDERARMPOSITION,
  68.                  SMA_RANGEVALUE), NULL);
  69.  
  70.     SendMessage(SLM_ADDDETENT, MPFROMSHORT(armpos), NULL);
  71. }
  72.  
  73.  
  74.  
  75. //-------------------------------------------------------------------
  76. //   getSliderPos
  77. USHORT TSlider::getSliderPos()
  78. {
  79.    return (USHORT) SendMessage(SLM_QUERYSLIDERINFO,
  80.                                 MPFROM2SHORT(SMA_SLIDERARMPOSITION,SMA_INCREMENTVALUE),
  81.                                 (MPARAM)NULL);
  82.  
  83. }
  84.  
  85.  
  86. //-------------------------------------------------------------------
  87. //   getClassName
  88. const char *TSlider::getClassName()
  89. {
  90.    return "TSlider";
  91. }
  92.