BBjTabCtrl::isMultiLine

Description

Returns whether the BBjTabCtrl adjusts its tabs into multiple lines.

Syntax

Return Value	Method
boolean	isMultiLine()

Parameters

None.

Return Value

Returns whether the tab control adjusts its tabs into multiple lines (0 = Not Multi-Line, 1 = Multi-Line).

Remarks

By default, the tabs are not multi-lined.

Example

rem 'Determine if the tabs in a tab control are multi-lined or not.

rem 'Obtain the instance of the BBjAPI object
let myAPI! = BBJAPI()

rem 'Open the SysGui device
let SYSGUI = UNT
OPEN (SYSGUI)"X0"

rem 'Obtain the instance of the BBjSysGui object
let mySysGui! = myAPI!.getSysGui()

rem 'Set addWindow param values
let X = 10
let Y = 10
let WIDTH = 400
let HEIGHT = 400
let TITLE$ = "BBj Window"

rem 'Create a window, initialy invisible
let myWindow! = mySysGui!.addWindow(X,Y,WIDTH,HEIGHT,TITLE$,$00000012$)

rem 'Add a tab control to the window
let myTabCtrl! = myWindow!.addTabCtrl(101,50,50,200,200)

rem 'Set the tabs to be mult-lined
myTabCtrl!.setMultiLine(mySysGui!.TRUE)

rem 'Create a child window
let myChildWindow! = myWindow!.addChildWindow(200,75,75,100,100,"",$$,1,$$)

rem 'Add a static text control on the child window
CHILD_TEXT$ = "Child Window"
let myStaticText! = myChildWindow!.addStaticText(300,X,Y,WIDTH,HEIGHT,CHILD_TEXT$)

rem 'Insert a tab into the tab control using the child window object
myTabCtrl!.insertTab(0,"Tab 4",myChildWindow!)

rem 'Insert a tab into the tab control using the child window object's ID
myTabCtrl!.insertTab(0,"Tab 3",myChildWindow!.getID())

rem 'Set an image list for the tab control
myTabCtrl!.setImageListPath("tab.bmp")

rem 'Insert a tab into the tab control using an image from the image list and the child window object
myTabCtrl!.insertTab(0,"Tab 2",0,myChildWindow!)

rem 'Insert a tab into the tab control using an image from the image list and the child window object's ID
myTabCtrl!.insertTab(0,"Tab 1",1,myChildWindow!.getID())

rem 'Set the top level window visible
myWindow!.setVisible(1)

rem 'Determine if the tabs in the tab control are multi-lined or not, this will
rem 'return 1, TRUE
TABS_MULTI_LINE = myTabCtrl!.isMultiLine()

rem 'Register the CALLBACK routines
CALLBACK(ON_CLOSE,APP_CLOSE,0)

rem 'Process Events
process_events

rem 'Callback routine called when the user closes the application window
APP_CLOSE:
release