IDL.GUI之按钮经典案例

15195775117

按照案例理解程序学习得最快了，以下程序十分经典！

PRO WIDGET_BUTTON_EXAMPLE
  ;创建base
  tlb = WIDGET_BASE($
    xoffset = 400, $
    yoffset = 400, $
    /column, $
    mbar =mbar,$;设置mbar=菜单栏组件ID,则base有了菜单栏
    title ='test_button')
  menu = WIDGET_BUTTON(mbar, value ='文件(&F)');菜单之下新建“文件”按钮
  fmenu = WIDGET_BUTTON(menu, value ='打开');文件按钮下新建“打开”按钮
    mMenu = WIDGET_BUTTON(menu, value ='进入',/menu);/menu表示该按钮下还创建按钮
  tMenu = WIDGET_BUTTON(mMenu, value ='二级',/menu)
  eMenu = WIDGET_BUTTON(menu, value ='退出',/SEPARATOR);/SEPARATOR表示添加分割线
  ;创建上下两个base组件
  ubase = WIDGET_BASE(tlb,/row)
  dbase = WIDGET_BASE(tlb,/row)
  ;创建鼠标放置有提示的按钮和图标按钮
  b = WIDGET_BUTTON(ubase,value = '按钮',tooltip = '创建的button');tooltip表示光标悬浮其上会显示的字符
  h = WIDGET_BUTTON(ubase,value = BINDGEN(2,40))
  ;创建位图图标按钮
  bmpfile  = FILEPATH('colorbar.bmp', SUBDIRECTORY=['resource','bitmaps']);读取位图文件
  bit =WIDGET_BUTTON(ubase,value =bmpfile,/bitmap);位图设置为按钮之图
  ;设置widget_Base关键字创建单选button'
  exbase = WIDGET_BASE(dbase,/EXCLUSIVE,/column);/EXCLUSIVE表示只能单选，对应的按钮称为单选按钮
  eb1 = WIDGET_BUTTON(exbase,value ='对')
  eb2 = WIDGET_BUTTON(exbase,value ='错')
  ;设置widget_Base关键字创建多选按钮
  nexbase = WIDGET_BASE(dbase,/NONEXCLUSIVE,/column);/NONEXCLUSIVE表示可以多选,对应的按钮称为复选按钮
  eb1 = WIDGET_BUTTON(nexbase,value ='envi')
  eb2 = WIDGET_BUTTON(nexbase,value ='idl')
  ;显示界面
  WIDGET_CONTROL,tlb,/realize
END

15195775117

俺发现，单选框是个圆，复选框是方框