如何使任何实体成为 Autocad Autolisp 中的最后一个实体

How can make any entity as last entity in Autocad Autolisp

我正在使用 AutoCAD electrical 2016。有 "c:aeballoon" 命令可以通过 lisp 应用于最后一个实体。如果我想将此命令应用于绘图中的任何其他实体(比如第 N 个实体)。所以有一个解决方案,如果有的话,如何将第 N 个实体作为最后一个实体。所以这个 c:aeballoon 命令可以成功应用于第 N 个实体。

提前致谢

您可以创建以下 AutoCADLisp 程序。

  1. 将以下内容复制到记事本

(defun c:makelast() (command ".copy" "si" (setq kk (car (entsel))) "0,0" "" ".erase" kk "") (原则))

  1. 将文件另存为makelast.lsp

  2. 使用Appload命令加载程序。

  3. 运行 新命令 Makelast 到 select 你想让它持久的对象。