BBjMDI::addListButton

Description

In BBj 17.00 and higher, this method adds a BBjListButton to the BBjMDI toolbar.

Syntax

Return Value	Method
BBjListButton	addListButton(int ID, int x, int y, int width, int height, string initialContents)
BBjListButton	addToolButton(int ID, int x, int y, int width, int height, string initialContents, string flags)

Parameters

Variable

Description

Control ID number. It must be an integer between 1 and 32767 and be unique within a given top-level window.

Horizontal position of the upper-left corner of the control in current units.

Vertical position of the upper-left corner of the control in current units.

width

Width of the control in current units.

height

Height of the control in current units.

initialContents

Line feed separated strings containing the initial contents of the list.

flags

Control flags, as follows:

Flag	Description
$0001$	Sets the control to be initially disabled.
$0010$	Sets the control to be initially invisible.
$0800$	Creates a "click on, click off" toggle button.
$1000$	Draws a recessed client edge around the control.
$2000$	Left justifies the list items.
$4000$	Centers list items.
$8000$	Right-justifies list items.

Return Value

Returns the created BBjListButton object.

Remarks

The list of choices available may be modified only under program control. The values in the list may be accessed using a zero-based list index integer. Unlike the list edit control, it does not allow a value to be entered manually. As the user types, the first matching selection in the list is placed in the edit area. Various keys may be used to navigate in the list including the Home (first selection), End (last selection), Page Up and Page Down, and the arrow keys.

Example

rem ' BBjMDI::addListButton

if len(cvs(argv(1,err=*next),8)) then goto client
sysgui = unt
open (sysgui)"X0"
sysgui! = bbjapi().getSysGui()
mdi! = bbjapi().getMDI()
title$ = "BBjMDI::addListButton"
print 'title'(title$)
mdi!.createMDIWindow(100,100,800,600,title$,$0000009f$)
mdi!.setVisible(1)
status! = mdi!.addStatusBar(); status!.setText("MDI Status Bar")
mdi!.setCallback(mdi!.ON_CLOSE,"eoj")
mdi!.setBackColor(sysgui!.makeColor(255,255,0))
imagemanager! = sysgui!.getImageManager()
image$ = "com/basis/utilities/launchdock/icons/bbj.png"
image! = imagemanager!.loadImageFromServerJar(image$)
mdi!.setBackgroundImage(0,image!)

rem 'invoke = scall("bbj "+pgm(-1)+" - f &"); wait 0.1
invoke = scall("bbj "+pgm(-1)+" - n &"); wait 0.1

rem 'invoke = scall("bbj "+pgm(-1)+" - f &"); wait 0.1
gosub toolbar

rem 'invoke = scall("bbj "+pgm(-1)+" - f &"); wait 0.1
invoke = scall("bbj "+pgm(-1)+" - w &"); wait 0.1

rem 'invoke = scall("bbj "+pgm(-1)+" - f &"); wait 0.1
invoke = scall("bbj "+pgm(-1)+" - e &"); wait 0.1

rem 'invoke = scall("bbj "+pgm(-1)+" - f &"); wait 0.1
rem 'invoke = scall("bbj "+pgm(-1)+" - f &"); wait 0.1
invoke = scall("bbj "+pgm(-1)+" - s &"); wait 0.1
invoke = scall("bbj "+pgm(-1)+" - f &"); wait 0.1
invoke = scall("bbj "+pgm(-1)+" - f &"); wait 0.1
invoke = scall("bbj "+pgm(-1)+" - f &"); wait 0.1
invoke = scall("bbj "+pgm(-1)+" - f &"); wait 0.1
invoke = scall("bbj "+pgm(-1)+" - f &"); wait 0.1
process_events

toolbar:
    tb! = mdi!.addToolButton(101,0,0,50,50,"1",$4000$)
    tb!.setCallback(tb!.ON_TOOL_BUTTON_PUSH,"tb")
    mb! = mdi!.addMenuButton(102,0,0,50,50,"2",$4000$)
    mb!.setCallback(mb!.ON_BUTTON_PUSH,"mb")
    lb$ = ""; for lb = 0 to 9; lb$ = lb$ + str(lb) + $0a$; next lb
    lb! = mdi!.addListButton(103,0,0,100,200,lb$,$4000$)
    lb!.setCallback(tb!.ON_LIST_SELECT,"lb")
return

tb:
    event! = sysgui!.getLastEvent()
    tb! = event!.getControl()
    tb = msgbox(tb!.getText(),0,event!.getEventName())
return

mb:
    event! = sysgui!.getLastEvent()
    mb! = event!.getControl()
    mb = msgbox(mb!.getText(),0,event!.getEventName())
return

lb:
    event! = sysgui!.getLastEvent()
    lb! = event!.getControl()
    lb = msgbox(event!.getSelectedItem(),0,event!.getEventName())
return

rem ' client windows
client:
    print 'hide',
    sysgui = unt
    open (sysgui)"X0"
    sysgui! = bbjapi().getSysGui()
    title$ = cvs(argv(1),8)
    print 'title'(title$)
    x = rnd(250),y = rnd(250)
    if title$="f" then w = 100,h = 100 else w = 50,h = 50
    window! = sysgui!.addWindow(x,y,w,h,title$,$00090083$,$00090083$)
    window!.setTrack(1)
    window!.setBackColor(sysgui!.makeColor(rnd(255),rnd(255),rnd(255)))
    window!.setCallback(window!.ON_CLOSE,"eoj")
    button! = window!.addMenuButton(1,0,0,25,25,title$,$$)
    button!.setCallback(button!.ON_BUTTON_PUSH,"size")
    checkbox! = window!.addCheckBox(2,25,0,25,25,title$,$0004$)
    checkbox!.setCallback(checkbox!.ON_CHECK_ON,"resizable")
    checkbox!.setCallback(checkbox!.ON_CHECK_OFF,"resizable")
    status! = window!.addStatusBar(99,$$)
    status!.setForeColor(sysgui!.makeColor(255,255,255))
    status!.setBackColor(sysgui!.makeColor(0,0,255))
    status!.setText("Status Bar")
    if (title$="n") then
        bbjapi().getMDI().getNorthBorder().setWindow(window!)
    endif
    if (title$="s") then
        bbjapi().getMDI().getSouthBorder().setWindow(window!)
    endif
    if (title$="w") then
        bbjapi().getMDI().getWestBorder().setWindow(window!)
    endif
    if (title$="e") then
        bbjapi().getMDI().getEastBorder().setWindow(window!)
    endif
    process_events

eoj:
    event! = sysgui!.getLastEvent()
release

BBjMDI::addListButton

Description

Syntax

Parameters

Return Value

Remarks

Example

See Also