| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY wird von NVIDIA zum Händler des Jahres gewählt – zum dritten Mal in Folge, eine Pressemitteilung
|
Autor
|
Thema: Layout- zu Objekteigenschaften (2274 mal gelesen)
|
scholle Mitglied Konstrukteur
Beiträge: 47 Registriert: 12.04.2005 WinXP, Autocad 2005
|
erstellt am: 12. Apr. 2005 17:01 <-- editieren / zitieren --> Unities abgeben:
Hallo, für eine Konvertierung benötige ich meine vorhandenen Autocaddateien in der Form, daß alle Objekte ihre Eigenschaften direkt haben und nicht 'VonLayer'. Bisher sind alle Eigenschaften aber 'VonLayer'. Kennt jemand ein Tool, das die Layereigenschaften (speziell Farbe, Linientyp, Strichstärke) direkt auf die zugehörigen Objekte überträgt oder dabei behilflich sein kann? Grüße Scholle
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 .
|
erstellt am: 12. Apr. 2005 17:12 <-- editieren / zitieren --> Unities abgeben: Nur für scholle
Versuch mal das Teil im Anhang. als vlx speichern, in Acad laden und mit LAYPROPS2OBJ aufrufen. Edit : pre 2004 update ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
[Diese Nachricht wurde von CADmium am 13. Apr. 2005 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
AsSchu Ehrenmitglied Konstrukteur
Beiträge: 1632 Registriert: 27.06.2003 ACAD 2007,cadMANdu Win 2000 XP
|
erstellt am: 13. Apr. 2005 08:10 <-- editieren / zitieren --> Unities abgeben: Nur für scholle
Guten Morgen habs getestet mit AC 2002 Befehl: LAYPROPS2OBJ ; Fehler: Fehlerhafte Funktion: vla-get-TrueColor läuft das nur unter 2004 ? Man weiß ja nicht, was er (scholle) für eine Version hat. Ciao
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
scholle Mitglied Konstrukteur
Beiträge: 47 Registriert: 12.04.2005 WinXP, Autocad 2005
|
erstellt am: 13. Apr. 2005 08:21 <-- editieren / zitieren --> Unities abgeben:
|
sleepi Mitglied Techniker
Beiträge: 162 Registriert: 14.01.2003
|
erstellt am: 25. Apr. 2005 16:58 <-- editieren / zitieren --> Unities abgeben: Nur für scholle
|
CADchup Ehrenmitglied V.I.P. h.c.
Beiträge: 3336 Registriert: 14.03.2001 Sicher ist, dass nichts sicher ist. Selbst das nicht. Joachim Ringelnatz
|
erstellt am: 26. Apr. 2005 08:37 <-- editieren / zitieren --> Unities abgeben: Nur für scholle
|
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 - 2014 Arcibem System: Windows 2000, XP, NO VISTA Internet-Startseite: http://www.archi.de
|
erstellt am: 02. Mai. 2005 14:58 <-- editieren / zitieren --> Unities abgeben: Nur für scholle
Hallo Scholle, versuch mal das: (defun c:lay_eig ( / col_t lt_t lw_t aws ele_eig ele_lay ele_co ele_lt ele_lw ergebnis) (setvar "cmdecho" 0) (command "_undo" "_be") (setq col_t t lt_t t lw_t t);einstellen, was geändert werden soll (setq aws (ssget)) (setq zaehler 0) (if aws; Liste der gewählten elemente erstellen (progn (setq name (ssname aws zaehler)) (while name (setq namen (cons name namen)) (setq zaehler (1+ zaehler)) (setq name (ssname aws zaehler)) ) ) ) (setq aws namen) (foreach n aws (progn (setq ele_eig (entget n)) (setq ele_lay (cdr (assoc 8 ele_eig))) (setq lay_eig (tblsearch "layer" ele_lay)) (if col_t (setq ele_co (cdr (assoc 62 lay_eig))));Farbe (if lt_t (setq ele_lt (cdr (assoc 6 lay_eig))));Linientyp (if lw_t (setq ele_lw (cdr (assoc 370 lay_eig))));Linienstärke (1/100 mm) (command "_change" n "" "_prop") (if ele_co (command "_col" ele_co)) (if ele_lt (command "_ltype" ele_lt)) (if ele_lw (command "_lw" (/ ele_lw 100.00))) (command "") ) ) (command "_undo" "_end") (setvar "cmdecho" 1) (prin1) ) wir haben vor Jahren auch mal sowas gebraucht. Das funktioniert auch ohne VL(A)-XYZ. Ist zwar für 2000 geschrieben, sollte aber auch bei 2002 laufen... Einschränkungen sind natürlich truecolor-Farben etc. Grüsse Henning Jesse ------------------ http://www.voxelman.de Computer-Dienstleistungen für Architekten und Ingenieure Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 .
|
erstellt am: 02. Mai. 2005 15:12 <-- editieren / zitieren --> Unities abgeben: Nur für scholle
Zitat: Original erstellt von wronzky: Einschränkungen sind natürlich truecolor-Farben etc.
Genau! ..und die Frage, ob nur die "vonLayer" Eigenschaften,oder prinzipiell alle übernommen werden sollen. ..Weiterhin ist die Farbe (abs(cdr (assoc 62 lay_eig))))) , da "Layer an/aus" mit dem Vorzeichen realisiert wird... ..aber sonst geht es natürlich auch mit dem einfachen (ohne ActivX) Lisp. Sogar Truecolor! Zumindest beim direkten Übernehmen -> Siehe GC420 und GC430! ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." 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 - 2014 Arcibem System: Windows 2000, XP, NO VISTA Internet-Startseite: http://www.archi.de
|
erstellt am: 02. Mai. 2005 15:18 <-- editieren / zitieren --> Unities abgeben: Nur für scholle
|
scholle Mitglied Konstrukteur
Beiträge: 47 Registriert: 12.04.2005 WinXP, Autocad 2005
|
erstellt am: 02. Mai. 2005 15:51 <-- editieren / zitieren --> Unities abgeben:
Hallo Henning, danke für Deinen Beitrag! Da meine letzten Programmierversuche 10 Jahre her sind, halte ich mich aus den Details raus. Aber so viel: mir geht es wirklich nur um Farbe, Linientyp und Linienbreite. Die Variante von Thomas haut bei mir unter 2005 hin, unter 2002 gabs wohl Schwierigkeiten (s.o.). Wenn ich Deine lsp laufen lasse, klappt bei Farbe und Linientyp eigentlich alles, aber Elemente mit der Linienbreite 'VonLayer' behalten diese Eigenschaft und übernehmen nicht die Layereinstellung. Mache ich was falsch? Wie gesagt, nähere Kenntnisse gehen mir ab, aber wenn ich alles richtig deute, soll die Linienbreite doch auch geändert werden? Grüße scholle Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 .
|
erstellt am: 02. Mai. 2005 16:10 <-- editieren / zitieren --> Unities abgeben: Nur für scholle
@ scholle da mußt du (setq lay_eig (tblsearch "layer" ele_lay)) durch (setq lay_eig (entget(tblobjname "layer" ele_lay))) ersetzen, da tblsearch den GC370 nicht mitliefert. ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben." 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 - 2014 Arcibem System: Windows 2000, XP, NO VISTA Internet-Startseite: http://www.archi.de
|
erstellt am: 02. Mai. 2005 16:35 <-- editieren / zitieren --> Unities abgeben: Nur für scholle
Zitat: Original erstellt von CADmium: @ scholle da mußt du (setq lay_eig (tblsearch "layer" ele_lay)) durch (setq lay_eig (entget(tblobjname "layer" ele_lay))) ersetzen, da tblsearch den GC370 nicht mitliefert.
Na sowas, ist mir nie aufgefallen... haben wir anscheinend damals nicht gebraucht... Danke Thomas! Henning ------------------ http://www.voxelman.de Computer-Dienstleistungen für Architekten und Ingenieure Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
scholle Mitglied Konstrukteur
Beiträge: 47 Registriert: 12.04.2005 WinXP, Autocad 2005
|
erstellt am: 02. Mai. 2005 16:47 <-- editieren / zitieren --> Unities abgeben:
|