| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
|
Autor
|
Thema: Punkte aus Kreisen (3668 mal gelesen)
|
RL13
Ehrenmitglied V.I.P. h.c.
Dipl.-Ing. Bauwesen
   Beiträge: 2373
Registriert: 23.10.2008 Civil 3D 2018.1
Civil 3D 2016 64 Bit SP 3
mit DACH und Extensions
W7 Professional 64Bit
HP Z440
Intel Xeon CPU E5-1620 v4
32 GB RAM
NVIDIA Quadro P4000
|
erstellt am: 24. Okt. 2008 09:07  <-- editieren / zitieren -->   Unities abgeben:          
|
greli
Mitglied
Bautechniker, CAD-Admin
Beiträge: 289
Registriert: 17.02.2006 Civil3d 2005-2019
Windows 10 x64
Intel Xeon 3.5Ghz
16GB Ram
NVIDIA Quadro K2200
|
erstellt am: 24. Okt. 2008 10:21 <-- editieren / zitieren --> Unities abgeben: Nur für RL13 
|
Dorfy
Mitglied
Double-Dipl.-Ing. Bleistiftanspitzer
Beiträge: 900
Registriert: 21.07.2006 AutoCad2007, ProE, HiCad
|
erstellt am: 24. Okt. 2008 10:30 <-- editieren / zitieren --> Unities abgeben: Nur für RL13
Hi, vllt. damit (defun c:cirtopoi (/ aws e circ ename) (if (setq aws (ssget '((0 . "circle")))) (progn (setq e nil) (repeat (sslength aws) (setq circ (ssname aws (setq e (if e (1+ e) 0 ) ) ) ) (if (and circ (vlax-property-available-p (setq ename (vlax-ename->vla-object circ)) 'center ) ) (vla-addpoint (vla-get-modelspace (vla-get-activedocument (vlax-get-acad-object)) ) (vlax-3d-point (vlax-get ename "Center" ) ) ) ) (vla-delete ename) ) ) ) (princ) ) mfg heiko Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
RL13
Ehrenmitglied V.I.P. h.c.
Dipl.-Ing. Bauwesen
Beiträge: 2373
Registriert: 23.10.2008 Civil 3D 2018.1
Civil 3D 2016 64 Bit SP 3
mit DACH und Extensions
W7 Professional 64Bit
HP Z440
Intel Xeon CPU E5-1620 v4
32 GB RAM
NVIDIA Quadro P4000
|
erstellt am: 24. Okt. 2008 12:16 <-- editieren / zitieren --> Unities abgeben:
Hat nach einigen Schwierigkeiten mit den Formatanpassungen der Punktdatei funktioniert. Das Tool dxfkor funktioniert nur musste ich im Nachgang über Notepad die Kommas durch Punkte ersetzen, bevor ich sie als Punktdatei einlesen konnte. Danke Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ric_api
Mitglied
Ingenieur
Beiträge: 48
Registriert: 15.05.2006 WIN10 64bit
C3D 2021
C3D 2022
|
erstellt am: 24. Okt. 2008 14:30 <-- editieren / zitieren --> Unities abgeben: Nur für RL13
Es gibt auch eine Lösung mit Civil eigenen Mitteln. Befehl Datenextrakt ausführen und mit Assistent weiterleiten lassen. -> Seite1: neue Datenextraktion erstellen
-> Seite2: Objekte in dieser Zeichnung wählen
-> Seite3: ggf. Objekte filtern (Kreiselemente)
-> Seite4: Datenextraktion Geometrie (X, Y, Z)
-> Seite5: Zähler und Namenspalte deaktivieren
-> Seite6: Daten in Datei ausgeben (TXT)
-> fertigstellen Danach Textdatei 1 Zeile auskommentieren (#)
Über Import Punkte "RHZ Leerstellen" einlesen. Funktioniert auch mit anderen AutoCad elementen (z.B Linien, Blöcke etc.) Gruß Rainer
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Licht am Ende des Tunnels
Mitglied
Beiträge: 141
Registriert: 04.08.2006 Windows 7
Civil 3D 2015
Revit 2015
|
erstellt am: 25. Okt. 2008 15:04 <-- editieren / zitieren --> Unities abgeben: Nur für RL13
Hallo Rainer, guter Tipp - ich musste beim Speichern der Textdatei allerdings auf ANSI umstellen, damit keine Sonderzeichen in die Datei kommen. Die lsp von Dorfy wäre natürlich perfekt, wenn sie Kreise gleich in Civil-Punkte umwandeln würde... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
| 
