AutoCAD14中用VBA如何炸开块?
<P>程序段:</P><P>Set NewBlk = ACADDoc.ModelSpace.InsertBlock(InsertPoint, TargetBlkName, 1, 1, 0)Objs =NewBlk .explode()</P>
<P>InsertPoint和TargetBlkName都是合法的变量,第一句执行OK,第二句提示"Not Applicable",看来是这个方法没有实现。</P>
<P>但为何使用explode命令可以炸开?</P>
<P>如何用别的方法处理?</P> 试试SendCommand? <P>但是AutoCAD14并没有SendCommand方法。</P> 我已经解决,刚开始使用了AutoCAD Automation Extensions组件ACVBEXT,可移植性炸开操作,但是块中属性的位置发生了变化;然后在网络上下载的DWGdirectX(OdaToolkit Module),测试发现不支持炸开的功能,最后使用了Open Design Alliance的DWGDirectX 2.02版搞定的。
页:
[1]