有关保存图块的问题

yxr · 发表于 2006-4-10 15:31:00

请高手指教！我是将图块插入到当前图形中，然后修改图块，请问如何将修改后的图块以原来的名字存入到图块原来所在的路径。（只保存图块所在范围内的要素）

xinghesnak · 发表于 2006-4-11 11:52:00

先用选择集选择图块，再用sendcommand发送命令，生成外部块，存到原来的路径

yxr · 发表于 2006-4-11 16:01:00

请问xinghesnak大侠，能否给我发个实例代码，谢了！

mccad · 发表于 2006-4-11 17:47:00

为什么不打开图块直接修改呢？

yxr · 发表于 2006-4-12 08:48:00

我是通过道路网所表示的地形进行调出对应的图块，有时还要对调出的图块进行修改。我通过命令wblock可以对图块进行保存了，但是保存后再向当前图形插入该图块，结果提示“图块插入失败”，请问mccad您知道是什么原因吗？

xinghesnak · 发表于 2006-4-12 09:41:00

说错了，不是sendcommand，用这个就行吧

AcadApp.ActiveDocument.Wblock "D:\" & selectionset.item(0).name & ".dwg", SelectionSet

yxr · 发表于 2006-4-12 10:00:00

wblock是个命令，我直接调用这个命令，保存了图块，但是再将该图块加入到当前图形中，就会出现“插入失败”，你知道是什么原因吗？

雪山飞狐_lzh · 发表于 2006-4-12 10:07:00

你的代码发上来看看?

yxr · 发表于 2006-4-12 10:32:00

Set saveMenuItem = newMenu.AddMenuItem(newMenu.Count + 1, _
Chr(Asc("&")) & "保存图形", macro & "_wblock")

我这里用的是菜单宏，通过这个语句就可以直接调用原系统的wblock命令，就会用跳出对话框供选择

xinghesnak · 发表于 2006-4-12 10:36:00

发上来睽睽啦！

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