VBA如何拆离光栅图像

dchlmz · 发表于 2009-6-6 09:12:00

VBA如何拆离光栅图像？

dchlmz · 发表于 2009-6-7 20:14:00

没有人知道

mccad · 发表于 2009-6-7 20:30:00

你说详细一点，何谓拆离。

dchlmz · 发表于 2009-6-7 23:14:00

图像管理器中有“拆离”项。
VBA中如果用object.Delete删除图像后，在图像管理器中还存在图像路径
我是想删除图像后，图像管理器中也进行删除,和图像管理器中“拆离”方法一样

StartMe · 发表于 2009-7-24 22:12:00

我也很想知道答案。不知有没有知道的？

gdzhou · 发表于 2009-7-26 15:29:00

我以前做的也没有找到方法，后来是用Sendcommand "-im d * "来解决
如果本图没有光栅的时候运行可能会出错，这种情况可以将上面的命令分段，当发送完“-im D”的时候判断命令的返回
如：
ThisDrawing.SendCommand "-im d" & vbCr
If ThisDrawing.GetVariable("lastprompt") "当前图形中无图像。" Then
ThisDrawing.SendCommand "*" & vbCr
End If