BBjInputTSpinner::setSpinField

rem ' BBjInputTSpinner
sysgui = unt
open (sysgui)"X0"
print (sysgui)'scale'(2,2)
sysgui! = bbjapi().getSysGui()
window! = sysgui!.addWindow(25,25,230,250,"BBjInputTSpinner",$2009008f$)
window!.setCallback(sysgui!.ON_CLOSE,"eoj")
rem ' BBjInputTSpinner
window!.addGroupBox(101,10,10,200,210,"BBjInputTSpinner")
window!.addStaticText(102,15,30,60,25,"Spinner:",$8000$)
inputt! = window!.addInputTSpinner(103,80,30,115,25,9,16.5)
inputt!.setValue(time("123456"))
inputt!.setCallback(sysgui!.ON_SPIN, "spin")
inputt!.setCallback(sysgui!.ON_INPUT_KEYPRESS,"event")
inputt!.setCallback(sysgui!.ON_EDIT_MODIFY,"event")
inputt!.setCallback(sysgui!.ON_GAINED_FOCUS,"event")
inputt!.setCallback(sysgui!.ON_LOST_FOCUS,"event")
inputt!.setCallback(sysgui!.ON_MOUSE_ENTER,"event")
inputt!.setCallback(sysgui!.ON_MOUSE_EXIT,"event")
inputtSpinDown! = window!.addButton(104,80,60,40,21,"<",$$)
inputtSpinDown!.setCallback(sysgui!.ON_BUTTON_PUSH,"inputtSpinDown")
inputtSpinUp! = window!.addButton(105,125,60,40,21,">",$$)
inputtSpinUp!.setCallback(sysgui!.ON_BUTTON_PUSH,"inputtSpinUp")
window!.addStaticText(106,15,90,60,25,"Mask:",$8000$)
inputtMask! = window!.addEditBox(107,80,90,100,25,inputt!.getMask())
inputtMask!.setCallback(sysgui!.ON_LOST_FOCUS,"inputtMask")
window!.addStaticText(108,15,120,60,25,"Minimum:",$8000$)
inputtMinimum! = window!.addInputT(109,80,120,100,25)
inputtMinimum!.setValue(inputt!.getMinimumTime())
inputtMinimum!.setCallback(sysgui!.ON_LOST_FOCUS,"inputTMinimum")
window!.addStaticText(110,15,150,60,25,"Maximum:",$8000$)
inputtMaximum! = window!.addInputT(111,80,150,100,25)
inputtMaximum!.setValue(inputt!.getMaximumTime())
inputtMaximum!.setCallback(sysgui!.ON_LOST_FOCUS,"inputTMaximum")
inputtHour! = window!.addRadioButton(113,15,180,45,25,"h",$0020$)
inputtHour!.setCallback(sysgui!.ON_CHECK_ON,"inputtHours")
inputtHour!.setToolTipText("Spin hours")
inputtMinute! = window!.addRadioButton(114,60,180,45,25,"m",$0024$)
inputtMinute!.setCallback(sysgui!.ON_CHECK_ON,"inputtMinutes")
inputtMinute!.setToolTipText("Spin minutes")
inputtSecond! = window!.addRadioButton(115,105,180,45,25,"s",$0020$)
inputtSecond!.setCallback(sysgui!.ON_CHECK_ON,"inputtSeconds")
inputtSecond!.setToolTipText("Spin seconds")
inputtMillisecond! = window!.addRadioButton(116,150,180,45,25,"t",$0020$)
inputtMillisecond!.setCallback(sysgui!.ON_CHECK_ON,"inputtMilliseconds")
inputtMillisecond!.setToolTipText("Spin milliseconds")
vector! = bbjapi().makeVector()
vector!.add(inputtHour!)
vector!.add(inputtMinute!)
vector!.add(inputtSecond!)
vector!.add(inputtMillisecond!)
radioGroup! = window!.addRadioGroup(vector!)
statusbar! = window!.addStatusBar(99,$$)
statusbar!.setText("Spin events go here")
dim event$:tmpl(sysgui)
process_events
eoj:
  release
event:
  event! = sysgui!.getLastEvent()
  control! = event!.getControl()
  print control!," ",event!
return
spin:
  gosub event
  statusbar!.setText("Spin on "+c$+": "+event!.getText())
return
inputtSpinUp:
  time = inputt!.getNextTime()
  print "getNextTime",time," ",date(0,time:inputt!.getMask(),err=*next)
  inputt!.spin(1)
return
inputtSpinDown:
  time = inputt!.getPreviousTime()
  print "getPreviousTime",time," ",date(0,time:inputt!.getMask(),err=*next)
  inputt!.spin(0)
return
inputtMask:
  inputt!.setMask(inputtMask!.getText())
  inputtMinimum!.setMask(inputtMask!.getText())
  inputtMaximum!.setMask(inputtMask!.getText())
return
inputtMinimum:
  inputt!.setMinimumTime(inputtMinimum!.getValue())
  print "getMinimumTime",inputt!.getMinimumTime()
return
inputtMaximum:
  inputt!.setMaximumTime(inputtMaximum!.getValue())
  print "getMaximumTime",inputt!.getMaximumTime()
return
inputtHours24:
  inputt!.setSpinField(inputt!.HOUR_OF_DAY)
  print "getSpinField",inputt!.getSpinField()
return
inputtHours:
  inputt!.setSpinField(inputt!.HOUR)
  print "getSpinField",inputt!.getSpinField()
return
inputtMinutes:
  inputt!.setSpinField(inputt!.MINUTE)
  print "getSpinField",inputt!.getSpinField()
return
inputtSeconds:
  inputt!.setSpinField(inputt!.SECOND)
  print "getSpinField",inputt!.getSpinField()
return
inputtMilliseconds:
  inputt!.setSpinField(inputt!.MILLISECOND)
  print "getSpinField",inputt!.getSpinField()
return