Name

---

      SPINNER__DEFINE

Purpose

---

      The purpose of this routine is to implement a spinner widget, in which
      arrow buttons affect the value of the spinner. Leaving the cursor down
      on an arrow button will cause the value of the spinner to "spin" or
      change rapidly.

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("SPINNER")

Superclasses

---

      BASEWIDGET
      WIDGETATOM
      CATATOM
      CATCONTAINER IDLITCOMPONENT
      IDL_CONTAINER

Class Structure

---

  class = {SPINNER, $
            INHERITS BASEWIDGET $
          }

Messages

---

  None.

Modification History

---

      Written by: David W. Fanning, 26 September 2005.
      Fixed bug that allows spinner value to be set manually. 25 July 2007. DWF.