Ich versuche mit VBA in Inventor 9 SP3 eine variable Kantenverundung mit zwei Zwischenradien zu erstellen.
Deshalb habe ich als erstes das Beispiel Fillet Feature (Complex) aus der API-Hilfe kopiert. Nach einer kleinen Änderung in Zeile 66 (aus Dim oLine As Line mache Dim oLine As Object) erstellt es unter anderem eine Kantenverundung mit einem Zwischenradius. Dazu wird in Zeile 92 die Methode AddIntermediateRadius auf ein FilletVariableRadiusEdgeSet angewendet:
Call oVarRadiusEdgeSet.AddIntermediateRadius(oSideEdges(4), 3, 0.5)
.
Versuche ich danach diese Methode noch einmal mit
Call oVarRadiusEdgeSet.AddIntermediateRadius(oSideEdges(4), 2, 0.25)
aufzurufen, schlägt dann die Add-Methode für das FilletFeatures Objekt fehl:
Fehlermeldung:
Die Methode 'Add' für das Objekt '_IRxFilletFeatures' ist fehlgeschlagen.
Kennt jemand eine Möglichkeit vor der Add_Methode die Korrektheit eines EdgesSets und einer Filletdefinition zu überprüfen.
Vielleicht muß ich mein EdgeSet vollkommen anders aufbauen. Über Tipps und Anregungen freue ich mich.
Danke
Carsten
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP