sysgui = unt
open (sysgui)"X0"
sysgui! = bbjapi().getSysGui()
window! = sysgui!.addWindow(100,100,300,175,"Popup Sample",$00090003$,$$)
popup! = sysgui!.addPopupMenu()
item1! = popup!.addMenuItem(-1,"Popup Item 1")
item2! = popup!.addMenuItem(-1,"Popup Item 2")
item3! = popup!.addMenuItem(-1,"Popup Item 3")
item1!.setCallback(item1!.ON_POPUP_ITEM_SELECT,"popup")
item2!.setCallback(item2!.ON_POPUP_ITEM_SELECT,"popup")
item3!.setCallback(item3!.ON_POPUP_ITEM_SELECT,"popup")
edit1! = window!.addEditBox(101,25,25,250,25,"Right-click here for the browser default menu",$$)
edit2! = window!.addEditBox(102,25,75,250,25,"Right-click here for the custom popup menu",$$)
edit2!.setPopupMenu(popup!)
edit3! = window!.addEditBox(103,25,125,250,25,"Right-click here to fire a popup request event",$$)
edit3!.setCallback(edit3!.ON_POPUP_REQUEST,"request")
window!.setCallback(window!.ON_CLOSE,"eoj")
process_events
eoj:
  release
request:
  event! = sysgui!.getLastEvent()
  control! = event!.getControl()
  i = msgbox(event!.toString()+" x="+str(event!.getX())+",y="+str(event!.getY()))
return
popup:
  event! = sysgui!.getLastEvent()
  i = msgbox(event!.toString()+" menuitem="+event!.getMenuItem().toString()+" control="+event!.getControl().toString())
return