BBjHtmlEdit::setState

Description

In BBj 21.10 and higher, this method sets a specified state in the BBjHtmlEdit toolbar to the specified Boolean value.

Syntax

Return Value

Method

void

setState(String state)
void setState(String state, Boolean value)

Parameters

Variable Description
state Specifies one of the state names from BBjHtmlEdit::getAvailableStates.
value

Specifies the value of the specified state:

  • Boolean.TRUE activates the specified state.

  • Boolean.FALSE deactivates the specified state.

  • null() toggles the specified state.

If the value parameter is not specified, it's assumed to be null().

Return Value

Returns the Boolean value of a specified state in the BBjHtmlEdit toolbar.

Remarks

Editor states vary between the various BBjHtmlEdit clients. Not all clients define any editor states.

Example

rem ' BBjHtmlEdit::setState

client = 0
if (info(3,6)<>"5" and info(3,6)<>"6") then
    client = msgbox("BBjHtmlEdit Client",7+32+512,"BBjHtmlEdit","Swing","JavaFX","Chromium")
    switch client
        case 1; rem ' Swing
            print stbl("!OPTIONS","CHROMIUM_HTMLEDIT=FALSE",ERR=*NEXT)
            print stbl("!OPTIONS","JAVAFX_HTMLEDIT=FALSE",ERR=*NEXT)
            break
        case 2; rem ' JavaFX
            print stbl("!OPTIONS","CHROMIUM_HTMLEDIT=FALSE",ERR=*NEXT)
            print stbl("!OPTIONS","JAVAFX_HTMLEDIT=TRUE",ERR=*NEXT)
            break
        case 3; rem ' Chromium
            print stbl("!OPTIONS","CHROMIUM_HTMLEDIT=TRUE",ERR=*NEXT)
            print stbl("!OPTIONS","JAVAFX_HTMLEDIT=TRUE",ERR=*NEXT)
            break
    swend
endif
basic = msgbox("Basic toolbar?",4+32+256) = 6
minimized = 0
minimized = msgbox("Initially minimized toolbar?",4+32+256) = 6
title$ = iff(info(3,6)="5","BUI","GUI") + " " + info(1,4)
text$ = "<html><head><style>p{margin:0;padding:0;}</style><title>BASIS</title></head><body>"
img$ = "https://www.basis.cloud/sites/basis.com/files/images/BusJGBetter.jpg"
text$ = text$ + "<img src="""+img$+""">"
url$ = "https://documentation.basis.cloud/BASISHelp/WebHelp/bbjobjects/Window/bbjhtmledit/BBjHtmlEdit.htm"
text$ = text$ + "<p>This is a <a href="""+url$+""">BBjHtmlEdit</a>."
text$ = text$ + "</body></html>"
text = unt
open (text,err=oops)"htmledit.html"
bytes = dec(fin(text)(1,4))
readrecord (text,siz=bytes)text$
close (unt)

oops:
sysgui = unt
open (sysgui)"X0"
sysgui! = bbjapi().getSysGui()
window! = sysgui!.addWindow(0,25,25,850,550,title$,$00090093$)
window!.setCallback(window!.ON_CLOSE,"eoj")
window!.setCallback(window!.ON_RESIZE,"resize")

rem ' $0001$ = disabled, $0010$ = invisible
rem ' $0002$ = minimized toolbar, $0004$ = basic toolbar
flags$ = $0000$
if minimized then flags$ = ior(flags$,$0002$)
if basic then flags$ = ior(flags$,$0004$)
htmledit! = window!.addHtmlEdit(101,25,75,800,450,text$,flags$)

rem 'htmledit!.setLocale("de_DE")
print "getClientType: ",htmledit!.getClientType(err=*next)
print "getClientVersion: ",htmledit!.getClientVersion(err=*next)
title$ = window!.getTitle() + " " + htmledit!.getClientType(err=*next) + " " + htmledit!.getClientVersion(err=*next)
window!.setTitle(title$)
htmledit!.setCallback(htmledit!.ON_PAGE_LOADED,"page")
htmledit!.setCallback(htmledit!.ON_GAINED_FOCUS,"event")
htmledit!.setCallback(htmledit!.ON_LOST_FOCUS,"event")
htmledit!.setCallback(htmledit!.ON_MOUSE_ENTER,"event")
htmledit!.setCallback(htmledit!.ON_MOUSE_EXIT,"event")
htmledit!.setCallback(htmledit!.ON_POPUP_REQUEST,"event")
htmledit!.setCallback(htmledit!.ON_RIGHT_MOUSE_DOWN,"event")
htmledit!.setCallback(htmledit!.ON_EDIT_MODIFY,"event")
htmledit!.setCallback(htmledit!.ON_STATE_CHANGE,"state")
flags$ = iff(htmledit!.isEnabled(),$0004$,$0000$)
enabled! = window!.addCheckBox(1,25,25,95,25,"Enabled",flags$)
enabled!.setCallback(enabled!.ON_CHECK_ON,"enable")
enabled!.setCallback(enabled!.ON_CHECK_OFF,"disable")
flags$ = iff(htmledit!.isVisible(),$0004$,$0000$)
visible! = window!.addCheckBox(2,125,25,95,25,"Visible",flags$)
visible!.setCallback(visible!.ON_CHECK_ON,"show")
visible!.setCallback(visible!.ON_CHECK_OFF,"hide")
flags$ = iff(htmledit!.isFocusable(),$0004$,$0000$)
focusable! = window!.addCheckBox(3,225,25,95,25,"Focusable",flags$)
focusable!.setCallback(focusable!.ON_CHECK_ON,"focusable_on")
focusable!.setCallback(focusable!.ON_CHECK_OFF,"focusable_off")
flags$ = iff(htmledit!.isTabTraversable(),$0004$,$0000$)
traversable! = window!.addCheckBox(4,325,25,95,25,"Traversable",flags$)
traversable!.setCallback(traversable!.ON_CHECK_ON,"traversable_on")
traversable!.setCallback(traversable!.ON_CHECK_OFF,"traversable_off")
flags$ = iff(htmledit!.getBasicToolbar(),$0004$,$0000$)
basic! = window!.addCheckBox(5,425,25,120,25,"Basic Toolbar",flags$)
basic!.setCallback(traversable!.ON_CHECK_ON,"basic_toolbar_on")
basic!.setCallback(traversable!.ON_CHECK_OFF,"basic_toolbar_off")
focus! = window!.addToolButton(6,550,25,100,25,"Focus",$$)
focus!.setCallback(focus!.ON_TOOL_BUTTON_PUSH,"focus")
showToolbarStyles! = window!.addToolButton(7,655,25,175,25,"setBasicToolbarStyles",$$)
showToolbarStyles!.setCallback(showToolbarStyles!.ON_TOOL_BUTTON_PUSH,"showToolbarStyles")
states! = htmledit!.getAvailableStates()
java.util.Collections.sort(states!)
states$ = ""
if (states!.size() > 0) then
    for i = 0 to states!.size() - 1
        states$ = states$ + states!.get(i) + $0a$
    next i
endif
state! = window!.addListButton(8,25,50,175,175,states$,$$)
state!.selectIndex(0)
values$ = "toggle" + $0a$ + "false" + $0a$ + "true" +$0a$
stateValue! = window!.addListButton(9,225,50,175,175,values$,$$)
stateValue!.selectIndex(0)
setState! = window!.addButton(10,425,50,175,25,"setState",$$)
setState!.setCallback(setState!.ON_BUTTON_PUSH,"setState")
getAvailableStates! = window!.addToolButton(11,655,50,175,25,"getAvailableStates",$$)
getAvailableStates!.setCallback(getAvailableStates!.ON_TOOL_BUTTON_PUSH,"getAvailableStates")
window!.setVisible(1)
x = window!.getX() + window!.getWidth()
y = window!.getY()
w = 500
h = window!.getHeight()
styles! = sysgui!.addWindow(1,x,y,w,h,"toolbarStyles",$00090093$)
styles!.setCallback(styles!.ON_CLOSE,"hideToolbarStyles")
allStyles! = htmledit!.getAllToolbarStyles()
java.util.Collections.sort(allStyles!)
basicStyles! = new java.util.HashSet(htmledit!.getBasicToolbarStyles())
x = 25
y = 25
w = 175
h = 25
styles = allStyles!.size()
if (styles) then
    for style = 0 to styles - 1
        style$ = allStyles!.get(style)
        flags$ = iff(basicStyles!.contains(style$),$0004$,$0000$)
        style! = styles!.addCheckBox(style+100,x,y,w,h,style$,flags$)
        style!.setCallback(style!.ON_CHECK_ON,"addBasicStyle")
        style!.setCallback(style!.ON_CHECK_OFF,"removeBasicStyle")
        y = y + h
        if y > 500 then y = 25, x = x + w
    next style
endif
process_events

eoj:
release

page:
    gosub event

    rem 'print event!.getControl().getText()
return

resize:
    gosub event
    width = event!.getWidth()
    height = event!.getHeight()
    htmledit!.setSize(width-50,height-100)
    print width,height
return

state:
    event! = sysgui!.getLastEvent()
    msg$ = event!.getState()+" = "+Boolean.toString(event!.getValue())
    gosub event
    i = msgbox(msg$,0,event!.getEventName())
return

event:
    event! = sysgui!.getLastEvent()
    control! = event!.getControl()
    event$ = event!.getEventName()+" "+str(control!)
    print event$
    System.err.println(event$)
return

enable:
    htmledit!.setEnabled(1)
return

disable:
    htmledit!.setEnabled(0)
return

show:
    htmledit!.setVisible(1)
return

hide:
    htmledit!.setVisible(0)
return

focusable_on:
    htmledit!.setFocusable(1)
return

focusable_off:
    htmledit!.setFocusable(0)
return

traversable_on:
    htmledit!.setTabTraversable(1)
return

traversable_off:
    htmledit!.setTabTraversable(0)
return

basic_toolbar_on:
    htmledit!.setBasicToolbar(1)
return

basic_toolbar_off:
    htmledit!.setBasicToolbar(0)
return

focus:
    htmledit!.focus()
return

showToolbarStyles:
    styles!.setVisible(1)
    styles!.focus()
return

hideToolbarStyles:
    styles!.setVisible(0)
    window!.focus()
return

getAvailableStates:
    states! = htmledit!.getAvailableStates()
    java.util.Collections.sort(states!)
    states$ = ""
    if (states!.size() > 0) then
        for i = 0 to states!.size() - 1
            state$ = states!.get(i)
            states$ = states$ + state$ + " = " + Boolean.toString(htmledit!.getState(state$)) + $0a$
        next i
    endif
    i = msgbox(states$,0,"getAvailableStates")
return

setState:
    state$ = state!.getText()
    value$ = stateValue!.getText().toLowerCase()
    value! = null()
    switch value$
        case "toggle"; value! = null(); break
        case "true"; value! = Boolean.TRUE; break
        case "false"; value! = Boolean.FALSE; break
        case default; escape
        swend
        print state$," = ",stateValue!.getText()," = ",value!
        System.err.println(state$+" = "+stateValue!.getText()+" = "+str(value!))
        if len(state$) htmledit!.setState(state$,value!)
        return

addBasicStyle:
    style$ = sysgui!.getLastEvent().getControl().getText()

    rem 'print "addBasicStyle ",style$
    basicStyles!.add(style$)
    gosub setBasicToolbarStyles
return

removeBasicStyle:
    style$ = sysgui!.getLastEvent().getControl().getText()

    rem 'print "removeBasicStyle ",style$
    basicStyles!.remove(style$)
    gosub setBasicToolbarStyles
return

setBasicToolbarStyles:
    vector! = bbjapi().makeVector()
    iter! = basicStyles!.iterator()
    while iter!.hasNext()
        vector!.add(iter!.next())
    wend
    print "htmledit!.setBasicToolbarStyles(",vector!,")"
    htmledit!.setBasicToolbarStyles(vector!)
return

See Also

BBjAPI

BBjSysGui

BBjControl

BBjWindow

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