| |
| 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: Text, Mtext auf vonLayer machen (1867 / mal gelesen)
|
fmfm Mitglied Facility Management
Beiträge: 279 Registriert: 18.10.2016 AutoCad 2019
|
erstellt am: 03. Okt. 2018 15:56 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen gibt es eine globale Lisp oder Funktion damit ich alle Texte und Mtexte auf von Layer lege. So das ich alle texte dann vereinfacht über die Layeroptionen schalten kann. Dies betrifft auch Texte und Mtexte in Blöcken. Danke
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Cadzia Ehrenmitglied V.I.P. h.c. CAD/Grafik-Dienstleister
Beiträge: 2917 Registriert: 02.07.2004
|
erstellt am: 03. Okt. 2018 17:45 <-- editieren / zitieren --> Unities abgeben: Nur für fmfm
|
runkelruebe Ehrenmitglied V.I.P. h.c. Straßen- / Tiefbau
Beiträge: 8086 Registriert: 09.03.2006 sw: Win7-x64 Office 365 ProPlus C3D (& LT ) ET; DACH; Extensions ------------------- hw: FX3800 i5 CPU 670 8GB RAM
|
erstellt am: 04. Okt. 2018 10:39 <-- editieren / zitieren --> Unities abgeben: Nur für fmfm
und nach dem strippen: SETBYLAYER. PS: Deine Formulierung ist ggfs. unglücklich: Du kannst EIGENSCHAFTEN von Objekten als VonLayer deklarieren. Oder Du möchtest Objekte auf bestimmte Layer legen. Aber "Texte auf von Layer legen" ist mißverständlich ------------------ Gruß, runkelruebe Herr Kann-ich-nich wohnt in der Will-ich-nich-Straße... Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fmfm Mitglied Facility Management
Beiträge: 279 Registriert: 18.10.2016 AutoCad 2019
|
erstellt am: 04. Okt. 2018 11:08 <-- editieren / zitieren --> Unities abgeben:
ich habe texte in blöcke die in den Eigenschaften auf eine Induviduelle Farbe gestellt worden sind. Obwohl alles Auf Layer123 liegt, ist der eine Text gelb im anderen Block mit anderen Namen grün usw. nun möchte ich alle Text schwarz machen ohne in jeden einzelnen Block hineinzugehen. Bzw. die sollen nicht schwarz sein sondern am besten von Layer, weil alle texte auf dem selben Layer liegen. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 Alles
|
erstellt am: 04. Okt. 2018 12:39 <-- editieren / zitieren --> Unities abgeben: Nur für fmfm
Man nimmt die Funktion "mach für alle" die man sich mal erstellt oder kopiert hat, passt diese dann an und verwendet diese. Dabei ist weiterhin das Problem mit den internen MText-Formatierungen zu klären. Eine "dumme" Routine "mach für alle" mit der man sich ganz schnell die Daten ändert, also ab und an Gutes bewirkt und sich eine Datei versaut oder im Batchbetrieb gleich hunderte Dateien versaut, sieht so aus: ; Soße https://ww3.cad.de/foren/ubb/Forum145/HTML/002941.shtml#000010 Code:
; Soße https://ww3.cad.de/foren/ubb/Forum145/HTML/002941.shtml#000010(defun C:FUNNY ( / BLOCK ) ; without locked-layer handling & undo settings (vl-load-com) ;; Model&Layouts (vlax-for LAYOUT (vla-get-layouts(vla-get-activedocument(vlax-get-acad-object))) (vlax-for ITEM (setq BLOCK (vla-get-Block LAYOUT)) (if(and (wcmatch(strcase(vla-get-objectname ITEM))(strcase "AcDbText,AcDbMText")) ) (progn (vl-catch-all-error-p (vl-catch-all-apply 'vla-put-color (list ITEM 256))) ) ) ) ) ;; Blocks (vlax-for BLOCK (vla-get-blocks(vla-get-activedocument(vlax-get-acad-object))) (vlax-for ITEM BLOCK (if(and (wcmatch(strcase(vla-get-objectname ITEM))(strcase "AcDbText,AcDbMText")) ) (progn (vl-catch-all-error-p (vl-catch-all-apply 'vla-put-color (list ITEM 256))) ) ) ) ) (vla-regen(vla-get-activedocument (vlax-get-acad-object)) acAllViewports) (princ) )
(OT: Bitte bringe auch deinen letzten Thread zu ende, danke.)
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
fmfm Mitglied Facility Management
Beiträge: 279 Registriert: 18.10.2016 AutoCad 2019
|
erstellt am: 08. Okt. 2018 09:36 <-- editieren / zitieren --> Unities abgeben:
cadffm => vielen Dank, super Lisp. Leider habe ich vergessen zu erwähnen, dass es auch MTexte gibt, wenn man Doppelklick drauf macht, denn Text markiert, kann man den Text im Texteditor nochmal auf eine andere Farbe anstatt auf vonLayer legen... leider berücksichtigt diese Lisp nicht diesen Modus. Andere Frage die noch spannend wäre (Global): Gibt es das auch umgekehrt. Zum Beispiel; die Texte die auf dem Layer "Textname1" liegen und in den Layereigenschaften die Farbe rot eingestellt ist, kann man die Farbe rot in die Eigenschaften übernehmen?
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 Alles
|
erstellt am: 08. Okt. 2018 09:43 <-- editieren / zitieren --> Unities abgeben: Nur für fmfm
Zitat: Original erstellt von fmfm: cadffm => vielen Dank, super Lisp. Leider habe ich vergessen zu erwähnen, dass es auch MTexte gibt, wenn man Doppelklick drauf macht, denn Text markiert, kann man den Text im Texteditor nochmal auf eine andere Farbe anstatt auf vonLayer legen... leider berücksichtigt diese Lisp nicht diesen Modus.
Dieser Sachverhalt wurde hier bereits mehrfach angesprochen obwohl du diesen vergessen hattest zu erwähnen, so liest sich deine Antwort aktuell leider sehr ignorant.
Zitat: Andere Frage die noch spannend wäre (Global): Gibt es das auch umgekehrt. Zum Beispiel; die Texte die auf dem Layer "Textname1" liegen und in den Layereigenschaften die Farbe rot eingestellt ist, kann man die Farbe rot in die Eigenschaften übernehmen?
Wir dir bereits öfters mal am Rande geschrieben wurde: Ja, es gibt ALLES (mögliche) - also auch dies. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13527 Registriert: 30.11.2003 .
|
erstellt am: 09. Okt. 2018 09:11 <-- editieren / zitieren --> Unities abgeben: Nur für fmfm
|
fmfm Mitglied Facility Management
Beiträge: 279 Registriert: 18.10.2016 AutoCad 2019
|
erstellt am: 09. Okt. 2018 11:13 <-- editieren / zitieren --> Unities abgeben:
|
cadffm Moderator 良い精神
Beiträge: 22275 Registriert: 03.06.2002 Alles
|
erstellt am: 09. Okt. 2018 11:54 <-- editieren / zitieren --> Unities abgeben: Nur für fmfm
##: Es bleibt dabei: Entweder man beschäftigt sich mit den Möglichkeiten der Programmierung selbst (=lernen), oder man kauft ein (Programme oder entsprechende Fachleute die mit großen Datenmengen und Strukturen umgehen können. Also genau das was an deiner Stelle wohl öfters benötigt wird). Bei der zweiten Option verzichtet man dann auch weitgehend auf Fehltritte und verlorene/versaute Datenbestände). Dein letzter Treffer/Link wurde noch für Versionen Pre2000 gemacht, daher kann das kleine LispScript nicht mit TrueColor und Farbbüchern umgehen, Plotstil falls benannt) und Linienstärken werden wie auch Transparenz nicht mit übernommen. _ "nur berücksichtigt die Lisp keine Blöcke" Das kann auch nicht funktionieren da AutoCAD-Befehle verwendet werden und diese funktionieren nur im aktuellen Bereich. Wenn es "richtig" durch Programmcode geändert werden würde, so wäre es ja einfach seine "mach für alle" Routine zu nutzen.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |