sysgui = unt open (sysgui)"X0" sysgui! = bbjapi().getSysGui() width = 600 height = 400 window! = sysgui!.addWindow(50,50,width,height,"BBjTabControl",$00090083$) window!.setCallback(window!.ON_CLOSE,"eoj") window!.setCallback(window!.ON_RESIZE,"resize") tabctrl! = window!.addTabCtrl(101,25,25,width-50,height-50) mgr! = sysgui!.getImageManager() tab = 0 while 1 dread image$,end=*break image! = mgr!.loadImageFromServerJar(image$) child! = window!.addChildWindow(200+tab,0,25,340,100,"",$$,200+tab,$$) text! = child!.addStaticText(300,tab*10,tab*10,300,50,image$) tabctrl!.addTab(""+str(tab),tab,child!) tabctrl!.setImageAt(tab,image!) tab = tab + 1 if tab > 9 then break wend process_events eoj: release resize: event! = sysgui!.getLastEvent() width = event!.getWidth() height = event!.getHeight() tabctrl!.setSize(width-50,height-50) return data "com/basis/bbj/images/splash.jpg" data "com/basis/bbj/images/BBjIDE.gif" rem data "com/basis/bbj/images/IndexPropClosed.gif" rem data "com/basis/bbj/images/IndexPropClosedAni.gif" rem data "com/basis/bbj/images/IndexPropOpened.gif" rem data "com/basis/bbj/images/IndexPropOpenedAni.gif" rem data "com/basis/bbj/images/NavigatorFirst.gif" rem data "com/basis/bbj/images/NavigatorLast.gif" rem data "com/basis/bbj/images/NavigatorNext.gif" rem data "com/basis/bbj/images/NavigatorPrevious.gif" rem data "com/basis/bbj/images/basis-b.gif" rem data "com/basis/bbj/images/basis-b16.gif" data "com/basis/bbj/images/bbjclient.gif" data "com/basis/bbj/images/bbjserver.gif" data "com/basis/bbj/images/broken.png" data "com/basis/bbj/images/browser.gif" data "com/basis/bbj/images/busyrow.gif" data "com/basis/bbj/images/close.gif" data "com/basis/bbj/images/copy.gif" data "com/basis/bbj/images/cuidemo.gif" data "com/basis/bbj/images/cursor_c_1616.gif" data "com/basis/bbj/images/cursor_c_3232.gif" data "com/basis/bbj/images/cut.gif" data "com/basis/bbj/images/datadmin.gif" data "com/basis/bbj/images/deleterow.gif" data "com/basis/bbj/images/demoicons.gif" data "com/basis/bbj/images/fieldtest.jpg" data "com/basis/bbj/images/first.gif" data "com/basis/bbj/images/fitheight.gif" data "com/basis/bbj/images/fitwidth.gif" data "com/basis/bbj/images/griddemo.gif" data "com/basis/bbj/images/guicontrols.gif" data "com/basis/bbj/images/helpbook.gif" data "com/basis/bbj/images/insertrow.gif" data "com/basis/bbj/images/jdbcdemo.gif" data "com/basis/bbj/images/last.gif" data "com/basis/bbj/images/leftarrow.gif" data "com/basis/bbj/images/new.gif" data "com/basis/bbj/images/next.gif" data "com/basis/bbj/images/no-breakpoint.gif" data "com/basis/bbj/images/open.gif" data "com/basis/bbj/images/pagedown.gif" data "com/basis/bbj/images/pageup.gif" data "com/basis/bbj/images/paste.gif" data "com/basis/bbj/images/prev.gif" data "com/basis/bbj/images/print.gif" data "com/basis/bbj/images/red-ball.gif" data "com/basis/bbj/images/resconverter.gif" data "com/basis/bbj/images/rightarrow.gif" data "com/basis/bbj/images/save.gif" data "com/basis/bbj/images/selBord.gif" data "com/basis/bbj/images/sidebyside.gif" data "com/basis/bbj/images/sqldemo.gif"