| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Ellipse zeichnen mit VBA (1761 mal gelesen)
|
Benny4 Mitglied Softwareentwickler
Beiträge: 178 Registriert: 16.02.2006 AutoCAD 2010 ZW-CAD 2012
|
erstellt am: 26. Feb. 2007 15:18 <-- editieren / zitieren --> Unities abgeben:
Hallo, ich möchte in meinem Projekt eine Ellipse zeichnen. Hat auch funktioniert, mein Problem ist, dass ich die Ellipse mit der Vairable Pellipse=1 haben möchte, also dass es im Prinzip eine Polylinie wird. Habe diese Systemvariable auch umgestellt auf 1, aber aus VBA raus wid immer eine normale Ellipse gezeichnet. Wie schaffe ich es trotzdem, eine Ellipse zu zeichnen, mit Pellipse=1?
Danke schon mal
------------------ Grüse Benny Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 ACAD 2008 Mechanical
|
erstellt am: 26. Feb. 2007 15:28 <-- editieren / zitieren --> Unities abgeben: Nur für Benny4
...du berechnest mit simpler Mathematik Punkte auf der Ellipse, am besten den Punktabstand in Abhängigkeit von der Ellipsenkrümmung, und zeichnest dann (mit Addpolyline) eine Polylinie mit eben diesen Punkten als Stützpunkte. Ansonsten bleibt dir nur "sendcommand" ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Benny4 Mitglied Softwareentwickler
Beiträge: 178 Registriert: 16.02.2006 AutoCAD 2010 ZW-CAD 2012
|
erstellt am: 26. Feb. 2007 15:34 <-- editieren / zitieren --> Unities abgeben:
Danke schon mal für die schnelle Antwort! Nur bin ich mit dieser "simplen" Mathematik nicht so vertraut... Wenn du ein Beispiel hättest, wäre ich schon seeehhhr dankbar!!
------------------ Grüse Benny Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13508 Registriert: 30.11.2003 ACAD 2008 Mechanical
|
erstellt am: 26. Feb. 2007 15:39 <-- editieren / zitieren --> Unities abgeben: Nur für Benny4
das ist mal ein Anfang .. für dich dürfte die "Ellipsengleichung in Parameterform" am interessantesten sein ... ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Benny4 Mitglied Softwareentwickler
Beiträge: 178 Registriert: 16.02.2006 AutoCAD 2010 ZW-CAD 2012
|
erstellt am: 26. Feb. 2007 15:44 <-- editieren / zitieren --> Unities abgeben:
Ist sicher gut gemeint, danke! Aber da ich mit solchen Formeln überhaupt nichts am Hut habe, hilft mir das leider nichts weiter. Dann werde ich wohl woanders nach nem Codeschnipsel suchen müssen... ------------------ Grüse Benny Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Ehrenmitglied V.I.P. h.c. 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 26. Feb. 2007 15:58 <-- editieren / zitieren --> Unities abgeben: Nur für Benny4
|
Benny4 Mitglied Softwareentwickler
Beiträge: 178 Registriert: 16.02.2006 AutoCAD 2010 ZW-CAD 2012
|
erstellt am: 26. Feb. 2007 16:10 <-- editieren / zitieren --> Unities abgeben:
Was meinst du das mit dem "sendCommand"? Wäre im Prinzip schon und gut, nur brauche ich die gesamten Punkte der Polylinie danach um weitere Sachen damit zu machen... ------------------ Grüse Benny [Diese Nachricht wurde von Benny4 am 26. Feb. 2007 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Ehrenmitglied V.I.P. h.c. 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 26. Feb. 2007 16:16 <-- editieren / zitieren --> Unities abgeben: Nur für Benny4
|
Carsten1210 Mitglied staatl. geprüfter Holztechniker
Beiträge: 1357 Registriert: 24.07.2002
|
erstellt am: 26. Feb. 2007 19:12 <-- editieren / zitieren --> Unities abgeben: Nur für Benny4
|
Benny4 Mitglied Softwareentwickler
Beiträge: 178 Registriert: 16.02.2006 AutoCAD 2010 ZW-CAD 2012
|
erstellt am: 27. Feb. 2007 08:59 <-- editieren / zitieren --> Unities abgeben:
Hallo, danke schon mal. Hab das Beispiel auch gefunden, und versucht in VBA umzusetzen, hat auch was gemacht... Nur das zu einer Ellipse umzubauen, also dass ich nur die Aussenpunkte der Ellipse kriege, sehe ich mich noch nicht imstande. Naja, ,werde ich diese Idee mal begraben, vielleicht stoße ich später mal auf was
Danke trotzdem
------------------ Grüse Benny Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Carsten1210 Mitglied staatl. geprüfter Holztechniker
Beiträge: 1357 Registriert: 24.07.2002
|
erstellt am: 01. Mrz. 2007 08:20 <-- editieren / zitieren --> Unities abgeben: Nur für Benny4
Hi Benny, Zitat: Nur das zu einer Ellipse umzubauen, also dass ich nur die Aussenpunkte der Ellipse kriege, sehe ich mich noch nicht imstande.
Wenn du nur die maximalen Abmasse der Ellipse haben willst kannst du doch die Getboundingbox-Methode nutzen. Daraus kannst du dir dann ja die Punkte berechnen. Gruß, Carsten [Diese Nachricht wurde von Carsten1210 am 01. Mrz. 2007 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |