halcon 异常处理

1，halcon开发环境中，由 dev_set_preferences ('suppress_handled_exceptions_dlg', 'false') 算子设置是否直接显示异常窗口，设为false则直接抛出。效果如下图。

故一般设为 true.

2，使用 try_catch 来处理程序异常。

抛出的 exception 信息可由   dev_get_exception_data (Exception, 'error_msg', ErrorMsg) 解析。如想获取更多的异常信息，参见如下代码。

for Index := 0 to |ImageNames| - 1 by 1
    try
        read_image (Image, ImageNames[Index])
    catch (Exception)
        dev_get_exception_data (Exception, 'error_code', ErrorCode)
        if (ErrorCode == 5200)
* 这里将Exception,ImageNames[Index]一起抛出了，ImageNames[Index] 这个字符串即为'user_data'。          
            throw ([Exception,ImageNames[Index]])
        endif
        throw (Exception)
    endtry
endfor
return ()

3，异常也可通过，dev_set_check  dev_error_var  来处理

dev_close_window ()
dev_open_window (0, 0, 512, 512, 'black', WindowHandle)

dev_error_var (Error, 1)
* 0 关闭 1 开启

dev_set_check ('~give_error') * 捕捉错误块，设置不直接抛出异常

FileName := 'fabri1'
read_image (Image, FileName)
ReadError := Error

dev_set_check ('give_error') * 捕捉错误块 ，设置直接抛出异常

* H_MSG_TRUE 程序正常执行
if (ReadError != H_MSG_TRUE)
    write_string (WindowHandle, 'wrong file name: ' + FileName)
endif
* Now the program will stop with an exception
* read_image (Image, FileName)