; docformat = 'rst' ;+ ; Simple example of displaying an image in object graphics. ; ; :Params: ; im : in, required, type="2,3D numeric array" ; image to display ; ; :Keywords: ; _extra : in, optional, type=keywords ; keywords to IDLgrImage::init or IDLgrWindow::init ;- pro mg_ogimage_example, im, _extra=e compile_opt strictarr view = obj_new('IDLgrView') model = obj_new('IDLgrModel') view->add, model image = obj_new('IDLgrImage', im, _extra=e) model->add, image image->getProperty, dimensions=dims view->setProperty, viewplane_rect=[0, 0, dims - 1L] window = obj_new('IDLgrWindow', dimensions=dims, graphics_tree=view, _extra=e) window->draw end