BBjListEdit::openList

rem ' openList/closeList

sysgui = unt

open (sysgui)"X0"

sysgui! = bbjapi().getSysGui()

window! = sysgui!.addWindow(100,100,280,250,"open/close",$00090003$,$$)

window!.setCallback(window!.ON_CLOSE,"eoj")

toggle_listbutton! = window!.addToolButton(201,10,10,125,20,"LISTBUTTON",$0400$)

toggle_listbutton!.setCallback(toggle_listbutton!.ON_TOOL_BUTTON_PUSH,"listbutton")

toggle_listedit! = window!.addToolButton(202,145,10,125,20,"LISTEDIT",$0400$)

toggle_listedit!.setCallback(toggle_listedit!.ON_TOOL_BUTTON_PUSH,"listedit")

list$=$$

for i = 0 to 999

 list$ = list$ + str(i:"000")+$0a$

next i

listbutton! = window!.addListButton(101,10,40,125,200,list$,$$)

listedit! = window!.addListEdit(102,145,40,125,200,list$,$$)

process_events

eoj:

release

listbutton:

 if toggle_listbutton!.isSelected() then

    listbutton!.openList()

 else

    listbutton!.closeList()

 endif

return

listedit:

 if toggle_listedit!.isSelected() then

    listedit!.openList()

 else

    listedit!.closeList()

 endif