Send Topic Feedback | See Object Hierarchy Chart
PC-DMIS 2023.1 Object Library
Members 
PCDLRN ActiveX DLL : ReadoutWindow Object
ReadoutWindow Object
Description

This object lets you work with PC-DMIS's Probe Readout window.

Object Model
ReadoutWindow ObjectApplication ObjectPartProgram Object
Example

Private Sub CommandAngles()
' This subroutine returns the AB Angles
Dim App As PCDLRN.Application
  Set App = CreateObject("PCDLRN.Application")
  Dim Part As PCDLRN.PartProgram
  Set Part = App.ActivePartProgram
  Dim DRO As PCDLRN.ReadoutWindow
  Set DRO = Part.GetReadoutWindow(1)
  MsgBox "A = " & DRO.GetAAngle(1) & ", B = " & DRO.GetBAngle(1)
End Sub

See Also