如何判断块是否存在？存在直接插入，不存在新建块

bikeboy · 发表于 2016-7-20 16:32:07

您需要登录才可以下载或查看，没有账号？立即注册

×

如何判断块是否存在？存在直接插入，不存在新建块。(if (ssget "x" (list (cons 0 "insert") (cons 2 "sz")))) 判断完了之后呢？

/db_自贡黄明儒_ · 发表于 2016-7-20 17:00:01

newer · 发表于 2016-7-20 17:24:55

符号表查询，tblsearch

bikeboy · 发表于 2016-7-20 17:26:28

/db_自贡黄明儒_ 发表于 2016-7-20 17:00
http://bbs.xdcad.net/thread-704748-1-1.html 12楼最后一句有判断

(setq bn (vla-add blks (vlax-3d-point '(0 0 0)) "*U")) 理解不上去。 *U为匿名块？

/db_自贡黄明儒_ · 发表于 2016-7-20 21:13:26

bikeboy 发表于 2016-7-20 17:26
(setq bn (vla-add blks (vlax-3d-point '(0 0 0)) "*U")) 理解不上去。 *U为匿名块？

知道就行了，千万不要告诉他人。

bikeboy · 发表于 2016-7-21 09:43:24

/db_自贡黄明儒_ 发表于 2016-7-20 17:00
http://bbs.xdcad.net/thread-704748-1-1.html 12楼最后一句有判断

搞不定啊，如果没有块则新建，如果有直接插入。但结果不太对啊。

(if (not(tblsearch "block" "bn"))
(command ".-block" bn p1 "P" "")
(command ".-insert" bn p1 1 1 0) ) ;end if

newer · 发表于 2016-7-21 12:22:08

bikeboy 发表于 2016-7-21 09:43
搞不定啊，如果没有块则新建，如果有直接插入。但结果不太对啊。

那结果是什么？

bikeboy · 发表于 2016-7-21 12:29:24

结果是啥都不出来。。。。

newer · 发表于 2016-7-21 13:41:45

bikeboy 发表于 2016-7-21 12:29
结果是啥都不出来。。。。

你上面的IF 语句，没有块，建立块（并没插入），有了才插入。

所以你第一次的时候是看不到插入的。

第二个INSERT语句应该在IF外面。

bikeboy · 发表于 2016-7-21 13:51:11

(if (not(tblsearch "block" "bn"))
(command ".-block" bn p1 "P" "")
) ;end if
(command ".-insert" bn p1 1 1 0)

我原来是按照这样理解的，可是插入已存在的块时仍然提醒块已存在，是否重定义

newer · 发表于 2016-7-21 14:03:20

bikeboy 发表于 2016-7-21 13:51
(if (not(tblsearch "block" "bn"))
(command ".-block" bn p1 "P" "")
) ;end if

bn是变量，不是字符串

(if (not(tblsearch "block" "bn"))

你这地方错了。改成 bn

bikeboy · 发表于 2016-7-21 14:07:48

搞错了，现在可以了，多谢老大指导。

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

[求助] 如何判断块是否存在？存在直接插入，不存在新建块