---

Hallo,

noch eine kurze Frage zu Blöcken!
Gibt es irgendwo eine kleine .lsp um schon benannte Blöcke z.B. durch anklicken umzubennen?
Alles was ich gefunden habe, z.B. bei cadwiesel handelt immer um unbenannt Blöcke!
Möchte die Blcke einfach ein bischen komfortabler umbennen als immer ins Menü zugehen!
Also, anklicken, Namen anzeigen, Namen ändern!
Soähnlich meine ich das!

Danke!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Alpschorsch,

du kannst das mit dem ACAD-Befehl - umbenenn- sehr komfortabel lösen.
Ich habe mir einen Button in 'nen Werkzeugkasten gelegt mit der Befehlsfolge: ^C^Cumbenenn.

Bei Aktivierung öffnet sich dann ein Dialogfeld.

------------------
mfg Volker

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von Alpschorsch:
Hallo,
noch eine kurze Frage zu Blöcken!
Gibt es irgendwo eine kleine .lsp um schon benannte Blöcke z.B. durch anklicken umzubennen?
Danke!

---

Da es den komfortablen UMBENENN Befehl gibt, vermute ich mal, dass Du Dich nur unkorrekt ausgedrückt hast und gar keine Blöcke umbenennen willst, sondern Blockreferenzen auf andere Blockdefinitionen verweisen lassen willst.

Das geht relativ einfach mit ein wenig LISP, denn da muß nur der Hinweis auf die referenzierte Definition in den DXF-Daten der Blockeinfügung geändert werden (steht in Gruppencode 2). Du kannst dazu mein freies Programm SSMOD verwenden, das Du aus http://www.archdim.de/SSMOD.LSP downloaden kannst.

Rufe es so auf:

Befehl: (ssmod (ssget '((0 . "INSERT"))) 2 "NEUERBLOCKNAME")

Falls Dir das zu umständlich ist, kannst Du den Blocknamen natürlich einfach durch Zeigen auf eine andere Blockreferenz holen:

(cdr (assoc 2 (entget (car (entsel))))

und natürlich kannst Du das alles dann auch bequem in einen eigenen Befehl packen:

(defun c:re-ref (/ en newref)
  (if (and (setq en (car (enstel)))
          (setq newref (cdr (assoc 2 (entget en))))
      )
      (ssmod (ssget '((0 . "INSERT"))) 2 newref)
  )
  (prin1)
)

Und diesen Befehl kannst Du nach Laden des kleinen Lisps so aufrufen:

Befehl: re-ref

Dabei bleiben alle anderen Eigenschaften der Blockreferenz (Layer, Farbe, Linientyp, Skalierung, Drehung) erhalten, und auch eventuell angehängte Attribute und sogar XDATA bleiben am Objekt hängen.

Gruß
Tom Berger

------------------
Architekturwerkzeuge für AutoCAD: http://www.archtools.de

---

BLK_RENAME.lsp.txt

Hallo Alpschorsch,
und nun noch was zum umbenennen von Blöcken (Doslib 6.1 wird benötigt).

Funktion:
-Block picken.
-Neuen Namen eingeben und fertig.
-Wenn der Name in der Zeichnung vorhanden ist wird solange nach einem neuen Namen gefragt bis Abgebrochen wird oder ein gültiger Name eingegeben wird.

(Getestet auf ACAD2004)

------------------
Grüße Thomas   

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi tom.berger,

eigentlich wollte ich wirklich nur Blocknamen ändern,
aber durch anklicken des Blockes sollte der vorhandene Name identifiziert werden und denn möchte ich dann ersetzen.
Bei dem Befehl "umbenn" muß ich ja erst den Namen des zuändernden Blockes wissen!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi T.Bürger,

genau so meine ich das! Das hört sich gut an!
Wie man .lsp lädt weiß ich, aber Doslib 6.1?
Wie läuft das, wo gibt es das?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Alpschorsch,

Download unter: http://www.mcneel.com/doslib.htm

-Einfach die doslib2004.arx in den Support-Ordner kopieren.
-Die doslib2004.arx in die Startgruppe von Autocad mit aufnehmen (Exras->Anwendungen->Startgruppe).
-Autocad beenden und neu starten.
-Fertig.

------------------
Grüße Thomas   

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

HI,

Vielen Dank!
Eine super Sache! Einfach und gut! Kein Schicki Micki!
Kann ich nur allen empfehlen die mit vielen Blöcken arbeiten!
Gute Ergänzung zu "umbenn".

10U's for you!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hi,

es tritt doch noch ein Problem auf!
Kann hiermit jemand etwas anfangen?

Block wählenFehler! AutoCAD meldet: "Fehlerhafter Argumenttyp: lentityp ((-1 .
<Objektname: 7ebf6e60> ) (0 . "LINE") (330 . <Objektname: 7ebf6e48> ) (5 .
"C8C4") (100 . "AcDbEntity") (67 . 0) (8 . "W-37-BOHRUNGEN") (62 . 153) (6 .
"ACAD_ISO10W100") (48 . 0.5) (100 . "AcDbLine") (10 -30.0 60.0 0.0) (11 -47.0
60.0 0.0) (210 0.0 0.0 1.0))" als Ursache.

Bei blk_rename geht ACAD aufeinmal mehrere Schritt wieder rückwärts!
Und das gezeichnete ist Futsch!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von marvin101010:
dein lisp will ein objekt und du gibst ihm ne liste

---

Hi, was heißt das genau?
Kenne mich im Detail da nicht aus!
Ich hab doch alles so gemacht wie oben beschrieben!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Wollte Blöcke mit Attributen umbenennen!
Liegt es an den Attributen?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

so...nu hab ich das alles mal gelesen...
hatte ich vorhin nämlich nicht.

vergiss meine letzte antwort...war ein schnellschuss.

wenn ich dich richtig verstehe willst du blöcke umbenennen,
richtig? ;-)

nun les doch noch mal den fehler, den du gepostet hast.

besonders der teil in dem (0 . "LINE") sollte interessant sein.

------------------
...so long and thanx for all the fish!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Original erstellt von marvin101010:
so...nu hab ich das alles mal gelesen...
hatte ich vorhin nämlich nicht.

vergiss meine letzte antwort...war ein schnellschuss.

wenn ich dich richtig verstehe willst du blöcke umbenennen,
richtig? ;-)

nun les doch noch mal den fehler, den du gepostet hast.

besonders der teil in dem (0 . "LINE") sollte interessant sein.

---

Ich bin leider mit dem Chinesisch noch nicht vertraut!
Bin mehr Anwender als Entwickler!
Kann mir nur ein bischen zusammen reimen!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

BLK_RENAME.lsp-2-.txt

Hallo Alpschorsch,

konnte mich gestern nicht melden, hatte frei ;-).

Zu deiner Fehlermeldung:
Ich würde, aus der Hüfte heraus geschossen, behaupten das Du den Block beim picken nicht getroffen hast, sondern etwas anderes (siehe Punkt 2). Ich konnte mit dem Teil bislang jeden Blocknamen ändern, auch wenn der Block Attribute hatte.

Ich habe das Teil noch ein wenig überarbeitet:
1.)Meldung mit Schleife wenn das "gepickte" kein Block (INSERT) ist.
2.)Meldung mit Schleife wenn der neue Blockname schon verwendet wird.

------------------
Grüße Thomas   

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo T.Bürger,

Vielen Dank für deine Mühe!

Scheit alles hervorragend zu klappen!
Gehe jetzt nochmal in die Testphase!
Bis jetzt keine Fehlermeldung!

So muß CAD sein! Schnell und einfache Handhabung!
Sonst kann ich ja wieder meine Rapis rausholen!

Danke und 10 for you!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

schon erledigt doslib 6.1

------------------
Same shit, different DAU. DAU Jones

  Bernd P.      

[Diese Nachricht wurde von Bernd P am 11. Mrz. 2004 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

wenn irgentwas nicht funzen sollte!-> Sihe Teil unter http://ww3.cad.de/foren/ubb/Forum52/HTML/001219.shtml

------------------
- Thomas -

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP