[求助]两点确定填充图案的比例

my_autocad · 发表于 2007-9-30 10:53:00

两点确定填充图案的比例

对于填充图案的比例确定也是件麻烦的事情，因为在做铺装图时，要求图案要按实1：1填充，即，300X300的石材，量图案，就是300X300，为了确定比例，通常要进行换算，如先填充一个图案，量得图案尺寸，再换算比例！再填充，特麻烦，当然做得多了，有些比例也记得到！

有没有这样一个程序，先选取填充图案，确定两点的距离，输入想的尺寸，程序自动换算比例，更新图案呢？

highflybir · 发表于 2007-9-30 12:16:00

可以用用户定义方式填充，见上图，这样就可以控制大小尺寸。

highflybir · 发表于 2007-9-30 12:34:00

当然如果要编程的话，也可以，首先读取填充文件acadiso.pat的图案设置定义，然后算出其主要线的间距，然后就可以通过两点的距离（譬如300X300) 设置填充比例。这也是可以做到的。

my_autocad · 发表于 2007-9-30 12:54:00

感谢highflybir的发言，用户自定义最多只能有两种图案形式，如图所示的图案就不没有办法了，可能还是要程序才能解决

my_autocad · 发表于 2007-10-2 11:39:00

highflybir · 发表于 2007-10-2 17:09:00

这里做了一个程序文件。

用法: 先选择图案填充,然后输入命令:test,这样就设置好了图案的填充比例.你不妨测量一下，填充线和线之间的距离是符合你的要求的。

highflybir · 发表于 2007-10-2 17:18:00

这是R2004下运行时的录像演示。

my_autocad · 发表于 2007-10-2 18:11:00

感谢highflybir的支持，程序试用了，按照highflybir提供的顺序，完全能达到目的

但是，如果是要改早已填充好的图案的比例又怎么办？只有重新再填充了吧！

程序会不会改变ACAD。PAT的各项值呢？

修改早已填充好的图案的比例，通常我是这样换算的：

填充好的图案的比例/填充好的图案的距离=想要的比例/想要的距离

输入想的距离，就得到了要想的比便，图案自动更新

highflybir · 发表于 2007-10-2 18:40:00

本帖最后由作者于 2007-10-2 18:48:52 编辑

对于填充好的图案，用刷子刷一下就可以了啊，ma MATCHPROP.

你可以用过滤器，也可以用lisp编程批量修改。

另外对这个程序要说的一点是，在R2006以上版本，如果要精确的话，建议修改系统变量LUNITS 为8，不然会有小点误差。

这个程序当然不会更改acad.pat以及acadiso.pat文件。

因为 (open patfile "R")是对文件进行只读操作。

my_autocad · 发表于 2007-10-2 20:53:00

用MA也有局限，因为常常图案名不一样！

我试着用LSP写了个，郁闷惨了，根本不得行

思路就是修改DXF的值，再更新图案，但更新不了图案，要双击才行，不知道错在哪里啊

(defun c:ok ()
(setq a (entget(car(entsel))))
(setq b (assoc 52 a))
(setq d (cdr b))
(setq c (getint "\n请输入角度："))
(setq e (cons 52 (+ d c)))
(setq a (subst e b a))
(entmod a)
(entupd a)
)

账号		自动登录	找回密码
密码			注册

[求助]两点确定填充图案的比例

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源

本帖子中包含更多资源