Ich hatte das selbe Problem.
Eine LISP ist meines erachtens dafür nicht nötig.
Ich habe mir damals eine Schaltfläche programmiert mit folgendem Makro:
lö;(ssget "X" '((0 . "TEXT")(1 . "")));;
Dabei werden alle leeren DTexte gelöscht. Leider bleibt das Makro im Befehl Löschen stehen, wenn KEINE leeren Texte vorhanden sind :-(
Als Lösung machte ich folgendes Makro:
_point;0,0;(ssget);letztes;;(ssget "X" '((0 . "TEXT")(1 . "")));lö;_p;;_point;0,0;(ssget "X" '((0 . "POINT")));lö;_p;;
Es erstellt zuerst einen Punkt bei 0,0 holt sich dann alle leeren Texte in die "letzte Auswahl", also die leeren Texte, löscht dann die "letzte Auswahl", erstellt dann wieder einen Punkt bei 0,0 holt sich dann alle Punkte in die "letzte Auswahl", löscht dann die "letzte Auswahl", also die Punkte.
Das ist zwar umständlich, aber so bleibt das Makro nie stehen. Leider sind danach immer ALLE Punkte weg :-(
Da ich nie mit Punkten arbeite stört mich dies jedoch nicht.
Hoffe geholfen zu haben...
Im Anhang noch mein erstelltes Schaltflächensymbol als BMP.
mfg
neo
------------------
Welcome to the Real
[Diese Nachricht wurde von neo4matrix am 11. Sep. 2009 editiert.]
[Diese Nachricht wurde von neo4matrix am 11. Sep. 2009 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP