vslider.cpp

Go to the documentation of this file.

//----------------------------------------------------------------------------
// ObjectWindows
// Copyright (c) 1993, 1996 by Borland International, All Rights Reserved
//
/// \file
/// Implementation of TVSlider, vertical slider UI widget
//----------------------------------------------------------------------------
#include <owl/pch.h>
#include <owl/defs.h>
#include <owl/slider.h>
#include <owl/dc.h>
#include <owl/commctrl.h>
#include <owl/uihelper.h>
 
namespace owl {
 
OWL_DIAGINFO;
 
 
//
/// Constructs a vertical slider object with a default bitmap resource ID of
/// IDB_VSLIDERTHUMB for the thumb knob.
//
TVSlider::TVSlider(TWindow* parent, int id, int x, int y, int w, int h, TResId thumbResId, TModule* module)
:
  TSlider(parent, id, x, y, w, h, thumbResId, module)
{
  if (!w)
    Attr.W = 32;
  Attr.Style |= TBS_VERT;  // In case it is Native, else we dont care
}
 
//
/// Constructor for a slider object created from resource
//
TVSlider::TVSlider(TWindow* parent, int resId, TResId thumbResId, TModule* module)
:
  TSlider(parent, resId, thumbResId, module)
{}
 
//
/// Constructs a slider object to encapsulate (alias) an existing control.
//
TVSlider::TVSlider(THandle hWnd, TModule* module)
:
  TSlider(hWnd, module)
{}
 
 
//----------------------------------------------------------------------------
// Protected implementation
 
 
IMPLEMENT_STREAMABLE1(TVSlider, TSlider);
 
#if OWL_PERSISTENT_STREAMS
 
//
//
//
void*
TVSlider::Streamer::Read(ipstream& is, uint32 /*version*/) const
{
  ReadBaseObject((TSlider*)GetObject(), is);
  return GetObject();
}
 
//
//
//
void
TVSlider::Streamer::Write(opstream& os) const
{
  WriteBaseObject((TSlider*)GetObject(), os);
}
 
#endif
 
} // OWL namespace
/* ========================================================================== */