Hallo Leute!
Ich arbeite momentan an einem Projekt zum programmgestützen Einbau einiger ausgewählter Normalien. Eine Userform ermöglicht die Auswahl entspr. Parameter. Die betroffenen Bauteile werden über Selektionen (SelectionNotify) bestimmt.
In der Baugruppe erstelle ich eine Skizze mit Positionen auf einer vorher definierten Ebene. Anschließend gehe ich in die gewählten Teile der Baugruppe und erstelle dort Bohrungen. In die Positionsskizze der jeweiligen Bohrung setze ich nun Punkte, die deckunggleich zu den Punkten der übergeordneten Skizze verknüpft werden ("sgCOINCIDENT"). Das alles funktioniert soweit und die Beziehungen werden korrekt erstellt.
Und jetzt kommt mein Problem:
Gehe ich später in die Positionsskizze, um z.B. einzelne Punkte zu verschieben, dann werden diese Verknüpfungen nicht aktualisiert. Keine Chance. Die einzige Möglichkeit besteht darin, das Bohrungsfeature zu öffnen und wieder zu schließen. Nur dann erkennt die Skizze die neuen Positionen.
Hier ein Auszug des Codes zur Erstellung und Verknüpfung der Punkte (Positionsskizze einer Bohrung befindet sich in Bearbeitung):
...
Dim OriginalPunkt As SldWorks.SketchPoint, NeuerPunkt As SldWorks.SketchPoint
For Each OriginalPunkt In PunkteListe 'Punkteliste = List (of sldworks.sketchpoint), Punkte aus der übergeorneten Positionsskizze
NeuerPunkt = swSketchMgr.CreatePoint(1000, 1000, 0)
OriginalPunkt.Select4(True, Nothing)
swModell.SketchAddConstraints("sgCOINCIDENT")
Next
...
Was läuft hier verkehrt???
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP