cad中的lisp语言使用hatch填充

  • A+
所属分类:CAD二次开发

废话不多说,填充首先要满足一个条件,那就是图形封闭,即使我们用鼠标点,那个也是自动生成一个边界图形,只是说填充后边界自动删除来的,你也可以自动获取图形的边界,这样获取要指定一个边界中的任意一个点,你也可以通过数据绘制一个边界,通过填充后再删除边界即可,

举例,创建一个边界,添加已知一个封闭图形。图形中的一个点,

;(command "-boundary" ddd "");创建填充边界,ddd一个点
;(setq TC1(ENTLAST));;边界图元

;(command "_HATCH" "ANSI31" 1 0 TC1  "");可以出现多个边界对象

没有删除边界对象,自己删除

复制

例子2,直接通过一个点填充已知封闭图形

(command "-hatch" TATCP1 "");TATCP1这个点必须在封闭图形内

;(command "-hatch" "p" "ANSI31" 1 0 TATCP1 "")

复制

例子2注意的是命令是减号,不是下划线,你也 可以试试输入 -hatch这个命令,试试里面出参数,自己调试参数

 

 

发表评论

:?: :razz: :sad: :evil: :!: :smile: :oops: :grin: :eek: :shock: :???: :cool: :lol: :mad: :twisted: :roll: :wink: :idea: :arrow: :neutral: :cry: :mrgreen: