@...SPINNER \/ DEFINE SPINNER

Creates a Spinner Control

Standard Syntax (xBase Style):

 @ <nRow> ,<nCol>
 SPINNER <ControlName>
 [ OF | PARENT <ParentWindowName> ]
 RANGE <nRangeMin> , <nRangeMax>
 [ VALUE <nValue> ]
 [ WIDTH <nWidth> ]
 [ HEIGHT <nHeight> ]
 [ FONT <cFontName> SIZE <nFontSize> ]
 [ BOLD ] [ ITALIC ] [ UNDERLINE ] [ STRIKEOUT ]
 [ TOOLTIP <cToolTipText> ]
 [ BACKCOLOR <aBackColor> ]
 [ FONTCOLOR <aFontColor> ]
 [ ON GOTFOCUS <OnGotFocusProcedure> | <bBlock> ]
 [ ON CHANGE <OnChangeProcedure> | <bBlock> ]
 [ ON LOSTFOCUS <OnLostFocusProcedure> | <bBlock> ]
 [ HELPID <nHelpId> ]
 [ INVISIBLE ]
 [ NOTABSTOP ]
 [ WRAP ]
 [ READONLY ]
 [ INCREMENT <nIncrement> ]

Alternate Syntax:

DEFINE SPINNER <Controlname>
   PARENT <ParentWindowName>
   ROW <nRow>
   COL <nCol>
   RANGEMAX <nRangeMax>
   RANGEMIN <nRangeMin>
   VALUE <nValue>
   WIDTH <nWidth>
   HEIGHT <nHeight>
   FONTNAME <cValue>
   FONTSIZE <nValue>
   FONTBOLD <lValue>
   FONTITALIC <lValue>
   FONTUNDERLINE <lValue>
   FONTSTRIKEOUT <lValue>
   TOOLTIP <cToolTipText>
   BACKCOLOR <aBackColor>
   FONTCOLOR <aFontColor>
   ONGOTFOCUS <OnGotFocusProcedure>
   ONCHANGE <OnChangeProcedure>
   ONLOSTFOCUS <OnLostFocusProcedure>
   HELPID <nHelpId>
   VISIBLE <lValue>
   TABSTOP <lValue>
   WRAP <lValue>
   READONLY <lValue>
   INCREMENT <nIncrement>
END SPINNER

Properties:

• Value
• Enabled
• Visible
• Row
• Col
• Width
• Height
• FontName
• FontSize
• FontBold
• FontItalic
• FontUnderline
• FontStrikeout
• ToolTip
• BackColor
• FontColor
• RangeMax
• RangeMin
• Name (R)
• Wrap (D)
• ReadOnly (D)
• Increment (D)
• Parent (D)
• HelpId (D)

D: Available at control definition only R: Read-Only

Events**:**

• OnGotFocus
• OnChange
• OnLostFocus

Methods:

• Show
• Hide
• SetFocus
• Release

Hints:

• The minimum value in the range can be from –2,147,483,648 to 2,147,483,647. Likewise, the maximum value can be from –2,147,483,648 to 2,147,483,647 (signed 32-bit integer).