Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  Rund um AutoCAD
  3D-Flächen in Linien umwandeln

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor Thema:  3D-Flächen in Linien umwandeln (12574 mal gelesen)
ctree
Mitglied


Sehen Sie sich das Profil von ctree an!   Senden Sie eine Private Message an ctree  Schreiben Sie einen Gästebucheintrag für ctree

Beiträge: 4
Registriert: 10.11.2010

Autocad 2010

erstellt am: 10. Nov. 2010 15:40    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo,

ich bin kein Autocad (2010) Experte, muss es aber verwenden um dxf Files für eine Modellierungssoftware (Gocad) aufzubereiten. Gocad funktioniert am besten mit Punkt & Linien Eingangsdaten. Bei den Eingangsdaten handelt es sich um Untertagebauwerke, d.h. Schachtsysteme. Böden, Decken, Wände.
Jetzt bestehen meine dxf zum Großteil aus "3D-Flächen". Jede Wand, Decke, Boden ist jeweils eine 3D-Fläche im Raum. Gocad kann diese zwar lesen, der Import ist jedoch fehlerhaft. Ich möchte daher nur die Linien (quasi die Schnittkantenlinien an Böden/Wände/Decken) importieren. Die Flächen generiere ich mir dann in Gocad neu. Habe jedoch keine Funktion in Autocad gefunden, um 3D-Flächen in reine Linien umzuwandeln.
Geht das irgendwie? Ich habe mehrere hundert bis tausend Flächen, ich möchte die ungern alle per Hand anklicken...

Die Forensuche hat einen uralten Beitrag ausgespuckt, der mir allerdings nicht wirklich weiterhilft... http://ww3.cad.de/foren/ubb/Forum54/HTML/007788.shtml

Philipp

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

E-Boy
Ehrenmitglied V.I.P. h.c.
Elektroinstallateurmeister



Sehen Sie sich das Profil von E-Boy an!   Senden Sie eine Private Message an E-Boy  Schreiben Sie einen Gästebucheintrag für E-Boy

Beiträge: 2731
Registriert: 23.06.2005

Autocad MEP 2019
E-Tools
Win 10

erstellt am: 10. Nov. 2010 15:47    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für ctree 10 Unities + Antwort hilfreich

Hi und Willkommen auf cad.de,
als erstes wähle die Ansicht von oben,
dann kannst Du mit explode die Flächen auflösen,
danach flätten und überflüssige Linien entfernen.

------------------
Gruß Stefan

  Nur Feiglinge speichern zwischen.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

ctree
Mitglied


Sehen Sie sich das Profil von ctree an!   Senden Sie eine Private Message an ctree  Schreiben Sie einen Gästebucheintrag für ctree

Beiträge: 4
Registriert: 10.11.2010

Autocad 2010

erstellt am: 10. Nov. 2010 15:51    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Ich nehme an, das ist im deutschen Autocad der "Ursprung" (_explode) Befehl?
Den habe ich schon ausprobiert. Funktioniert nicht.
"Befehl: _explode 1059 gefunden
1059 konnten nicht aufgelöst werden."

Auch beim einzelnen Anwählen geht's nicht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

E-Boy
Ehrenmitglied V.I.P. h.c.
Elektroinstallateurmeister



Sehen Sie sich das Profil von E-Boy an!   Senden Sie eine Private Message an E-Boy  Schreiben Sie einen Gästebucheintrag für E-Boy

Beiträge: 2731
Registriert: 23.06.2005

Autocad MEP 2019
E-Tools
Win 10

erstellt am: 10. Nov. 2010 15:57    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für ctree 10 Unities + Antwort hilfreich

Lade mal solch eine Fläche hier hoch...

------------------
Gruß Stefan

  Nur Feiglinge speichern zwischen.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Marvin41
Mitglied
Freiberufler


Sehen Sie sich das Profil von Marvin41 an!   Senden Sie eine Private Message an Marvin41  Schreiben Sie einen Gästebucheintrag für Marvin41

Beiträge: 1497
Registriert: 13.09.2010

erstellt am: 10. Nov. 2010 16:03    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für ctree 10 Unities + Antwort hilfreich

Hallo Phillip,

so ganz kann ich Deinen wunsch nicht erfüllen aber ein kleines stück weiterhelfen.
Unter den expresstools gibt es zwei befehel die die ein wenig entlastung bringen könnten:

1. Befehl: flatten
zerlegt 3dflächen in einzellne linien, die 3dflächen gehen dabei aber verloren (sicherungsdatei anlegen).

2. Befehl: overkill
löscht Dir alle doppelten objekte aus Deiner zeichnung.


ich hoffe es hilft ein wenig.

mfg
Marvin41

------------------
CAD ist ganz Einfach wann man weiß wie es geht ;-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Marvin41
Mitglied
Freiberufler


Sehen Sie sich das Profil von Marvin41 an!   Senden Sie eine Private Message an Marvin41  Schreiben Sie einen Gästebucheintrag für Marvin41

Beiträge: 1497
Registriert: 13.09.2010

Dell Precision 7200
Intel(R) Core(TM) Xeon E3-1535M v6
32GB(4X8GB)2667MHZ DDR4
1x 512GB M.2 PCIe SSD Class50
1x 2TB Samsung Evo
Grafik NVIDIA Quadro P5000M 16GB GDDR5
Windows 10 64 Bit
Version 1909 (Build 18363.959)
AutoCAD 2.6-2021
AutoCAD Advance Steel 2021
Architecture Engineering & Construction Collection
Product Design & Manufacturing Collection

erstellt am: 10. Nov. 2010 16:08    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für ctree 10 Unities + Antwort hilfreich

Hallo Stefan,

leider lassen sich 3dflächen nicht mit ursprung zerlegen.

Gruß
Marvin41

------------------
CAD ist ganz Einfach wann man weiß wie es geht ;-)

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

StephanJP
Mitglied
CAD-Admin


Sehen Sie sich das Profil von StephanJP an!   Senden Sie eine Private Message an StephanJP  Schreiben Sie einen Gästebucheintrag für StephanJP

Beiträge: 829
Registriert: 09.11.2000

erstellt am: 11. Nov. 2010 00:06    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für ctree 10 Unities + Antwort hilfreich

Vielleicht hilft das:

Code:
;;; wandelt  sichtbare Kanten von 3D-Flächen in Linien um
;;;    Ver. 1.0
;;;  Stephan Vette, 05/2010
(defun c:3DF2LINE ()
  (setq as (ssget "X" '((0 . "3DFACE"))))
  (setq n  0
en (ssname as n)
  )
  (while en
    (setq el (entget en))
    (if (= (logand 1 (cdr (assoc 70 el))) 0)
      (progn
(entmake (list '(0 . "LINE")
      (assoc 8 el)
      (assoc 10 el)
      (assoc 11 el)
)
) ; 1. Linie
(if (assoc 62 el)
  (entmod (list (car (entget (entlast))) (assoc 62 el)))
)
      )
    )
    (if (= (logand 2 (cdr (assoc 70 el))) 0)
      (progn
(entmake (list '(0 . "LINE")
      (assoc 8 el)
      (cons 10 (cdr (assoc 11 el)))
      (cons 11 (cdr (assoc 12 el)))
)
) ; 2. Linie
(if (assoc 62 el)
  (entmod (list (car (entget (entlast))) (assoc 62 el)))
)
      )
    )
    (if (= (logand 4 (cdr (assoc 70 el))) 0)
      (progn
(entmake (list '(0 . "LINE")
      (assoc 8 el)
      (cons 10 (cdr (assoc 12 el)))
      (cons 11 (cdr (assoc 13 el)))
)
) ; 3. Linie
(if (assoc 62 el)
  (entmod (list (car (entget (entlast))) (assoc 62 el)))
)
      )
    )
    (if (= (logand 8 (cdr (assoc 70 el))) 0)
      (progn
(entmake (list '(0 . "LINE")
      (assoc 8 el)
      (cons 10 (cdr (assoc 13 el)))
      (cons 11 (cdr (assoc 10 el)))
)
) ;4. Linie
(if (assoc 62 el)
  (entmod (list (car (entget (entlast))) (assoc 62 el)))
)
      )
    )
    (entdel en)
    (setq n  (1+ n)
  en (ssname as n)
    )
  )
)


------------------

gruß
Stephan

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

KlaK
Ehrenmitglied V.I.P. h.c.
Dipl. Ing. Vermessung, CAD- und Netz-Admin



Sehen Sie sich das Profil von KlaK an!   Senden Sie eine Private Message an KlaK  Schreiben Sie einen Gästebucheintrag für KlaK

Beiträge: 2624
Registriert: 02.05.2006

AutoCAD LandDesktop R2 bis 2004
Civil 3D 2005 - 2022
Bricscad V11-V21 pro
Plateia, Canalis
Visual Basic

erstellt am: 11. Nov. 2010 00:54    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für ctree 10 Unities + Antwort hilfreich


3DF_to_Line.dvb.txt

 
@marvin41: Gehen beim flatten nicht die Höhen (Z-Werte) verloren?

@ctree: Wenn Du mit einer DVB etwas anfangen kannst, lade sie herunter (.txt) entfernen
Dann in die Zeichenfläche ziehen und über
(command "vbarun" "F2L")
ausführen. Danach evtl. noch doppelte Linien entfernen, das wars.
Programm fragt Dich ob Du die 3dFlächen löschen möchtest.
Die neuen Linien werden auf der Arbeitsebene erzeugt.

Hoffe das klappt auch unter 2010, hatte es da noch nicht getestet.

Grüße, Klaus

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Marvin41
Mitglied
Freiberufler


Sehen Sie sich das Profil von Marvin41 an!   Senden Sie eine Private Message an Marvin41  Schreiben Sie einen Gästebucheintrag für Marvin41

Beiträge: 1497
Registriert: 13.09.2010

erstellt am: 11. Nov. 2010 09:10    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für ctree 10 Unities + Antwort hilfreich

@Klaus: ja Du hast recht flatten funktioniert nicht.

Ich habe Dein dvb gesteste und es bringt ein sehr gutes Ergebniss.
Mußte nur vorher DVB installieren da es in 2011 nicht mehr dabei ist.
Geht aber sehr einfauch über: hier

@Stephan: Lisp funktioniert ebenfalls dabei werden die 3DFlächen gelöscht.

mfg
Marvin41

------------------
CAD ist ganz Einfach wann man weiß wie es geht ;-)

[Diese Nachricht wurde von Marvin41 am 11. Nov. 2010 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

ctree
Mitglied


Sehen Sie sich das Profil von ctree an!   Senden Sie eine Private Message an ctree  Schreiben Sie einen Gästebucheintrag für ctree

Beiträge: 4
Registriert: 10.11.2010

Autocad 2010

erstellt am: 11. Nov. 2010 10:20    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities


Zeichnung.zip

 
Guten Morgen,

danke für die Tipps, werde mich jetzt mal mit der DVB von Klaus und dem code von Stephan beschäftigen. Muss erst mal rausfinden, wie das funktioniert... 

Anbei noch ein Demofile!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

KlaK
Ehrenmitglied V.I.P. h.c.
Dipl. Ing. Vermessung, CAD- und Netz-Admin



Sehen Sie sich das Profil von KlaK an!   Senden Sie eine Private Message an KlaK  Schreiben Sie einen Gästebucheintrag für KlaK

Beiträge: 2624
Registriert: 02.05.2006

AutoCAD LandDesktop R2 bis 2004
Civil 3D 2005 - 2022
Bricscad V11-V21 pro
Plateia, Canalis
Visual Basic

erstellt am: 11. Nov. 2010 11:42    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für ctree 10 Unities + Antwort hilfreich

Hallo ctree,
gerade mal einen Blick auf die Zeichnung geworfen.
Da sind ja einige 3dFlächen drin, die so gar nicht plausibel sind.
Wundert mich nicht, dass der Import Schwierigkeiten macht.
Habe gesehen, dass auch einige Körper drin sind, die werden aber nicht als Linien und Schraffur umgewandelt. Sollte aber auch kein Problem sein, das zu programmieren.
VG Klaus

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

ctree
Mitglied


Sehen Sie sich das Profil von ctree an!   Senden Sie eine Private Message an ctree  Schreiben Sie einen Gästebucheintrag für ctree

Beiträge: 4
Registriert: 10.11.2010

Autocad 2010

erstellt am: 11. Nov. 2010 11:46    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Ist mir beim rumspielen heute Vormittag auch aufgefallen.
Teilweise sind die einzelnen Schächte nicht mal ordentlich verknüpft... könnt kotzen, hab knapp 50 solcher Files, und die Demo ist noch bei weitem die kleinste...
Schraffuren habe ich eigentlich schon rausgeschmissen, vielleicht hab ich welche übersehen?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz