GefPipeFormat (object)

Represents the image attributes of an object.
Description: The GefPipeFormat object represents the attributes of Pipe Object.


Sub GefObject_PipeFormat()
    Dim oCimObj As GefObject
    Dim oCimPipeFormat As GefPipeFormat
    Set oCimObj = CimGetObject
    Set oCimPipeFormat = oCimObj.PipeFormat
    If oCimPipeFormat Is Nothing Then
        MsgBox "This object is not pipe object"
        MsgBox "This object is PipeObject"
    End If
End Sub
Properties: Application , Flare , Parent , Radius