Contents page

Rules for Tools/EmbossWindowOn()

SYNOPSIS
     void EmbossWindowOn(struct Window *window, long flags, char *title,
               unsigned short leftindent, unsigned short topindent,
               long (*hroutine)(), long (*vroutine)())

ARGUMENTS
    `struct Window *window'
    `long flags'
          System gadget flags.

    `char *title'
          Window title.

    `unsigned short leftindent;'
          Left indent for bottom scroll gadget.

    `unsigned short topindent'
          Top indent for right scroll gadget.

    `long (*hroutine)()'
          Routine for bottom scroll prop.

    `long (*vroutine)()'
          Routine for right scroll prop.

DESCRIPTION
     To create a window with an embossed border and embossed system
     gadgets, call `EmbossWindowOn()'.  Make sure the NewWindow
     structure is borderless, clear the Title, DetailPen and BlockPen
     fields, as well as the Flags for System gadgets.

     Open the window, then call `EmbossWindowOn()' to install the
     system gadgets.  In addition to the window pointer, system gadget
     flags, and window title, you can also pass parameters for bottom
     and right scroll bars (for resizable windows.)  The parameters are
     indentations (from left edge for bottom scroll, from top endge for
     right scroll,) and two routines.  If an indentation is -1, no
     scroll bar is added in that direction.  If the indentation is 0, it
     the scroll bar is created to fit exactly between the sizing gadget
     and the window border.  Use a larger indentation to fit between
     the indent and the sizing gadget.

     The scroll routines are identical to the scroll routines provided
     for proportional embossed gadgets.

     One important warning: The Embossed Window system uses the
     UserData field of your window structure, you must leave it alone.

EXAMPLE
  NewWindowStructure1.Screen = screen;
  NewWindowStructure1.Title = 0;
  NewWindowStructure1.Type = CUSTOMSCREEN;
  NewWindowStructure1.Flags |= BORDERLESS;
  NewWindowStructure1.Flags &= ~0xF;
  NewWindowStructure1.DetailPen = 0;
  NewWindowStructure1.BlockPen = 0;

  window = OpenWindow(&NewWindowStructure1);

  if (window) {
      EmbossWindowOn(window,
        WINDOWCLOSE | WINDOWSIZING | WINDOWDRAG | WINDOWDEPTH ,"New Window",
        0,0,hroutine,vroutine);
  }

SEE
     See EmbossWindowOff().