| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| ZWCAD 2023: Bearbeitung eines 3D-Objekts mit Griffen |
Autor
|
Thema: Blöcke nicht mehr umbenennen?? (4460 mal gelesen)
|
Bidi Mitglied Maschinenbaumechanikermeister
Beiträge: 19 Registriert: 04.12.2001
|
erstellt am: 10. Mrz. 2004 14:54 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen, kann man im Mechanical 2004 DX SP1 keine Blöcke mehr einfach umbenennen? Muß ich immer erst den Block sprengen und dann wieder unter einem anderen Namen speichern. Im 6er ging das noch mit einfach umbenennen.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13516 Registriert: 30.11.2003 ACAD 2011 Mechanical ff
|
erstellt am: 10. Mrz. 2004 14:59 <-- editieren / zitieren --> Unities abgeben: Nur für Bidi
wenn nicht, versuchs hiermit : (vl-load-com) (defun BLOCK_RENAME ( ALTERNAME NEUERNAME / ) (if (and (=(type ALTERNAME) 'STR)(tblsearch "BLOCK" ALTERNAME) (=(type NEUERNAME) 'STR)(snvalid NEUERNAME)(not(tblsearch "BLOCK" NEUERNAME)) ) (progn (vla-put-name (vla-item (vla-get-blocks (vla-get-ActiveDocument (vlax-get-acad-object) ) ) ALTERNAME ) NEUERNAME ) (not(not(tblsearch "BLOCK" NEUERNAME))) ) ) )
(defun C:BLOCK_RENAME ( / OBJEKT OBJEKTDATEN ALTERNAME NEUERNAME) (if (setq OBJEKT (car(entsel))) (progn (setq OBJEKTDATEN (entget OBJEKT)) (if (=(cdr(assoc 0 OBJEKTDATEN)) "INSERT") (progn (setq ALTERNAME(cdr(assoc 2 OBJEKTDATEN))) (if (and(setq NEUERNAME (getstring 'T "\nNeuer Name : "))(snvalid NEUERNAME)) (if (BLOCK_RENAME ALTERNAME NEUERNAME) (princ (strcat"\nBlock \"" ALTERNAME "\" wurde in \"" NEUERNAME "\" umbenannt.\n" )) (princ (strcat"\nBlock \"" ALTERNAME "\" konnte nicht zu \"" NEUERNAME "\" umbenannt werden.\n" )) ) (princ "\nKeine gültige Blockbezeichnung eingegeben!\n") ) ) (princ "\nKeine Blockreferenz gewählt!\n") ) ) (princ "\nNichts gewählt!\n") ) (princ) ) Laden und dann mit BLOCK_RENAME aufrufen, Referenz anklicken.... ------------------ - Thomas - Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
HELMUT.C Mitglied MASCH.-BAU-TECHNIKER/ FREIBERUFL. KONSTRUKTEUR
Beiträge: 52 Registriert: 05.09.2003
|
erstellt am: 10. Mrz. 2004 15:01 <-- editieren / zitieren --> Unities abgeben: Nur für Bidi
|
Bidi Mitglied Maschinenbaumechanikermeister
Beiträge: 19 Registriert: 04.12.2001
|
erstellt am: 10. Mrz. 2004 15:55 <-- editieren / zitieren --> Unities abgeben:
|
Bidi Mitglied Maschinenbaumechanikermeister
Beiträge: 19 Registriert: 04.12.2001
|
erstellt am: 10. Mrz. 2004 16:01 <-- editieren / zitieren --> Unities abgeben:
Hallo Thomas, ich war zu voreilig! die Lisp funzt doch nicht! Ich bekomme immer den Fehler: no function definition: VLAX-GET-ACAD-OBJECT kann man da einfach was um ändern und gut is? greetinxx Bidi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
mijadukd Mitglied
Beiträge: 122 Registriert: 12.12.2001 Autodesk Factory Design Suite Ultimate 16 Autodesk Vault Prof 2016 Autodesk Publisher 2016 u.v.m ... FSC Celsius H720, 32GB RAM
|
erstellt am: 10. Mrz. 2004 16:07 <-- editieren / zitieren --> Unities abgeben: Nur für Bidi
Zitat: Original erstellt von Bidi: Hallo zusammen,kann man im Mechanical 2004 DX SP1 keine Blöcke mehr einfach umbenennen? Muß ich immer erst den Block sprengen und dann wieder unter einem anderen Namen speichern. Im 6er ging das noch mit einfach umbenennen.
Hallo Miteinander! Keine Aufregeung, geht schon, nur etwas anders! Du darfst nicht den Button zum schliessen und speichern der Referenz (<=> _refclose) drücken, sondern einfach (bei geoeffnetem Dialogfeld)in der Commandline AMREFCLOSE eingeben; danach erscheint wieder das Dialogfeld zum Speichern, wo man nun auch Basispunkt editieren kann und Name aendern kann. Gruss, mijadukd Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Caladia Ehrenmitglied V.I.P. h.c.
Beiträge: 2546 Registriert: 04.03.2002 ACAD2009 ACAD2010 SP2 ACAD2011 SP1 ABDS-S 2012 SP2 ABDS-S 2013 SP2 ABDS-S 2014 SP1 ABDS-S 2015 SP2 ABDS-S 2016 SP1 Expresstools A3-Makroboard 16-Tasten Lupe Impression 3 Win7 64bit IE11 Firefox Office2003 SP3
|
erstellt am: 10. Mrz. 2004 16:20 <-- editieren / zitieren --> Unities abgeben: Nur für Bidi
|
CADmium Moderator Maschinenbaukonstrukteur
Beiträge: 13516 Registriert: 30.11.2003 ACAD 2011 Mechanical ff
|
erstellt am: 10. Mrz. 2004 16:42 <-- editieren / zitieren --> Unities abgeben: Nur für Bidi
|
eberhard Ehrenmitglied V.I.P. h.c. Konstrukteur
Beiträge: 2072 Registriert: 21.06.2002
|
erstellt am: 11. Mrz. 2004 06:43 <-- editieren / zitieren --> Unities abgeben: Nur für Bidi
Zitat: Original erstellt von mijadukd: Hallo Miteinander!Keine Aufregeung, geht schon, nur etwas anders! Du darfst nicht den Button zum schliessen und speichern der Referenz (<=> _refclose) drücken, sondern einfach (bei geoeffnetem Dialogfeld)in der Commandline AMREFCLOSE eingeben; danach erscheint wieder das Dialogfeld zum Speichern, wo man nun auch Basispunkt editieren kann und Name aendern kann. Gruss, mijadukd
Herzlichen Dank mijadukd
------------------ Freundliche Grüsse - Eberhard Willach Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Bidi Mitglied Maschinenbaumechanikermeister
Beiträge: 19 Registriert: 04.12.2001
|
erstellt am: 11. Mrz. 2004 11:50 <-- editieren / zitieren --> Unities abgeben:
|
Bidi Mitglied Maschinenbaumechanikermeister
Beiträge: 19 Registriert: 04.12.2001
|
erstellt am: 11. Mrz. 2004 11:55 <-- editieren / zitieren --> Unities abgeben:
|
marvin101010 Mitglied ingenieur der architektur ohne diplom, bauzeichner ohne lehre, cad-admin ohne wissen :-)
Beiträge: 562 Registriert: 22.01.2003 Pentium 4 Windows XP Autocad 2002 Autocad 2002LT + Extender ADT 3.3 ArchiCAD
|
erstellt am: 11. Mrz. 2004 12:04 <-- editieren / zitieren --> Unities abgeben: Nur für Bidi
|
Brischke Ehrenmitglied V.I.P. h.c. CAD on demand GmbH
Beiträge: 4186 Registriert: 17.05.2001 ACAD
|
erstellt am: 11. Mrz. 2004 12:07 <-- editieren / zitieren --> Unities abgeben: Nur für Bidi
|
Bidi Mitglied Maschinenbaumechanikermeister
Beiträge: 19 Registriert: 04.12.2001
|
erstellt am: 12. Mrz. 2004 09:25 <-- editieren / zitieren --> Unities abgeben:
|
Magab Mitglied Konstrukteur
Beiträge: 66 Registriert: 06.04.2005 Win7 XEON QUAD 3,6 Ghz 32GB Ram 1333MHZ FSB NVidia QuadroFX PNY 4500 1.5GB ACA/ACAD/MCAD/AIS Series
|
erstellt am: 16. Jul. 2012 11:55 <-- editieren / zitieren --> Unities abgeben: Nur für Bidi
ACHTUNG! Sie antworten auf einen Beitrag der älter als 1 Jahr ist! Hallo Forum,
hab über die suche diesen Beitrag gefunden, ist sehr interessant. Hab folgendes Problem, die lisp hab ich gemacht und auch für zufrieden erfunden, für mein perfektes Glück jedoch würde ich noch eine Autonummer benötigen, mit tcount von ExpressTool kann ich die Blöcke leider nicht angreifen, eine Idee? ------------------ Es gibt keine Dummen Fragen, nur Dumme Antworten CU. Magab Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Campari Mitglied Maschinenbautechnikerin
Beiträge: 107 Registriert: 14.11.2005 Windows 7, Mechanical 2010,2012,2013 Inventor 2010, 2012, 2013
|
erstellt am: 15. Aug. 2012 08:25 <-- editieren / zitieren --> Unities abgeben: Nur für Bidi
Warum macht Ihr Euch das alles so kompliziert. Geht doch einfach in die Benutzeroberfläche (Befehl: cui) und ändert in dem Befehl refclose den hinterlegten Befehl mit _amrefclose- schon ist beim Schließen des Blockes eine Umbenennung möglich. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |