?? getinfoa.pro
字號:
ErrorNo = 0
Catch, ErrorNo
if (ErrorNo ne 0) then begin
Catch, /CANCEL
ErrArray = ['Application Error in '+pro_name+ '!', $
'Error Number: '+strtrim(!error,2), $
!Err_String]
a = DIALOG_MESSAGE(ErrArray, /ERROR)
;return
check_event = size(event)
if(check_event(0) eq 1) then begin
widget_control, get_uvalue=info, event.top
if event.top ne info.base then $
widget_control, event.top, /destroy
status = 'BAD'
return, status
endif else begin
status = 'BAD'
return, status
endelse
endif
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -