sysgui = unt
open (sysgui)"X0"
sysgui! = bbjapi().getSysGui()
window! = sysgui!.addWindow(200,200,300,300,"BBjTabCtrl",$00010003$)
tabctrl! = window!.addTabCtrl(101,50,50,200,200)
context = sysgui!.getContext()
tabs = 16
for tab=1 to tabs
  child! = window!.addChildWindow(200+tab,25,25,185,155,"",$$,context+tab,$$)
  text$ = "Tab " + str(tab)
  text! = child!.addStaticText(300+tab,5*tab,5*tab,100,30,text$)
  tab$ = "Tab " + str(tab)
  tabctrl!.addTab(tab$,child!)
next tab

rem CALLBACK(ON_TAB_SELECT,TAB_SELECTED,CONTEXT,TabCtrl!.getID())
CALLBACK(ON_CLOSE,eoj,CONTEXT)

PROCESS_EVENTS

eoj:
RELEASE

TAB_SELECTED:
print "The user selected tab: ",STR(tabctrl!.getSelectedIndex()+1)
RETURN