DVEdgeStyleName Property

Description

Gets or sets the drawing view edge styles for the specified edge type.

Property type

Read-write property

Syntax

Visual Basic
Public Property DVEdgeStyleName( _ ByVal Element As DrawingViewEdgeStyleMappingEdgeType _ ) As String

Parameters

Element

Value	Description
seDVEdgeStyleMapping_CoordinateSystemEdge
seDVEdgeStyleMapping_HiddenEdge
seDVEdgeStyleMapping_ReferenceHiddenEdge
seDVEdgeStyleMapping_ReferenceTangentEdge
seDVEdgeStyleMapping_ReferenceVisibleEdge
seDVEdgeStyleMapping_TangentEdge
seDVEdgeStyleMapping_VisibleEdge

Example

Example (VB.NET)

Imports System.Runtime.InteropServices
Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim objApp As SolidEdgeFramework.Application
        Dim objDoc As SolidEdgeDraft.DraftDocument
        Dim objFilePrefs As SolidEdgeDraft.DraftFilePreferences
        Dim objEdgeStyleName As String
        Try
            objApp = Marshal.GetActiveObject("SolidEdge.Application")
            objDoc = objApp.ActiveDocument()
            objFilePrefs = objDoc.FilePreferences()

            '// Visible
            objEdgeStyleName = objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_VisibleEdge)
            objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_VisibleEdge) = "Phantom"

            '// Hidden
            objEdgeStyleName = objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_HiddenEdge)

            objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_HiddenEdge) = "Phantom"

            '// Tangent
            objEdgeStyleName = objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_TangentEdge)

            objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_TangentEdge) = "Phantom"

            '// COMANDCS
            objEdgeStyleName = objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_CoordinateSystemEdge)

            objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_CoordinateSystemEdge) = "Phantom"

            '// Reference Visible
            objEdgeStyleName = objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_ReferenceVisibleEdge)

            objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_ReferenceVisibleEdge) = "Phantom"

            '// Reference Hidden
            objEdgeStyleName = objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_ReferenceHiddenEdge)

            objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_ReferenceHiddenEdge) = "Phantom"

            '// Reference Tangent
            objEdgeStyleName = objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_ReferenceTangentEdge)

            objFilePrefs.DVEdgeStyleName(SolidEdgeConstants.DrawingViewEdgeStyleMappingEdgeType.seDVEdgeStyleMapping_ReferenceTangentEdge) = "Phantom"
        Catch ex As Exception
            MsgBox(ex.ToString)
        End Try
    End Sub
End Class