| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
|
Autor
|
Thema: Linien -> Polylinien automatisch (452 mal gelesen)
|
Tblaenky
Mitglied
Landschaftsarchitekt
   Beiträge: 82
Registriert: 30.07.2002
|
erstellt am: 01. Okt. 2002 17:29  <-- editieren / zitieren -->   Unities abgeben:          
Hallo, folgendes Problem: aus Luftbildern erzeugte Datei enthält 2D-Polylinien, Linien und Polylinien, und das als Bruchstücke (zumeist). Um mit unserem Modellbauer vernünftig zusammenarbeiten zu können, sollten die Linien am Besten als Polylinien verbunden sein. Da die Dateien (für das ganze Stadtgebiet) recht groß sind, ist es leider illusorisch, die Linien "zu Fuß" zu verbinden. Gibt es eine Routine, die das erledigt? Grüße Tblaenky ------------------
Thomas Blank
Landschaftsarchitekt Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
StephanJP
Mitglied
CAD-Admin
Beiträge: 830
Registriert: 09.11.2000 AutoCAD ,MAP 3D, Civil 3D, P&ID, VehicleTracking alles bis 2022, BBSoft, Win 10 Enterprise, Canon PlotClient
Canon TX2000, TX3000
|
erstellt am: 01. Okt. 2002 21:14 <-- editieren / zitieren --> Unities abgeben: Nur für Tblaenky 
|
Brischke
Ehrenmitglied V.I.P. h.c.
CAD on demand GmbH
Beiträge: 4185
Registriert: 17.05.2001 AutoCAD 20XX, defun-tools
|
erstellt am: 01. Okt. 2002 21:17 <-- editieren / zitieren --> Unities abgeben: Nur für Tblaenky
Hallo Tblaenky anbei ein paar Lisp-Zeilen, die das evtl. bringen. Ich weiß leider nicht wie komplex eine solche Zeichnung aussieht, weshalb ich ein 100% funktionieren nicht versprechen möhte. Bei Fragen ... Grüße Holger (defun c:lplv (/ as elem)
(while
(setq as (ssget "_X"
(list
'(-4 . "<and")
'(0 . "LINE")
'(-4 . "and>")
)
)
)
(setq elem (ssname as 0)
as (ssdel elem as))
(command "_.pedit" elem "_Y" "_J" as "" "")
)
) ------------------
Holger Brischke
CADlon [Diese Nachricht wurde von Brischke am 01. Oktober 2002 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
RoSiNiNo
Mitglied
Konstrukteur
Beiträge: 1126
Registriert: 09.10.2002 Autodesk Building Design Suite Premium 2021
Windows 10 Pro 64bit
HP Workstation Z620, 24GB
GeForce GTX 970
|
erstellt am: 02. Okt. 2002 07:59 <-- editieren / zitieren --> Unities abgeben: Nur für Tblaenky
Zitat:
Original erstellt von Tblaenky:
aus Luftbildern erzeugte Datei enthält 2D-Polylinien, Linien ...
Mit Acad2002 kein Problem. Einfach PEDIT aufrufen, O für mehrere Objekte, alle Objekte die verbunden werden sollen wählen, die eventuell folgende Frage mit JA bestätigen, V für verbinden. Das war's. ------------------
Roland
 Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
marc.scherer
Ehrenmitglied V.I.P. h.c.
CAD-Administrator
Beiträge: 2494
Registriert: 02.11.2001 Windows 10 64bit
AutoCAD Architecture 2018/2019 (deu/eng)
AEC-Collection 2019 (Revit und Zeugs)
Wenn sich's nicht vermeiden läßt:
D-A-CH Erweiterung (mies implementierter Schrott)
|
erstellt am: 02. Okt. 2002 08:44 <-- editieren / zitieren --> Unities abgeben: Nur für Tblaenky
Hi Holger, was sollen eigentlich die "And"-Anweisungen in Deiner Filterliste? Die sind doch hier absolut überfüssig, oder? Es geht doch auch so: Code:
...
(setq as (ssget "_X"
(list (cons 0 "LINE")) ;_ end of list
) ;_ end of ssget
) ;_ end of setq
...
------------------
Ciao,
Marc  Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Brischke
Ehrenmitglied V.I.P. h.c.
CAD on demand GmbH
Beiträge: 4185
Registriert: 17.05.2001 AutoCAD 20XX, defun-tools
|
erstellt am: 02. Okt. 2002 08:58 <-- editieren / zitieren --> Unities abgeben: Nur für Tblaenky
|
| |
marc.scherer
Ehrenmitglied V.I.P. h.c.
CAD-Administrator
Beiträge: 2494
Registriert: 02.11.2001 Windows 10 64bit
AutoCAD Architecture 2018/2019 (deu/eng)
AEC-Collection 2019 (Revit und Zeugs)
Wenn sich's nicht vermeiden läßt:
D-A-CH Erweiterung (mies implementierter Schrott)
|
erstellt am: 02. Okt. 2002 09:11 <-- editieren / zitieren --> Unities abgeben: Nur für Tblaenky
Hi Holger, nun bleib mal locker, ich wollte doch nur wissen ob sich hinter dem Konstrukt vielleicht etwas verbirgt was ich noch nicht erfaßt habe. Sollte nur konstruktive Kritik sein, kein Grund irgendetwas zu verzeihen... ;-) ------------------
Ciao,
Marc Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
| 
