| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
|
Autor
|
Thema: Blöcke automatisch auf Endpunkt von 3d-Linien (1042 mal gelesen)
|
Martin Henkel
Mitglied
   Beiträge: 29
Registriert: 28.06.2005 Win XP Pro Civil3d 2006
|
erstellt am: 25. Okt. 2007 10:33  <-- editieren / zitieren -->   Unities abgeben:          
Hallo, ich suche eine Möglichkeit automatisch Punkte oder Blöcke an den End-/Zwischenpunkten von 2d/3d-Polylinien (also mit Z-wert) setzen zu lassen, ähnlich "Messen" oder "Teilen" nur ohne feste Segmentangabe. Danke im Voraus. Gruß Martin
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tappenbeck
Mitglied
Vermessungsingenieur
Beiträge: 1213
Registriert: 30.05.2002 AutoCAD (Map)2022, Topobase, MapEdit, Lisp, .vb.net
|
erstellt am: 25. Okt. 2007 10:55 <-- editieren / zitieren --> Unities abgeben: Nur für Martin Henkel 
Hallo Martin, mir ist keine Lösung bekannt. Vermutlich muss man sich hierfür deshalb eine eigene Lösung schreiben. Vielleicht versuchst Du es einmal im LISP-Forum ! Gruß Jan :-) ------------------
jan :-) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
wronzky
Ehrenmitglied V.I.P. h.c.
CAD-Dienstleistungen für Architekten
Beiträge: 2154
Registriert: 02.05.2005 CAD:
AutoCAD 2.6 bis 2014
ADT 2005 bis ACA 2013
Arcibem
System:
Windows
Internet-Startseite:
http://www.archi.de
|
erstellt am: 25. Okt. 2007 11:02 <-- editieren / zitieren --> Unities abgeben: Nur für Martin Henkel
Hallo Martin, in Anlehnung an diesen Beitrag kannst Du folgenden Code verwenden: Code:
(defun c:vox-ins-block-at-poly ( / n)
(foreach n (vox-get-pl-points (car (entsel "\nPOLYLINE wählen:")))
(command "_.insert" "HIER DEIN BLOCKNAME" n "" "" "")
)
)(defun vox-get-pl-points (ele / vx ret)
(while (= (cdr (assoc 0 (setq vx (entget (setq ele (entnext ele)))))) "VERTEX")
(setq ret (cons (cdr (assoc 10 vx)) ret))
)
(reverse ret)
)
Grüsse, Henning------------------
VoxelManufaktur Computer-Dienstleistungen für Architekten und Ingenieure  http://www.voxelman.de Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Martin Henkel
Mitglied
Beiträge: 29
Registriert: 28.06.2005 Win XP Pro Civil3d 2006
|
erstellt am: 25. Okt. 2007 11:20 <-- editieren / zitieren --> Unities abgeben:
|
Foren auf CAD.de (alle Foren)
| 
