home *** CD-ROM | disk | FTP | other *** search
/ Stars of Shareware: Programmierung / SOURCE.mdf / programm / windows / c / mobjm260 / sshade.cp_ / sshade.cp
Encoding:
Text File  |  1994-09-06  |  1011 b   |  43 lines
  1. //    Microworks ObjectMate  2.6
  2. //
  3. //  "SFX Class Library"
  4. //
  5. //    An ObjectWindows 2.0 extension for Borland C++ 4.0
  6. //
  7. //    Copyright 1992-94 Microworks Sydney, Australia.
  8. //
  9. //  SSHADE.CPP 
  10.  
  11. #include <owl\owlpch.h>
  12. #include <sfx\sfx200.h>
  13. #include "sfx\sshade.h"
  14.  
  15. IMPLEMENT_STREAMABLE_FROM_BASE(TSFXShade, TGroupBox);
  16.  
  17. //    constructor for a TSFXShade object
  18.  
  19. TSFXShade::TSFXShade(TWindow*        parent,
  20.                      int             id,
  21.                      const char far* text,
  22.                      int x, int y, int w, int h,
  23.                      TModule*        module)
  24.     :TGroupBox(parent, id, text, x, y, w, h, module)
  25. {
  26.     // Do not set the BS_GROUPBOX flag, SFXSHADE doesn't use it.
  27.     Attr.Style = (WS_CHILD | WS_VISIBLE | WS_GROUP | WS_CLIPSIBLINGS)  & ~WS_TABSTOP;
  28. }
  29.  
  30. //    constructor for a TSFXShade object created from a resource definition
  31.  
  32. TSFXShade::TSFXShade(TWindow* parent, int resourceId, TModule* module)
  33.     :TGroupBox(parent, resourceId, module)
  34. {
  35. }
  36.  
  37. char far*
  38. TSFXShade::GetClassName()
  39. {
  40.     return "SFXSHADE";
  41. }
  42.  
  43.