Introduzione
In questo breve post affronteremo come esporre l'elenco degli stili lamiera in Autodesk inventor, e visto che ci siamo, come impostarne uno.Iniziamo con il DOM (Document Object Model) delle api di inventor che ci permettono di accedere alle informazioni desiderate. Ci servirà sapere che:
Lo stile lamiera ha la propria classe:
SheetMetalStyle
Gli stili lamiera sono contenuti nella lista
ThisDoc.Document.componentdefinition.SheetMetalStyles
Implementazione
A seguire l'implementazione di una funziona che scansione i nomi degli stili lamiera attivi nel documento corrente, e se non hanno nel nome la parola "default" li aggiunge a una lista di nomi che poi restituisce.Do per scontato che abbiamo come documento attivo un documento di tipo "lamiera" .
La funzione proposta non considera i nomi "dafault" in quanto si ipotizza che l'utente abbia creato i propri stili lamiera, e voglia scegliere tra questi.
'Return a list of not default sheetmetal styles names Function asGetSMStyleNames() As ArrayList Dim asStileNameSimpleList As New ArrayList For Each asTmpStyle As SheetMetalStyle In ThisDoc.Document.componentdefinition.SheetMetalStyles If asTmpStyle.Name.ToLower.IndexOf("default") = -1 asStileNameSimpleList.Add(asTmpStyle.Name) End If Next Return asStileNameSimpleList End Function
sub Main() 'Fill in a multi value parameter MultiValue.List("MyDropBoxSmSelector") = asGetSMStyleNames() 'Activate the selected SheetMetal Style ThisDoc.Document.componentdefinition.SheetMetalStyles.Item(Parameter("SHEETMETAL_STYLE")).Activate end sub
