请问,lisp怎么向block添加自定义的块

snigefqb · 发表于 2013-11-17 15:21:02

如题
;;;检查是否存在块定义,没有则添加 D:\Program Files\CASS70\BLOCKS下的同名.dwg
(if (not (tblobjname "block" k));k为块名
;请问这里该怎么写,谢谢了
)

mandala · 发表于 2013-11-17 19:51:03

本帖最后由 mandala 于 2013-11-17 19:52 编辑

(if
(null(tblsearch "block" "gc124"))
(command "insert" "D:\\Program Files\\CASS70\\BLOCKS\\gc124.dwg" "250,50" "" "" ""))

在250,50位置插入一个符号

mandala · 发表于 2013-11-17 19:57:29

本帖最后由 mandala 于 2013-11-17 20:04 编辑

不过如果你dwg中有一个同名而不同形状的block（如也名叫gc124），再次插入gc124时插入的还是老的块。

这种时候我一般是新建一个dwg，插入一个正确的gc124.dwg然后删除，再插入老的图纸，这时候所有的gc124块都是正确的了。

楼主是在为cass做lisp吗？我最近又重新开始做这个了，很久没写了搞得头昏眼花，我们可以交流一下！

snigefqb · 发表于 2013-11-17 20:45:08

mandala 发表于 2013-11-17 19:57
不过如果你dwg中有一个同名而不同形状的block（如也名叫gc124），再次插入gc124时插入的还是老的块。

这 ...

是的,新手,头痛中呢

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

[提问] 请问,lisp怎么向block添加自定义的块