Hallo,
ich arbeite mit VB.NET und erzeuge über ein Programm eine Tasche(myPocket).
Diese möchte ich an einer Stelle verrunden durch folgenden Quellcode:
'+++++++++++++++++++++++++++++++++++++++++++++
Public Sub SetRadius(Radius as Double)
Dim reference1 As INFITF.Reference
Dim reference2 As INFITF.Reference
Dim constRadEdgeFillet As PARTITF.ConstRadEdgeFillet
Dim refname As String
Dim myShapeFactory As PARTITF.ShapeFactory = Me.myPart.ShapeFactory
refname = GetRefNameForRadius(myPocket)
reference1 = myPart.CreateReferenceFromName("")
constRadEdgeFillet = myShapeFactory.AddNewEdgeFilletWithConstantRadius(reference1, PARTITF.CatFilletEdgePropagation.catTangencyFilletEdgePropagation, Radius)
reference2 = myPart.CreateReferenceFromBRepName(refname, myPocket)
constRadEdgeFillet.AddObjectToFillet(reference2)
constRadEdgeFillet.EdgePropagation = PARTITF.CatFilletEdgePropagation.catTangencyFilletEdgePropagation
myPart.Update()
End Sub
+++++++++++++++++++++++++++++++++++++++++++++++++++++
Der refname der zu verrundenen Kante entspricht dem, der bei einer Makroaufzeichnung angegeben wird.(siehe Anhang)
Die Fehlermeldung von VS .NET lautet nur "unbekannter Fehler"
In CATIA bekomme ich die Fehlermeldung, die im Anhang dargestellt ist.
Vielleicht hat ja jemand dieses Problem ebenfalls schon einmal gehabt und kann mir helfen.
Bin Dankbar für jede Hilfe!!
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP