hallo
kann ich von vba aus einen vorgegeben acadbefehl, wie zb LINE, aufrufen, vom benutzer ein polygon zeichnen lassen, und dann die eckpunkt-positionen abfragen? ja! wie?
danke bs
P.S.:
diverse getpoint-eigenprogrammierungen hab ich vorerst zurückgestellt - es sollte schon das komfartable line mit diesem „gummiband“ sein
Hallo ,
Zu deiner Frage:
Nimm den vorhergehenden Punkt.
Meine Kenntnisse hätte hier nicht ausgereicht, aber mein Kollege Antonius konnte mir bei deiner Anfrage behilflich sein.
Anbei ein Beispiel in Auto Lisp. Für den Abbruch der Zeichenfunktion mußt du Dir allerdings noch etwas einfallen lassen. Die Funktion kann mit Li aufgerufen werden, und muß als lsp Datei abgespeichert werden.
Listing li.lsp
(defun C:Li()
(setq xy T)
(setq P0 (getpoint "Startpunkt: "))
(setq P1 (getpoint P0 "nächster Punkt: "))
(command „Linie“ P0 P1 „“)
(while xy
(setq P1 (getpoint P1 "nächster Punkt: "))
(command „Linie“ „“ P1 „“)
)
)
In VBA müßte dieses Problem ähnlich zu lösen sein. Ich hoffe es hilft dir!
Gruß
Norbert