社区 › AutoLISP/Visual LISP 编程技术 › 有没有好办法对动态图块块名用ssget选择过滤？

LIULISHENG 发表于 2018-1-25 16:01:14

我来支持哦

jzh56088 发表于 2022-7-8 11:25:21

snddd2000 发表于 2013-12-21 13:48


新手请教，这代码怎么变成可编译的lsp文件呀？

jzh56088 发表于 2022-7-8 11:30:57

新手请教下，这代码怎么变成可编译的lsp文件？

ucuc2003 发表于 2022-7-17 00:56:20

;取得块名name
(setq en (car (entsel "\n选择块：")))
   (or
      (eq "TCH_BLOCK_INSERT" (cdr (assoc 0 (entget en))))
      (eq "INSERT" (cdr (assoc 0 (entget en))))
      (alert "没有选择块!")
    )
   (setq xobj (vlax-ename->vla-object en))
   (setq name (vlax-get-property xobj 'EffectiveName))

查看完整版本: 有没有好办法对动态图块块名用ssget选择过滤？