你这定义的格式就不是halcon函数的定义方式,把所有的子程序都改成本地(外部也行)算子,拿你代码第一段的来说:
把缩进部分,全部选中,主要的代码是:
- disp_message(WindowHandle, Message, 'window', 12, 12, Color, 'true')
复制代码
然后右键“创建新函数”,名称填写log_message,参数:
完成后把多余的删除即可(endprocedure这段删除)
调用测试代码:
- dev_get_window (WindowHandle)
- log_message (WindowHandle,'It\'s Work','green')
复制代码
图像窗口正常情况下就可以看到打印出来的绿色字符串。
然后把剩下所有的都改下
- 函数名 := procedure(参数签名)
- //函数体
- endprocedure
复制代码
类似这样的代码都要重新封装算子,然后调用,设置本地函数就好。 |