BBjMenuItem::clearImageSize

rem ' BBjMenuItem::clearImageSize

image$ = "http://basis.cloud/sites/basis.com/files/amity_island_logo.jpg"
print "Image: ",image$
sysgui = unt
open (sysgui)"X0"
sysgui! = bbjapi().getSysGui()
imagemanager! = sysgui!.getImageManager()
image! = javax.imageio.ImageIO.read(newjava.net.URL(image$))
os! = new java.io.ByteArrayOutputStream()
javax.imageio.ImageIO.write(image!,"jpg",os!)
bytes! = os!.toByteArray()
image! = imagemanager!.loadImageFromBytes(bytes!)
print "Image width:",image!.getWidth()
print "Image height:",image!.getHeight()
window! = sysgui!.addWindow(100,100,250,225,"clearImageSize",$00090003$)
window!.setCallback(window!.ON_CLOSE,"eoj")
menubar! = window!.addMenuBar()
menu! = menubar!.addMenu(-100,"&Menu")
menu!.setImageSize(image!.getWidth()/4,image!.getHeight()/4)
menu!.setImage(image!)
menuitem! = menu!.addMenuItem(-101,"MenuItem")
menuitem!.setImageSize(image!.getWidth()/4,image!.getHeight()/4)
menuitem!.setImage(image!)
menuitem!.setCallback(menuitem!.ON_MENU_ITEM_SELECT,"resetImageSize")
unscaled! = window!.addButton(101,25,25,200,100,"",$$)
unscaled!.setImage(image!)
scaled! = window!.addButton(102,25,150,200,50,"ScaledImage",$$)
scaled!.setImage(image!)
scaled!.setImageSize(image!.getWidth()/2,image!.getHeight()/2)
process_events

eoj:
release

resetImageSize:
    if menuitem!.getImageHeight()>16then
        menuitem!.setImageSize(image!.getWidth()/4,image!.getHeight()/4)
    else
        menuitem!.clearImageSize()
    endif
    print "MenuItem ImageSize:",
    print menuitem!.getImageWidth(),
    print menuitem!.getImageHeight()