"__设计是空ゝ 发表于 2012-8-18 14:49:33

求一框选多边形填充工具插件

求~~~~~~~~~~~~~······

ucuc2003 发表于 2012-12-14 00:24:22

本帖最后由 ucuc2003 于 2012-12-14 00:25 编辑

(defun C:kh (/ s1)                ;快速选择对象,填充图案
   (setvar "cmdecho" 0)
   (setvar "hpassoc" 1);控制填充图案是否关联(1:是;0:否)
   (princ "\n快捷填充,请选择填充区域:(***跳过则为拾取内部点填充)")
    (if (setq s1 (ssget))
      (command "bhatch" "s" s1 "" "")
      (progn
            (princ "\n请拾取填充内部点:")
            (command "bhatch" pause)
         );progn
   );if
    (princ)
);defun

试一试这个,看看

zhangzl 发表于 2012-12-11 09:12:20

看不懂题目,本身cad不就可以吗?

/fendou结构绘图 发表于 2018-9-5 11:20:59

页: [1]
查看完整版本: 求一框选多边形填充工具插件