home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 May / Pcwk5b98.iso / Borland / Cplus45 / BC45 / OWL1.PAK / BGRPBOX.CPP < prev    next >
Text File  |  1995-08-29  |  1KB  |  38 lines
  1. // ObjectWindows - (C) Copyright 1992 by Borland International
  2.  
  3. /* --------------------------------------------------------
  4.   BGRPBOX.CPP
  5.   Defines type TBGroupBox.  This defines the basic behavior
  6.   for all custom control group boxes.
  7.   -------------------------------------------------------- */
  8.  
  9. #include "bgrpbox.h"
  10. #include "bwcc.h"
  11.  
  12. /* Constructor for a TBGroupBox object.  Initializes its data fields
  13.    using parameters passed and default values. */
  14.  
  15. TBGroupBox::TBGroupBox(PTWindowsObject AParent, int AnId, LPSTR AText,
  16.                int X, int Y, int W, int H, PTModule AModule)
  17.     : TGroupBox(AParent, AnId, AText, X, Y, W, H, AModule)
  18. {
  19.   Attr.Style = (Attr.Style  & ~BS_GROUPBOX) | BSS_GROUP;
  20. }
  21.  
  22. /* Constructor for a TBGroupBox to be associated with a MS-Windows interface
  23.   element created by MS-Windows from a resource definition. Initializes
  24.   its data fields using passed parameters.  */
  25.  
  26. TBGroupBox::TBGroupBox(PTWindowsObject AParent, int ResourceId,
  27.                PTModule AModule)
  28.         : TGroupBox(AParent, ResourceId, AModule)
  29. {}
  30.  
  31. PTStreamable TBGroupBox::build()
  32. {
  33.   return new TBGroupBox(streamableInit);
  34. }
  35.  
  36. TStreamableClass RegBGroupBox("TBGroupBox", TBGroupBox::build,
  37.                   __DELTA(TBGroupBox));
  38.