Name

---

      CONTRASTBOX__DEFINE

Purpose

---

      A contrastbox object is a moveable, rubberband-type box interaction
      in which only the portion of the window inside the box is shown in
      full color. The portion of the window outside the box is shown in
      muted colors. The colors are muted by reducing the saturation by 50%.

Authors

---

        FANNING SOFTWARE CONSULTING BURRIDGE COMPUTING
        1645 Sheely Drive 18 The Green South
        Fort Collins Warborough, Oxon
        CO 80526 USA OX10 7DN, ENGLAND
        Phone: 970-221-0438 Phone: +44 (0)1865 858279
        E-mail: davidf@dfanning.com E-mail: davidb@burridgecomputing.co.uk

Category

---

      Objects.

Syntax

---

      theObject = Obj_New("CONTRASTBOX")

Superclasses

---

      MOVEABLEBOX
      RUBBERBANDBOX
      INTERACTION
      CATATOM
      CATCONTAINER IDLITCOMPONENT
      IDL_CONTAINER

Class Structure

---

  class = { CONTRASTBOX, $
            contrastID: Obj_New(), $ ; The contrast window.
            INHERITS MOVEABLEBOX $
          }

Messages

---

      None.

Event Structure

---

      event = { ID:theObject, TOP:topObject, HANDLER:Obj_New(), EVENT_NAME='RUBBERBANDBOX_EVENT', $
                  NAME: self._name, BOX:self.box, XPTS:FLTARR(5), YPTS:FLATARR(5) }
      In which the XPTS and YPTS fields contain the X and Y locations of the box in a form
      suitable for drawing the ROI on the display with PLOTS. The BOX, XPTS, and YPTS are
      converted to the coordinate system of the draw widget associated with the interaction
      before being placed in the event structure.

Modification History

---

      Written by: David W. Fanning, 25 October 2004.