TLB = WIDGET_AUTO_BASE(title='小型的計算器')
?? text = WIDGET_LABEL(tlb,VALUE='這是個小型計算器',xsize=200,ysize=20)

; text = WIDGET_LABEL(tlb,VALUE='xxxxx')

???? cr=Widget_base(title='xxx')
; text = WIDGET_LABEL(tlb,VALUE='cccccc',ysize=10,frame=30)
?? p1 = WIDGET_PARAM(tlb, /auto_manage, dt=4, field=2, $
???? prompt='輸入第一個值',uvalue='p1',default=3,xsize=5)

?? p2 = WIDGET_PARAM(tlb, /auto_manage, dt=4, field=2, $
???? prompt='輸入第二個值', uvalue='p2',default=7.5,xsize=5)



?? operation = WIDGET_TOGGLE(tlb, /auto_manage, default=0,list=['加','乘'], prompt='運算',uvalue='operation')

result=AUTO_WID_MNG(TLB)
IF (result.accept eq 0) THEN return

IF (result.operation eq 0) THEN $
?? ENVI_INFO_WID, STRTRIM(result.p1 + result.p2) ELSE $
???? ENVI_INFO_WID, STRTRIM(result.p1 * result.p2)

轉載于:https://www.cnblogs.com/crmhf/p/3823160.html

總結

以上是生活随笔為你收集整理的IDL简易计算器的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。