| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
|
Autor
|
Thema: script - textstil ändern (1276 mal gelesen)
|
tappenbeck
Mitglied
Vermessungsingenieur
   Beiträge: 1213
Registriert: 30.05.2002 AutoCAD (Map)2019, Topobase, MapEdit, Lisp, .vb.net
|
erstellt am: 26. Aug. 2004 13:19  <-- editieren / zitieren -->   Unities abgeben:          
hi ! ich möchte via script den textstil aller texte und attributdefinitionen in einem block einheitlich ändern. hat einer von euch eine kleine routine die dieses erledigt - stehe etwas unterzeitdruck vor dem urlaub. danke im im voraus. gruß Jan :-) ------------------
jan :-) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm
Moderator
良い精神
    
Beiträge: 21533
Registriert: 03.06.2002 Alles
|
erstellt am: 26. Aug. 2004 13:21 <-- editieren / zitieren --> Unities abgeben: Nur für tappenbeck 
|
CADmium
Moderator
Maschinenbaukonstrukteur
Beiträge: 13508
Registriert: 30.11.2003 .
|
erstellt am: 26. Aug. 2004 13:25 <-- editieren / zitieren --> Unities abgeben: Nur für tappenbeck
Mhmm .. und der Textstil der Attribute in den Blockreferenzen soll unverändert bleiben? -> ne , dann hab ich doch nichts Fertiges... ------------------  - Thomas - [Diese Nachricht wurde von CADmium am 26. Aug. 2004 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tappenbeck
Mitglied
Vermessungsingenieur
Beiträge: 1213
Registriert: 30.05.2002 AutoCAD (Map)2019, Topobase, MapEdit, Lisp, .vb.net
|
erstellt am: 26. Aug. 2004 13:29 <-- editieren / zitieren --> Unities abgeben:
ich möchte eigentlich die blockdefintionen selber öffnen und dann die attributdefintionen ändern. normalerweise fenster über alles - und teststil im klappmenü bei ac2005 ändern - fertig. aber wie das nun am schnellsten in lisp realisieren ?!?!?! gruß Jan :-) ------------------
jan :-) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
marcokochini
Mitglied
Beiträge: 206
Registriert: 06.10.2003 AutoCAD 2002
AutoCAD 2004
AutoCAD 2005
P4 nVIDIA Windows 2000
P4 ATI Windows XP
|
erstellt am: 26. Aug. 2004 13:35 <-- editieren / zitieren --> Unities abgeben: Nur für tappenbeck
Zitat:
Original erstellt von cadffm:
jaja - so kann´s gehen..Also ich nicht, sorry.
Zitat:
Original erstellt von CADmium:
Mhmm .. und der Textstil der Attribute in den Blockreferenzen soll unverändert bleiben?
-> ne , dann hab ich doch nichts Fertiges...
Hier werden Sie geholfen!!! 
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium
Moderator
Maschinenbaukonstrukteur
Beiträge: 13508
Registriert: 30.11.2003 .
|
erstellt am: 26. Aug. 2004 13:43 <-- editieren / zitieren --> Unities abgeben: Nur für tappenbeck
OK: Mit (while (setq BLOCKDEF (tblnext "BLOCK" (null BLOCKDEF))) ... durchläufst du die Blockdefinitionen und mit (setq OBJEKT (cdr (assoc -2 BLOCKDEF))) liest du das erste Blockelement aus dann gibt es noch die Funktionen entnext und
(entmod(subst ( cons 7 (assoc 7 ...
Alles klar?
------------------
- Thomas - Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Brischke
Moderator
CAD on demand GmbH
Beiträge: 4171
Registriert: 17.05.2001 AutoCAD 20XX, defun-tools (d-tools.eu)
|
erstellt am: 26. Aug. 2004 21:33 <-- editieren / zitieren --> Unities abgeben: Nur für tappenbeck
Hallo, ok, die Attributdefinitionen sind nun geändert, was aber mit den Attributen der bereits eingefügten Blockreferenzen? @Jan, Die Attribute der INSERTS bleiben davon unberührt, diese musst du extra ansprechen. Gleiche Logik, nur eben auf die INSERTS und die INSERTS in evtl verschachtelten Blockdefinitionen anwenden. Bei Fragen ... Grüße Holger ------------------
Holger Brischke
(defun - Lisp over night!
AutoLISP-Programmierung für AutoCAD
Da weiß man, wann man's hat! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
| 
