hehoubin 发表于 2013-5-11 12:15:35

求两选择集对象的差集运算

本帖最后由 hehoubin 于 2013-5-11 12:35 编辑

(defun c:cj () 差集
          (setq ss (ssget))
          (setq ss1 (ssget))
          (command ".region" ss "" )
          (command ".region" ss1 "" )
   (command "_.subtract" ss "" ss1 "")
          (command "_.explode" (entlast) "")
   (command "_.explode" (ssget "p") "")
   (setvar "PEDITACCEPT" 0)
   (command "_.pedit" "m" (ssget "p") "" "y" "j" 0 "")
(PRINC))


我写的有问题。请大侠帮忙

x_s_s_1 发表于 2013-5-11 12:20:03

阅读权限太高了，我师父说看不到，没办法解决

hehoubin 发表于 2013-5-11 12:34:12

不知道在哪里改权限

500w008 发表于 2013-5-11 13:31:12

yoyoho 发表于 2013-5-12 06:42:08

(defun c:cj () 差集
          (setq ss (ssget))
          (setq ss1 (ssget))
          (command ".region" ss "" )
          (command ".region" ss1 "" )
   (command "_.subtract" ss "" ss1 "")
          (command "_.explode" (entlast) "")
   ;(command "_.explode" (ssget "p") "")
   (setvar "PEDITACCEPT" 0)
   (command "_.pedit" "m" (ssget "p") "" "y" "j" 0 "")
(PRINC))

hehoubin 发表于 2013-5-13 12:27:20

5#，那个好像没有用哟。
页: [1]
查看完整版本: 求两选择集对象的差集运算