康耐视VisionPro脚本的编写

 

‘GroupRun函数在运行工具组时调用。这里提供的默认执行等同于工具组的标准动作。修改该函数将允许您修改工具组运行时的动作

        Overrides Function GroupRun(ByRef message As String, _

                                 ByRef result As CogToolResultConstants) _

          As Boolean

 

            ‘使用RunTool函数运行工具组中的每个工具

            For toolIdx As Int32 = 0 To ToolGroup.Tools.Count - 1

                ToolGroup.RunTool(ToolGroup.Tools(toolIdx), message, result)

            Next

 

            ‘返回错误（ False ） 表示我们以脚本形式运行工具，而且它们不该由VisionPro运行

            Return False

        End Function

 

       

        Overrides Sub ModifyCurrentRunRecord(ByVal currentRecord As Cognex.VisionPro.ICogRecord)

 

        End Sub

 

        ‘在它被创建时允许您添加或者修改最后运行记录的内容

        ‘例如，这里您可以向运行的记录中添加自定义图形。

        Overrides Sub ModifyL