如下代碼:
if err_sys=1 then
err_sys=0
return
else
open(w_system_error)
end if
在窗口上列出以下內容
st_2:error sle_2:error_programe
st_3:error line sle_3:error_line
st_4:error text sle_4:error_message
如下代碼:
error_code.text=string(error.number)
if error.object=error.windowmenu then
error_programe.text="object:"+error.windowmenu + "~r~nevent:"+error.objectevent
else
error_programe.text="object:"+error.windowmenu + "." + error.object+ "~r~nevent:"+error.objectevent
end if
error_line.text=string(error.line)
error_message.text=(error.text)