IDL界面实现算法.docVIP

IDL界面实现算法 Pro myinterface wxy = get_screen_size() drawx = wxy[0]*0.9 drawy = wxy[1]*0.9 ;创建界面 title = 水资源与水灾害空间信息服务系统 ; 创建顶base wtop = widget_base(title=title, /row,mbar=menubar) ; 创建菜单栏 wfilemenu = widget_button(menubar, value=文件, /menu,event_pro=) wyxclmenu = widget_button(menubar,value=影像预处理,/menu,event_pro=) wzsjsmenu = widget_button(menubar,value=指数计算,/menu,event_pro=) wgxxmenu = widget_button(menubar,value=敏感信息分析,/menu,event_pro=) wdwflmenu = widget_button(menubar,value=地物分类,/menu,event_pro=) wxxtqmenu = widget_button(menubar,value=信息提取,/menu,event_pro=) wbhjcmenu = widget_button(menubar,value=变化检测,/menu,event_pro=) wtjfxmenu = widget_button(menubar,value=统计分析,/menu,event_pro=) whelpmenu = widget_button(menubar,value=帮助,/menu,event_pro=) ;文件菜单子菜单 wopenimg = widget_button(wfilemenu, value=打开图像文件, uvalue=openimg,event_pro=) wopenshape =widget_button(wfilemenu, value=打开矢量文件, uvalue=openshape,event_pro=) wsave = widget_button(wfilemenu, value=保存为ENVI标准格式, uvalue=savenvi,/separator) wsave = widget_button(wfilemenu, value=保存为其他软件格式,/menu,/separator) wsave1 = widget_button(wsave, value=ERDAS IMAGINE, uvalue=save1) wsave2 = widget_button(wsave, value=ArcGIS地理数据库, uvalue=save2) wsave3 = widget_button(wsave, value=PCI, uvalue=save3) wsave4 = widget_button(wsave, value=TIFF/GeoTIFF, uvalue=save4) wsave5 = widget_button(wsave, value=HDF, uvalue=save5) wsave = widget_button(wfilemenu, value=保存为图像文件, uvalue=saveother2,/menu,/separator) wsave6 = widget_button(wsave, value=BMP, uvalue=save6) wsave7 = widget_button(wsave, value=JPEG, uvalue=save7) wsave8 = widget_button(wsave, value=PNG, uvalue=save8) wexit = widget_button(wfilemenu, value=退出, uvalue=exit,/separator) ;影像处理菜单子目录 proces1 = widget_button(wyxclmenu,value