RobotStudio event

Get current position in VB.net

Options

How do i get the current TCP position i VB.net like the function CRobt() in rapid code

 

Best Regards

Klaus Soenderhegn
www.cadalysator.dk

Comments

  • PerSvensson
    Options

    Hi
    Something like this
    Example just writes the x value to the logg window

    'VB


    Public Sub Macro_CRobt()
    Dim stn As Station = Project.ActiveProject
    If stn Is Nothing Then Exit Sub
    Dim tool As RsToolData = stn.ActiveTask.ActiveTool
    Logger.AddMessage(
    New LogMessage(tool.Frame.GlobalMatrix.t.x.ToString()))

    End Sub

    //C#


    public void Macro_CRobT()
    {
    Station stn = Project.ActiveProject as Station;
    if (stn == null) return;
    RsToolData tool = stn.ActiveTask.ActiveTool;

    Logger.AddMessage(new LogMessage(tool.Frame.GlobalMatrix.t.x.ToString()));
    }
    Per Svensson
    Robotics and Vision Specialist
    Consat Engineering