社区 › 源码共享 › 快速插入目录图档下图块

timmy521 发表于 2012-4-29 14:27:10

太好了。好东西。

zhouwanweihf 发表于 2012-8-13 21:37:46

请版主帮我编辑一下，固定一个块为插入图块，只需插入一次，这样就不用输入图块名称了。

zhouwanweihf 发表于 2012-8-14 23:58:25

本人不懂语言,请问此源码在哪呢?谢谢

zhouwanweihf 发表于 2012-8-15 23:01:44

嗯,天天进来逛一下也就高级会员了,请大哥帮小弟一把,这程序急用,谢谢
需要固定一个块为插入图块，只需插入一次,万分感激!

zhouwanweihf 发表于 2012-8-17 18:30:55

期待您的举手之劳。万分感谢！

zhouwanweihf 发表于 2012-8-18 19:23:06

期盼高人回复，万分感谢！

726613 发表于 2012-8-29 11:11:40

(defun c:kk ()   
    (setvar "cmdecho" 0)
    (command "insert" "C:\\cad\\图库.dwg" "0,0" "1" "" "")
    (entdel(entlast))
   (setq a (getstring "\n输入块名:")
      a (strcat "*" a)
      )
      (WHILE(setq p1 (getpoint "\n插入点:"))
      (command "insert" a p1 "" ""))
   (princ)
   )

【KAIXIN】你好，运行KK命令后，输入国库中的xJB图块，选取插入点后如下

问题：

1、插入的图块被分解了

2、被插入的图块所属图层也被改掉

请版主帮忙看一下如何解决，谢谢。

【KAIXIN】 发表于 2012-8-29 14:52:59

726613 发表于 2012-8-29 11:11 static/image/common/back.gif
(defun c:kk ()   
    (setvar "cmdecho" 0)
    (command "insert" "C:\\cad\\图库.dwg" "0,0" "1" " ...

这个是插入当前层，分解是在程序里面......

726613 发表于 2012-8-29 14:57:32

【KAIXIN】 发表于 2012-8-29 14:52 static/image/common/back.gif
这个是插入当前层，分解是在程序里面......

怎样才能不在程序里面被分解呢？请帮忙，谢谢

alexmai 发表于 2012-8-30 13:17:31

这个很有用，有时候要直接找到块～如标高～

查看完整版本: 快速插入目录图档下图块