BBjCEdit::isEditable

Description

Returns whether the text is editable in the BBjCEdit control.

Syntax

Return Value	Method
boolean	isEditable()

Parameters

None.

Return Value

Returns whether the text is editable in the BBjCEdit control (0 = Not Editable, 1 = Editable).

Remarks

By default, a BBjCEdit control is editable.

Example

rem 'Determine if a custom edit box is editable

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 addWindow param values
X = 10
Y = 10
WIDTH = 200
HEIGHT = 200
TITLE$ = "BBj Window"

rem 'Set the current context
mySysGui!.setContext(0)

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

rem 'Add a CEDIT control on the window
myCEdit! = myWindow!.addCEdit(101,30,100,140,30,"")

rem 'Add a paragraph at index 0 to the CEdit control
myCEdit!.addParagraph(0,"This is a paragraph")

rem 'Set a custom edit box to be non-editable
myCEdit!.setEditable(mySysGui!.FALSE)

rem 'Determine if the custom edit box is editable, this will return false (0)
EDITABLE = myCEdit!.isEditable()

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