Как сделать любой объект последним в Autocad Autolisp?

Question

Я работаю с AutoCAD electric 2016. Есть команда "c:aeballoon", которая может быть применена к последней сущности через lisp. если я хочу применить эту команду к любому другому объекту (скажем, к N-му объекту) на чертеже. таким образом, существует одно решение, как сделать N-ю сущность последней. поэтому эта команда c: aeballoon может быть успешно применена к этому N-му объекту.

Заранее спасибо

Answer 1

Вы можете создать следующую программу AutoCADLisp.

1. скопируйте следующее в блокнот

(defun c:makelast() (команда ".copy" "si" (setq kk (car (entsel))) "0,0" "" ".erase" kk "")(princ))

2. сохраните файл как makelast.lsp

3. Используйте команду Appload для загрузки программы.

4. Запустите новую команду Makelast, чтобы выбрать объект, который вы хотите сделать последним.