| |
| 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, eine Pressemitteilung
|
Autor
|
Thema: Text in Block überprüfen und ggf. ändern (1245 mal gelesen)
|
tommygo Mitglied
Beiträge: 47 Registriert: 03.02.2005 Windows 7 Professional - Version 6.1 - SP 1 Autodesk Building Design Suite Premium 2017
|
erstellt am: 02. Okt. 2007 09:44 <-- editieren / zitieren --> Unities abgeben:
Hallo, ich hatte dieses Thema schon einmal in einer anderen Rubrik (http://ww3.cad.de/foren/ubb/Forum54/HTML/017934.shtml), habe dort aber nur einen Teilerfolg gehabt. Ich denke bei LISP bin ich richtiger. Hier meine Frage: Wir sind mit der Firma umgezogen und nun vergesse ich teilweise bei älteren Plänen im Schriftkopf die Anschrift zu ändern. Gibt es eine Möglichkeit, dass beim öffnen einer Zeichnung den Text in einem Block (der innerhalb einer DWG auch mehrmals vorkommen kann) zu überprüfen und ggf zu ändern. Da wir innerhalb des Ortes umgezogen sind, ist eigentlich nur STRASSEALT gegen STRASSENEU auszutauschen. Gruß und Dank tommygo
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tunnelbauer Ehrenmitglied V.I.P. h.c. Bauingenieur
Beiträge: 7085 Registriert: 13.01.2004 ich hab eh keine Probleme damit...
|
erstellt am: 02. Okt. 2007 10:16 <-- editieren / zitieren --> Unities abgeben: Nur für tommygo
Du hast jetzt vergessen bei deiner Anfrage zu schreiben, wie du verhinderst, dass die 22 Attribute abgefragt werden.... Generell: Der Planstempel sollte normal nicht mit dem Planschild kombiniert sein... Das Planschild sollte normal nicht als Block eingefügt werden, sondern als XRef - somit kann sich die Adresse ändern sooft sie will und eine Änderung ist kein Problem (als nächstes ändert sich die Adresse, das Logo oder was auch immer von deinem Auftraggeber - du musst schon wieder alle Pläne anrühren...) sonst teste mal: Code:
(command "_-insert" "blockname=LW:/Verzeichnis/unterverzeichnis/Blockneu.dwg" nil)
------------------ Grüsse Thomas Korrekturen zum Kochbuch AutoLISP
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tommygo Mitglied
Beiträge: 47 Registriert: 03.02.2005
|
erstellt am: 02. Okt. 2007 10:36 <-- editieren / zitieren --> Unities abgeben:
das mit dem ersetzen des Blockes beim öffnen einer Zeichnung hat ja gut funtioniert und die Attribute kann man mit ESC abbrechen. Aber jetzt wird immer der Block ersetzt auch wenn schon der neue Block drin ist und ESC muß jedesmal benutzt werden. Deswegen Teilerfolg im Forum Rund um Autocad und jetzt er Versuch im Forum Autolisp. Ich dachte es gibt vielleicht mit LISP eine Möglichkeit nur den Text STRASSEALT zu überprüfen ob dieser vorhanden ist und wenn ja gegen STRASSENEU zu ersetzen. tommygo
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Andreas Kraus Mitglied Elektrotechniker
Beiträge: 1455 Registriert: 11.01.2006 WIN 10 ACAD 2022 BricsCAD V23
|
erstellt am: 02. Okt. 2007 11:12 <-- editieren / zitieren --> Unities abgeben: Nur für tommygo
Hallo tommygo, ich habs leider verpasst dir schon im Rund um AutoCAD Forum zu antworten, aber da hab ich was. (danach noch regenerieren) (if (setq blk_data (tblsearch "BLOCK" "kopf")) (progn (setq ent_name (cdr (assoc -2 blk_data))) (while ent_name (setq ent_data (entget ent_name)) (if (and (= (cdr (assoc 0 ent_data)) "TEXT") (= (cdr (assoc 1 ent_data)) "STRASSEALT") ) (progn (setq ent_data (subst (cons 1 "STRASSENEU") (assoc 1 ent_data) ent_data ) ) (entmod ent_data) ) ) (setq ent_name (entnext ent_name)) ) ) (princ) ) Gruß Andreas Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
tommygo Mitglied
Beiträge: 47 Registriert: 03.02.2005
|
erstellt am: 02. Okt. 2007 13:05 <-- editieren / zitieren --> Unities abgeben:
|