VP脚本中添加可拖动的 CogPointMarker

#region namespace imports
using System;
using System.Collections;
using System.Drawing;
using System.IO;
using System.Windows.Forms;
using Cognex.VisionPro;
using Cognex.VisionPro.ToolBlock;
using Cognex.VisionPro3D;
using Cognex.VisionPro.ImageProcessing;
#endregion

public class CogToolBlockAdvancedScript : CogToolBlockAdvancedScriptBase
{
  #region Private Member Variables
  private Cognex.VisionPro.ToolBlock.CogToolBlock mToolBlock;
  
  
  CogPointMarker pointMarker = null;
  
  #endregion

  /// <summary>
  /// Called when the parent tool is run.
  /// Add code here to customize or replace the normal run behavior.
  /// </summary>
  /// <param name="message">Sets the Message in the tool's RunStatus.</param>
  /// <param name="result">Sets the Result in the tool's RunStatus</param>
  /// <returns>True if the tool should run normally,
  ///          False if GroupRun customizes run behavior</returns>
  public override bool GroupRun(ref string message, ref CogToolResultConstants result)
  {
    // To let the execution stop in this script when a debugger is attached, uncomment the following lines.
     #if DEBUG
     if (System.Diagnostics.Debugger.IsAttached) System.Diagnostics.Debugger.Break();
     #endif


    // Run each tool using the RunTool function
    foreach(ICogTool tool in mToolBlock.Tools)
      mToolBlock.RunTool(tool, ref message, ref result);
    
    if(pointMarker == null)
    {
      pointMarker = new CogPointMarker();
      pointMarker.Color = CogColorConstants.Orange;
      pointMarker.SelectedSpaceName = "@";
      pointMarker.LineWidthInScreenPixels = 2;
      pointMarker.GraphicType = CogPointMarkerGraphicTypeConstants.Cross;
      pointMarker.SizeInScreenPixels = 50;
      pointMarker.GraphicDOFEnableBase = CogGraphicDOFConstants.All;
      pointMarker.GraphicDOFEnable = CogPointMarkerDOFConstants.All;
      pointMarker.Interactive = true;    
      pointMarker.SelectedLineWidthInScreenPixels = pointMarker.LineWidthInScreenPixels;
      pointMarker.SelectedColor = CogColorConstants.Yellow;
      pointMarker.SelectedLineStyle = CogGraphicLineStyleConstants.DashDot;
      pointMarker.Changed += Fun;
    }
    
    
    
    return false;
  }
  
  private void Fun(Object sender,CogChangedEventArgs e)
  {
   
    pointMarker.X = ((CogPointMarker) sender).X;
    pointMarker.Y = ((CogPointMarker) sender).Y;
    
    if(pointMarker != null)
    {   
     
      pointMarker.TipText = "测高位置" + pointMarker.X.ToString() + "," + pointMarker.Y;
      
      
      Cognex.VisionPro.ICogRecord lastRecord = mToolBlock.CreateLastRunRecord();
      
      mToolBlock.AddGraphicToRunRecord(pointMarker, lastRecord, lastRecord.SubRecords["CogIPOneImageTool1.OutputImage"].RecordKey, pointMarker.TipText);
    }
    
  }
  
  #region When the Current Run Record is Created
  /// <summary>
  /// Called when the current record may have changed and is being reconstructed
  /// </summary>
  /// <param name="currentRecord">
  /// The new currentRecord is available to be initialized or customized.</param>
  public override void ModifyCurrentRunRecord(Cognex.VisionPro.ICogRecord currentRecord)
  {
  }
  #endregion

  #region When the Last Run Record is Created
  /// <summary>
  /// Called when the last run record may have changed and is being reconstructed
  /// </summary>
  /// <param name="lastRecord">
  /// The new last run record is available to be initialized or customized.</param>
  public override void ModifyLastRunRecord(Cognex.VisionPro.ICogRecord lastRecord)
  {
    
    
    
  }
  #endregion

  #region When the Script is Initialized
  /// <summary>
  /// Perform any initialization required by your script here
  /// </summary>
  /// <param name="host">The host tool</param>
  public override void Initialize(Cognex.VisionPro.ToolGroup.CogToolGroup host)
  {
    // DO NOT REMOVE - Call the base class implementation first - DO NOT REMOVE
    base.Initialize(host);


    // Store a local copy of the script host
    this.mToolBlock = ((Cognex.VisionPro.ToolBlock.CogToolBlock)(host));
  }
  #endregion

}