Hallo zusammen!
Leider habe ich im Forum zu meinem Problem keine Lösung gefunden, daher beschreibe ich es einfach mal:
Ich erstelle per VB Makro eine Skizze mit einer Geometrie, z.B. einem Dreieck. Nun möchte ich die Ecken des Dreiecks automatisch abrunden lassen. Dazu gibt es auch eine Funktion im Skizzenmodus, die man manuell bedienen kann: Rundung (2D-Rundung). Nun möchte ich diese Funktion automatisiert in VB nutzen. Dabei bin ich auf den CommandManager gestoßen und dachte mir, er könne vielleicht weiter helfen...
Aber irgendwie bekomme ich es nicht hin. Mein Versuch sieht in etwa so aus:
Dim com As CommandManager
Set com = ThisApplication.CommandManager
com.DoSelect sideB '(sideB ist vom Typ SketchLine)
com.DoSelect sideC '(sideC ist vom Typ SketchLine)
com.StartCommand (kCreateCornerRoundCommand)
Ich markiere also die beiden Seiten, deren gemeinsame Ecke abgerundet werden soll, so wie ich es auch manuell mache. Das Markieren funktioniert auch, allerdings macht er mit den markierten Seiten nichts... Schön wäre es natürlich auch, wenn man den Radius der Eckrundung festlegen könnte - aber so weit bin ich leider noch nicht
Danke für Eure Hilfe!
Schönen Gruß
Mathias
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP