[求助]：如何将一个SS集中的所有实体作成一个BLOCK。

matichen · 发表于 2002-8-25 13:31:09

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

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

×

在2002中使用，（command "block" .......以后就不知如河写了。

XDSoft · 发表于 2002-9-10 03:09:33

自己用BLOCK命令在命令行和ACAD交互下，就明白需要什么参数了：

命令: (command "block")
nil

输入块名或 [?]: abc ;;你的块名
指定插入基点:          ;;基点参数
选择对象: (ssget)    ;;给选择集

选择对象: 找到 1 个

选择对象:
<Selection set: 1ff>
找到 1 个

选择对象:                ;;回车

所以，你应该这么写：

(command "._block" "块名" 基点选择集 "")

上面的情况，如果图中有该块，在交互中会提示你是否重定义，这样交互多两个输入，你可以在做块前，把系统变量expert设置成5，就所有提示略过，都按YES处理，上面的代码就通用了。

(setvar "expert" 5)

做完块后，别忘了把系统变量EXPERT设置回去。

cy956 · 发表于 2002-9-10 13:01:15

这样写：

(mapcar 'setvar '("cmdecho""pickbox""aperture""osmode""blipmode""expert""filedia""attreq") '(0 0 1 0 0 5 0 0))

(command "block" bln p s "" "insert" bln p 1 1 0)
(mapcar 'setvar '("cmdecho""pickbox""aperture""osmode""blipmode""expert""filedia""attreq")'(1 4 4 32 1 0 1 1))(princ)

捕捉等也可按复原处理。

xkcjf_1219 · 发表于 2007-4-22 15:44:16

找了很久，终于找到了！！！谢谢！！！

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

[求助] [求助]：如何将一个SS集中的所有实体作成一个BLOCK。

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子