| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: Texthöhe meherer Blockattribute ändern (1441 mal gelesen)
|
Lysier Mitglied technischer Sachbearbeiter
Beiträge: 8 Registriert: 25.03.2014
|
erstellt am: 12. Mrz. 2015 09:38 <-- editieren / zitieren --> Unities abgeben:
Hallo, ich möchte bei allen Böcken die Texthöhe der aller Attribute ändern. Es handelt sich um ca. 260 verschieden Blöcke mit je 3 Attributen. Der Attributname ist immer der selbe. Leider bin ich mit -attedit bzw. Battmann zu keiner Lösung gekommen. Danke für die Hilfe! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 12. Mrz. 2015 10:04 <-- editieren / zitieren --> Unities abgeben: Nur für Lysier
1.) Höhe der Attributdefinition 2.) Höhe der Attribute in den Blockreferenzen oder beides? bei 2: eine Feste Höhe im Modellbereich (unabhängig der skalierung der jeweiligen Blockreferenzen) oder nur entsprechend der Attributdefinition (Attribute werden mit der Blockreferenz-Skalierung skaliert) ------------------ CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Lysier Mitglied technischer Sachbearbeiter
Beiträge: 8 Registriert: 25.03.2014
|
erstellt am: 12. Mrz. 2015 10:12 <-- editieren / zitieren --> Unities abgeben:
|
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 12. Mrz. 2015 10:26 <-- editieren / zitieren --> Unities abgeben: Nur für Lysier
Quelle Original von http://forum.cad.de/foren/ubb/Forum145/HTML/003514.shtml#000006 , auf Attributhöhe angepasst. (defun C:Attribhoe (/ AWS INSERT INDEX ATTDATA H) (if(and (setq AWS (ssget (list '(0 . "INSERT")'(66 . 1)))) (setq H (getreal "Neue Attributhöhe angeben: ")) ) (progn (setq INDEX -1) (repeat (sslength AWS) (setq INSERT(ssname AWS (setq INDEX (1+ INDEX)))) (setq ATTDATA(entget(entnext INSERT))) (while (=(cdr(assoc 0 ATTDATA)) "ATTRIB") (entmod(subst(cons 40 H)(assoc 40 ATTDATA)ATTDATA)) (setq ATTDATA(entget(entnext(cdr(assoc -1 ATTDATA))))) ) ) ) (alert "möööp") ) )
------------------ CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Lysier Mitglied technischer Sachbearbeiter
Beiträge: 8 Registriert: 25.03.2014
|
erstellt am: 12. Mrz. 2015 10:41 <-- editieren / zitieren --> Unities abgeben:
|
Lysier Mitglied technischer Sachbearbeiter
Beiträge: 8 Registriert: 25.03.2014 AutoCAD 2018 Microsoft Windows 10 Pro Intel(R) Core(TM) i5-3470@3.20GHz 8GB RAM Intel(R) HD Graphics
|
erstellt am: 12. Mrz. 2015 10:52 <-- editieren / zitieren --> Unities abgeben:
|
Dober Heinz Mitglied Technischer Zeichner
Beiträge: 1143 Registriert: 20.12.2002 Autocad 2020/64B Win10 WORKSTATION Intel(R) CPU E5-1620 3.60GHz 16,0GB Ram 64 Bit-Betriebssystem HP Designjet T7200 Grafik NVIDIA Quadro P4000 ZWCAD2019
|
erstellt am: 12. Mrz. 2015 11:50 <-- editieren / zitieren --> Unities abgeben: Nur für Lysier
|
cadffm Moderator 良い精神
Beiträge: 21533 Registriert: 03.06.2002 System: F1 und Google
|
erstellt am: 12. Mrz. 2015 12:01 <-- editieren / zitieren --> Unities abgeben: Nur für Lysier
Zitat: Original erstellt von Lysier: Vielen Dank hat super funktioniert!Gibt es auch eine Möglichkeit den Winkel des Textes zu ändern?
Natürlich, alles ist Möglich, naja-fast. Entweder du suchst dir was passendes oder liest dich ein wenig in DXF / LISP ein. Dafür gibt es auch ein extra Forum - siehe Link. Die Drehung steht im Gruppencode 50 , jedoch nicht als DezimalGrad. ------------------ CAD on demand GmbH - Beratung und Programmierung rund um AutoCAD Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Dober Heinz Mitglied Technischer Zeichner
Beiträge: 1143 Registriert: 20.12.2002 Autocad 2020/64B Win10 WORKSTATION Intel(R) CPU E5-1620 3.60GHz 16,0GB Ram 64 Bit-Betriebssystem HP Designjet T7200 Grafik NVIDIA Quadro P4000 ZWCAD2019
|
erstellt am: 12. Mrz. 2015 12:13 <-- editieren / zitieren --> Unities abgeben: Nur für Lysier
|
| Werkstudent (m/w/d) im Bereich Engineering (Konstruktionstechnik) | thyssenkrupp ist ein international aufgestelltes Industrie- und Technologieunternehmen mit rund 100.000 Mitarbeitenden. In 48 Ländern erwirtschaftete es im Geschäftsjahr 2022/2023 einen Umsatz von 38 Mrd ?. Mit umfassendem Technologie-Know-how entwickeln die Geschäfte wirtschaftliche und ressourcenschonende Lösungen für die Herausforderungen der Zukunft, vor allem in den Bereichen Klimaschutz und Energiewende, digitaler Transformation in der Industrie sowie Mobilität der Zukunft.... | Anzeige ansehen | Konstruktion, Visualisierung |
|
Lysier Mitglied technischer Sachbearbeiter
Beiträge: 8 Registriert: 25.03.2014
|
erstellt am: 12. Mrz. 2015 13:08 <-- editieren / zitieren --> Unities abgeben:
|