jake1990 发表于 2014-12-19 09:26:37

求大神帮忙，如何一键插入绑定外部参照

探索问题很久，希望好心人帮忙解决下

doro 发表于 2015-4-22 10:34:38

是这个吗 (setvar "bindtype" 1)

kwok 发表于 2014-12-19 10:00:38

(defun c:tt()
(command "-xref" "A")
(command "-xref" "B" "*")
)

xsso 发表于 2014-12-19 10:26:24

（Vla-bind block ：vlax-true）

Block要你自己转换一下

jake1990 发表于 2014-12-19 12:13:42

kwok 发表于 2014-12-19 10:00 static/image/common/back.gif
(defun c:tt()
(command "-xref" "A")
(command "-xref" "B" "*")


谢谢大神的解答，我主要是想解决一键绑定后图层问题。
例如，如果命名为 FLOOR1 的外部参照包含命名为 WALL 的图层，则在使用“插入”选项绑定外部参照之后，依赖外部参照的图层 FLOOR1|WALL 将成为内部定义图层 WALL。

jake1990 发表于 2014-12-19 12:18:22

xsso 发表于 2014-12-19 10:26 static/image/common/back.gif
（Vla-bind block ：vlax-true）

Block要你自己转换一下

谢谢大神的解答，我主要是想解决一键绑定后图层问题。
例如，如果命名为 FLOOR1 的外部参照包含命名为 WALL 的图层，则在使用“插入”选项绑定外部参照之后，依赖外部参照的图层 FLOOR1|WALL 将成为内部定义图层 WALL。

jake1990 发表于 2014-12-19 13:18:28

vectra 发表于 2014-12-19 14:33:14

“插入”选项绑定外部参照，图层本来会合并进来，有什么问题呢

xsso 发表于 2014-12-19 22:58:20

jake1990 发表于 2014-12-19 12:18
谢谢大神的解答，我主要是想解决一键绑定后图层问题。
例如，如果命名为 FLOOR1 的外部参照包含命名为 W ...

就是用这个解决问题，插入绑定

jake1990 发表于 2014-12-20 09:52:40

xsso 发表于 2014-12-19 22:58 static/image/common/back.gif
就是用这个解决问题，插入绑定

(defun C:ii ( / inskey lst)
(setq inskey "T")
(setq inskey (if inskey :vlax-true :vlax-false))
(setq *doc (vla-get-activedocument(vlax-get-acad-object)))
(vlax-for x (vla-get-blocks *doc)
    (if (= :vlax-true (vla-get-isxref x))
      (setq lst(cons x lst))
    )
)
(mapcar (FUNCTION (LAMBDA(x)(vla-bind x inskey)))lst)
)

casd 发表于 2015-4-21 17:30:39

非常好，正在找办法
页: [1] 2
查看完整版本: 求大神帮忙，如何一键插入绑定外部参照