Hallo,
danke, daß Ihr euch reingedacht habt.
@cadffm
ich möchte automatisierbar den Rtext im Block exploden ohne die Werte im Schriftfeld zu verlieren. Als Ergebnis soll das Schriftfeld auch auf Nicht-ET-Systemen die ursprünglichen Rtext-Inhalte darstellen können.
IST:
Schriftfeld (Blockname=TITLE) mit
-Werten in den Attributen
-Rtext mit $(getvar,ctab)
Soll:
Schriftfeld (Blockname=TITLE) mit
-Werten in den Attributen gleich wie IST
-Mtext mit Layoutname aus dem Rtext
Lisp-Weg ist nicht notwendig, war mein erster Gedanke das zu automatisieren, weil Ich das "RText2Mtext" über ein paar Zeichnungen
laufen lassen möchte.
Welche Nicht-Lisp-Variante könntest Du mir empfehlen? (c)
Von Hand kriege ich das gewünschte Ergebniss so hin:
1.Title kopieren, 2.Title ursprungen, 3.Rtext ursprungen, den geursprungte Objekthaufen mit 4.Block wieder als Title neudefinieren mit Objekte löschen.
@CADwiesel
wenn ich Deinen Code richtig verstehe ist nach dessen Ausführung der Block und der Rtext aufgelöst, ich möchte jedoch den Block mit den Werten erhalten.
Ist es möglich (a) den Rtext im Block zu exploden oder (b) muß zum exploden des Rtextes auch der Block aufgelöst werden?
Mit Block-auflösen (b) habe ich das wie oben beschrieben von Hand gelöst, diese meine Lösung bekomme ich aber automatisiert nur für Schritt 2 und 3 hin mit:
Code:
(setq Auswahl (ssget "_X" '((0 . "INSERT") ( 2 . "TITLE")))) ; finded alle Blöcke namens TITLE
(if Auswahl (command "_explode" (ssname AUSWAHL 0))) ; 2. ursprungt diese Blöcke
(command "_explode" (ssget "_x" '((0 . "RTEXT")(1 . "$(getvar,ctab)"))) "") ; 3. ursprungt den Rtext
gibt es einen verhältnissmäßigen Lösungsweg für (a), (b) oder (c)?
Gruß
Peter
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP