BBjTabCtrl::setImageIndexAt

Description

Sets the index of an image to be displayed on a tab in the BBjTabCtrl.

Syntax

Return Value

Method

void

setImageIndexAt(int index, int imgIndex)

Parameters

Variable

Description

index

Specifies the 0-based index of the tab.

imgIndex

Specifies the index of an image in the image list assigned to the control that will be displayed on the tab. An image list is assigned to the control by calling either the setImageListPath method or the setImageListID method.

Return Value

None.

Remarks

None.

Example

REM Set the index of an image to be displayed on a tab in a tab control

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 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 Set an image list for the tab control
myTabCtrl!.setImageListPath("tab.bmp")

REM Add a tab to the tab control using the child window object
myTabCtrl!.addTab("Tab 1",myChildWindow!)

REM Add an image from the image list to the tab
myTabCtrl!.setImageIndexAt(0,3)

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

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
RETURN

See Also

BBjAPI

BBjSysGui

BBjControl

BBjWindow

See the BBj Object Diagram for an illustration of the relationship between BBj Objects.



______________________________________________________________________________________

Copyright BASIS International Ltd. BBj®, Visual PRO/5®, PRO/5®, and BBx® are registered trademarks.