BBjControl::getNoEdge

Description

In BBj 6.00 and higher, this method returns whether the BBjControl has no border.

Syntax

Return Value	Method
boolean	getNoEdge()

Parameters

None.

Return Value

Returns true (1) if the BBjControl has no border.

Returns false (0) if the BBjControl has a border.

Remarks

BBj honors this flag when running with the -LFvpro5 command line option as documented in Running BBj from the Command Line. In every other look and feel, this flag is a NOOP. By default, a BBjControl does not have a raised border.

BBjButton and BBjToolButton have different implementations.

Example

rem 'Determine if a control has a raised edge border

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

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

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

rem 'Set common addWindow param values
X = 10
Y = 10
WIDTH = 200
HEIGHT = 200

rem 'Create a window with a title in the current context
TITLE$="BBj Window"

rem 'Set the current context
mySysGui!.setContext(0)
myWindow! = mySysGui!.addWindow(X,Y,WIDTH,HEIGHT,TITLE$)

rem 'Add a button on the window
myButton! = myWindow!.addButton(101,50,100,90,30,"Button")

rem 'Constants
TRUE = 1
myButton!.setNoEdge(TRUE)

rem 'Determine if the button has a raised edge border, this will return 1
EDGE = myButton!.getNoEdge()

rem 'Register the CALLBACK routines
CALLBACK(ON_CLOSE,APP_CLOSE,mySysGui!.getContext())

rem 'Process Events
process_events

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