13.脚本解剖.pptVIP

脚本;脚本学习安排;什么是VisionPro脚本;使用脚本的理由;脚本使用;两种脚本;;为工作打开脚本编辑器;;为工具组打开脚本编辑器;当您打开工具组脚本编辑器时，您可以用给定的空白模板开始 ;组运行（ GroupRun ）;记录覆盖;初始化;工具组脚本状态图;例 1;Imports System Imports Cognex.VisionPro Imports Cognex.VisionPro.ToolGroup Public Class UserScript Inherits CogToolGroupBaseScript ‘为我们的输入和输出声明一些变量 Private input As Double Private output As Double ‘GroupRun函数在运行工具组时调用。这里提供的默认执行 ‘等同于工具组的标准动作。修改该函数将允许您修改 ‘在工具组运行时的动作 Overrides Function GroupRun(ByRef message As String, _ ByRef result As CogToolResultConstants) _ As Boolean . . .;例1 – 步骤2;例1 – 步骤 3;例1 – 步骤 3 （续）;例 1 – 步骤 4;为我们的工具创建一个模板文件;例2;例2（续）;例2（续）;例2;例2;添加/删除参数;例3;例3（续）;例3（续）;例3（续）;例 4;例4（续）;例4（续）;例4（续）;例4（续）;例4（续）;例4（续）;例4（续）;例4（续）; Dim badObjectFound As Boolean = False ‘每个目标运行一次游标卡尺工具 建立使用斑点工具。 For Each blob As CogBlobResult In blobResults ‘在我们为每个目标运行游标卡尺的位置，使用斑点质心建立区域。 caliperRegion.CenterX = blob.CenterOfMassX caliperRegion.CenterY = blob.CenterOfMassY toolGroup.RunTool(caliperTool, message, result) If caliperTool.Results.Count = 0 Then BadObjectFound = True End If Next ‘如果一个或多个目标损坏，建立我们的目标检查结果。 If BadObjectFound Then result = CogToolResultConstants.Reject End If ‘反回错误表明，我们在脚本中运行的工具，这们不应该由VisionPro 运行 Return False ;例4（续）; Dim badObjectFound As Boolean = False ‘在之前运行后重新设置任何标签 labels = New ArrayList 对使用blob工具找到的每个目标使用一次Caliper工具。 For Each blob As CogBlobResult In blobResults ‘使用blob的质心设置我们对每个目标运行Caliper的区域。 caliperRegion.CenterX = blob.CenterOfMassX caliperRegion.CenterY = blob.CenterOfMassY toolGroup.RunTo