Hallo Danr
ich gehe davon aus, dass Du den Befehl "bereinig" meinst
Der Befehl in DWGEditor lautet "purge"
Achtung:
da "purge" bzw. "bereinig" unter Unmständen nicht alle überflüssigen Daten in einem Durchlauf bereinigt
sondern ev. mehrere Durchläufe notwendig sind habe ich mal vor langer Zeit ein LISP geschrieben,
dass so lange den purge Befehl aufruft bis nichts mehr zu bereinigen vorhanden ist.
anbei der LISP-Code
(defun C:REINIG( / ok oldecho)
(setq oldecho (getvar "CMDECHO"))
(setvar "CMDECHO" 0)
(setq ok T)
;* Solange OK T ist
(while ok
;* Befehl BEREINIG aufrufen
(command "._PURGE" "_AL" "*" "_Y")
;* Wenn der Befehl nach dem Aufruf noch aktiv ist, bedeudet das,
;* daß es noch Elemente zum Bereinigen gibt.
(if (= (getvar "CMDACTIVE") 1)
(progn
;* Solange der befehl aktiv ist wird mit _Y geantwortet
(while (= (getvar "cmdactive") 1)
(command "_Y")
)
)
;* Wenn nach dem Befehlsaufruf BEREINIG wieder beendet wird,
;* gibt es nichts mehr zu bereinigen.
(setq ok nil)
)
)
(setvar "CMDECHO" oldecho)
'DANKE
)
------------------
Grüße
Heinz
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP