Method: IsKindOf for BaseChannel <Data>

Download PDF

Updated2024-09-12
3 minute(s) read

Checks the type of an element in the script interface for internal data.

bIsKindOf = Object.IsKindOf(Type)

Object

BaseChannel <Data>
Object with this method

Type

String
Specifies the type of the element to be checked.
Enumeration with the following selection terms:

eDataRoot	Root type object
eDataChannelGroup	ChannelGroup type object
eDataChannel	Channel type object
eDataChannelWF	Waveform channel type object
eDataAssignmentChannel	Assignment channel type object
eDataImplicitChannel	Implicit channel type object
eDataChannelPair	XY-channel type object
eDataCalculationChannel	Calculation channel type object
eDataCalculationChannelFormula	Calculation channel type object of Formula type
eDataCalculationChannelReference	Calculation channel type object of Calculation Manager calculations type.
eDataVideoChannel	Video channel type object
eDataComplexChannel	Complex channel type object

bIsKindOf

Boolean
The value is TRUE if the object is the specified type.

The following example prompts you to select an item from the Data Portal and then to disable the interaction mode. The example displays whether you have selected the data set (root), a channel group, or a channel, in the Data Portal:

VBScript

Python

Copy script

Dim oMyElement
Call MsgBoxDisp ("Please select one element in the Data Portal. Click 'interaction off' after selecting.")
Call InteractionOn()
Set oMyElement = Portal.ActiveView.Selection(1)
If oMyElement.IsKindOf(eDataRoot) Then
  Call MsgBoxDisp ("Selected element: Root")
ElseIf oMyElement.IsKindOf(eDataChannelGroup) Then
  Call MsgBoxDisp ("Selected element: ChannelGroup")
Else
  If oMyElement.IsKindOf(eDataChannelWF) Then
    Call MsgBoxDisp ("Selected element: Waveform channel")
  End If
  If oMyElement.IsKindOf(eDataImplicitChannel) Then
    Call MsgBoxDisp ("Selected element: Implicit channel")
  End If
  If oMyElement.IsKindOf(eDataAssignmentChannel) Then
    Call MsgBoxDisp ("Selected element: Assignment channel")
  End If
  If oMyElement.IsKindOf(eDataChannelPair) Then
    Call MsgBoxDisp ("Selected element: XY channel")
  End If
  If oMyElement.IsKindOf(eDataCalculationChannel) Then
    Call MsgBoxDisp ("Selected element: Calculation channel")
  End If
  If oMyElement.IsKindOf(eDataVideoChannel) Then
    Call MsgBoxDisp ("Selected element: Video channel")
  End If
  If oMyElement.IsKindOf(eDataComplexChannel) Then
    Call MsgBoxDisp ("Selected element: Complex channel")
  End If
  If oMyElement.IsKindOf(eDataChannel) Then
    Call MsgBoxDisp ("Selected element: Channel")
  End If
End If

dd.MsgBoxDisp ("Please select one element in the Data Portal. Click 'interaction off' after selecting.") 
dd.InteractionOn() 
oMyElement = dd.Portal.ActiveView.Selection(1) 
if oMyElement.IsKindOf(dd.eDataRoot) : 
    dd.MsgBoxDisp ("Selected element: Root") 
elif oMyElement.IsKindOf(dd.eDataChannelGroup) : 
    dd.MsgBoxDisp ("Selected element: ChannelGroup") 
else: 
    if oMyElement.IsKindOf(dd.eDataChannelWF) : 
        dd.MsgBoxDisp ("Selected element: Waveform channel") 
    if oMyElement.IsKindOf(dd.eDataImplicitChannel) : 
        dd.MsgBoxDisp ("Selected element: Implicit channel") 
    if oMyElement.IsKindOf(dd.eDataAssignmentChannel) : 
        dd.MsgBoxDisp ("Selected element: Assignment channel") 
    if oMyElement.IsKindOf(dd.eDataChannelPair) : 
        dd.MsgBoxDisp ("Selected element: XY channel") 
    if oMyElement.IsKindOf(dd.eDataCalculationChannel) : 
        dd.MsgBoxDisp ("Selected element: Calculation channel") 
    if oMyElement.IsKindOf(dd.eDataVideoChannel) : 
        dd.MsgBoxDisp ("Selected element: Video channel") 
    if oMyElement.IsKindOf(dd.eDataComplexChannel) : 
        dd.MsgBoxDisp ("Selected element: Complex channel") 
    if oMyElement.IsKindOf(dd.eDataChannel) : 
        dd.MsgBoxDisp ("Selected element: Channel")

The following example determines whether an element selected in the Data Portal is a waveform channel and if so, displays the name and the unit of the waveform channel:

VBScript

Python

Copy script

Dim oMyElement
Set oMyElement = Portal.ActiveView.Selection(1)
If oMyElement.IsKindOf(eDataChannelWF) Then
  Call MsgBoxDisp("Property name: " & oMyElement.Properties("wf_xname").Value & VBCrLf & _
  "Property unit: " & oMyElement.Properties("wf_xunit_string").Value)
Else
  Call MsgBoxDisp ("Selected element is no waveform channel")
End If

oMyElement = dd.Portal.ActiveView.Selection(1) 
if oMyElement.IsKindOf(dd.eDataChannelWF) : 
    dd.MsgBoxDisp("Property name: " + oMyElement.Properties("wf_xname").Value + "\r\n" + "Property unit: " + oMyElement.Properties("wf_xunit_string").Value) 
else: 
    dd.MsgBoxDisp ("Selected element is no waveform channel")