这次没有问题了，简单的command，感谢 GU_XL的帮助，
解释一下的我的代码思路，我是用点选的方法，记录2个点，然后执行命令的 ” f “ 栏选择，
下面是全部的代码：
-
- (defun c:tt (/ ngc_pa ngc_pb ss)
- (setvar "CMDECHO" 0);_关闭命令提示
- (Setq osmode_bak (getvar "osmode"));_记录捕捉
- (Setvar "osmode" 0);_关闭捕捉
- (setq ngc_pa(getpoint "指定一点:")
- ngc_pb(getpoint "指定另一点")
- )
- (command ".region" "f" ngc_pa ngc_pb "" "")
- (command ".union" "f" ngc_pa ngc_pb "" "")
- (setq ss (ssget "p"))
- (command ".Explode" ss)
- (setq ss (ssget "p"))
- (command "pedit" "m" ss "" "y" "j" "" "")
- (Setvar "osmode" osmode_bak);_还原捕捉
- (setvar "CMDECHO" 1);_打开命令提示
- (princ)
- )
，谁还有简单的方法也可以贴出来。 | 
