Properties collection
Option Infer On Imports System Imports System.Runtime.InteropServices Namespace Examples Friend Class Program <STAThread> Shared Sub Main(ByVal args() As String) Dim application As DesignManager.Application = Nothing Dim propertySets As DesignManager.PropertySets = Nothing Dim properties As DesignManager.Properties = Nothing Try application = New DesignManager.Application() propertySets = CType(application.PropertySets, DesignManager.PropertySets) propertySets.Open("C:\Part1.par", True) properties = CType(propertySets.Item("Custom"), DesignManager.Properties) Catch ex As System.Exception Console.WriteLine(ex) End Try End Sub End Class End Namespace
using System; using System.Runtime.InteropServices; namespace Examples { class Program { [STAThread] static void Main(string[] args) { DesignManager.Application application = null; DesignManager.PropertySets propertySets = null; DesignManager.Properties properties = null; try { application = new DesignManager.Application(); propertySets = (DesignManager.PropertySets)application.PropertySets; propertySets.Open(@"C:\Part1.par", true); properties = (DesignManager.Properties)propertySets.Item["Custom"]; } catch (System.Exception ex) { Console.WriteLine(ex); } } } }