本帖最后由 作者 于 2006-8-31 9:28:51 编辑
怎样在LISP中利用ObjectDBX在不打开图形文件的情况下,生成该图形的DWF文件?
让我郁闷的是即使下面打开图形的一段程序也行不通,那位高手帮帮我呀,先谢谢了!!!- (defun c:try()
- (setq filename "C:\\Documents and Settings\\www\\桌面\\try.dwg")
- (setq dbxdoc (vla-get-Documents (vlax-get-Acad-Object)))
- (setq objplot (vla-open dbxdoc filename))
- (setq obj (vla-get-Plot objplot))
- (vla-plottofile obj filename "DWF6 ePlot.pc3")
- (vlax-release-object dbxdoc)
- (vlax-release-object obj)
- (vlax-release-object objplot)
- )
|