【Gu_xl】自动提取AutoCAD 图形中填充图案的定义文件

Gu_xl · 发表于 2011-12-24 21:57

本帖最后由 Gu_xl 于 2013-6-11 10:41 编辑

在有些时候，从别人处得到dwg图形，里面有非常漂亮的非标准填充图案方案，要想借用其图案是很困难的！
里面的非标准的填充图案，我们cad标准填充图案文件acad.pat或acadiso.pat文件有若没有该图案定义，这时想要对图案进行编辑和使用，也非常麻烦和不方便！一个好的办法是将图案定义提取出来，添加到acad.pat或acadiso.pat文件中！这一切烦恼的问题都不存在了！
在程序的编制过程中，得到了highflybird和caoyin两位版主的鼎力技术支持，在此表示感谢！

游客，本帖隐藏的内容需要发帖数高于 20 才可浏览，你当前发帖数只有 0

atone · 发表于 2023-4-17 10:50

atone 发表于 2023-4-17 10:48
我这样设置了快捷键，也保存了ini文件，快捷键不起作用或者叫CAD不识别

我想知道我是逻辑理解错了，还是有什么东西没有添加？

kucha007 · 发表于 2021-1-8 21:21

花了两天的时间逛明经，终于把发帖数攒到20了！！！下载来使用了一下，不要太好用！！！
那些求发邮箱的。朋友，这个插件还是源码，值得你为了它好好逛逛论坛。

guosheyang · 发表于 2021-4-5 10:03

swb4420 发表于 2021-2-28 15:11
两个测试CAD提示图形文件无效。

fixmj.exe 本版块搜索这个文件修复下即可

highflybir · 发表于 2011-12-24 21:58

本帖最后由 highflybir 于 2011-12-24 22:15 编辑

占沙发。
不知道关于镜像后的填充图案是不是真的无解？

gbhsu · 发表于 2011-12-24 22:01

本帖最后由 gbhsu 于 2011-12-24 22:01 编辑

坐板凳！！！！

cxs259 · 发表于 2011-12-24 22:03

鼓掌！！！！！！

highflybir · 发表于 2011-12-24 23:39

GXL-STRPARSE 没有定义

仲文玉 · 发表于 2011-12-25 08:24

精品作品！支持！

Gu_xl · 发表于 2011-12-25 09:43

highflybir 发表于 2011-12-24 23:39
GXL-STRPARSE 没有定义

函数补上：

;;;字串分割
(defun gxl-StrParse (str del / pos lst)
(while (setq pos (vl-string-search del str))
(setq lst (cons (substr str 1 pos) lst)
str (substr str (+ pos 1 (strlen del)))
)
)
(if (= " " Del)
(vl-remove "" (reverse (cons str lst)))
(reverse (cons str lst))
)
)

highflybir · 发表于 2011-12-25 10:31

还有几点建议：

1、建议用measurement 系统变量
;;measurement
  (setq MEASUREMENT (getvar 'MEASUREMENT)) ;_ 0 Ó¢ÖÆ 1 ¹«ÖÆ
  (cond
((= 0 MEASUREMENT) ;
   (setq patname (getenv "ANSIHatch"))
)
((= 1 MEASUREMENT)
   (setq patname (getenv "ISOHatch"))
)
  )

(setq filename (findfile patname))
  (setq filepath (strcat (VL-FILENAME-DIRECTORY filename) "\\"))
2、好像应该按照i文件支持路径顺序找acad.pat或者acadiso.pat

譬如天正，斯维尔之类的，它们的  标准pat文件并不在你的那个目录下，(getpath)

3、如果是根据图案名字来定义文件名，可以不考虑添加,因为一个文件名只有一种图案有效。
4、如果是批量或者连续选择，建议前面让用户选择，是否添加到标准图案库中，如果是，则判断标准图案中是否有
有则不计算，无则计算。
如果不是添加到标准图案中，则寻找支持目录下是否有同名的图案名，有的话不计算，否则计算。
这样可以防止覆盖原来的pat

gzxl · 发表于 2011-12-25 10:48

精彩，无私奉献

669423907 · 发表于 2011-12-25 10:59

我搞机械的，虽然用不上，但是很支持！

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

[【Gu_xl】] 【Gu_xl】自动提取AutoCAD 图形中填充图案的定义文件

本帖子中包含更多资源

点评

评分

本帖被以下淘专辑推荐:

相关帖子

评分

点评

评分