如何在AutoCAD2000中用Lisp命令打开DWG文件？

Kingtop · 发表于 2002-11-19 15:43:00

如题
是用(command "open" filename.dwg)
或者(open filename.dwg "r")
但上面两种都不行。我该怎么办。。。。。。
(vla-open ...)可以吗?

shicai · 发表于 2002-11-20 05:59:00

方法一:· (command “vbastmt” “AcadApplication.Documents.Open \”c:/mydrawing.dwg\””)[br]方法一

command “vbastmt” “AcadApplication.Documents.Open \”c:/mydrawing.dwg\””)
方法二 (command "vbastmt" (strcat "ThisDrawing.Application.Documents.Open \"" filename "\""))
(setq acadapp (vlax-get-acad-object)
      acaddocs (vla-get-documents acadapp))
(vla- active  (vla-open acaddocs filename))

龙龙仔 · 发表于 2002-11-20 10:02:00

(vla-open (vla-get-documents (vlax-get-acad-object)) "2.dwg" ;|圖檔名稱|; :vlax-false)[br]

baozhiliang · 发表于 2002-11-20 16:00:00

能不能使DWG文件在新的ACAD窗口中打开？或者使打开的文件显示在最前面，为什么打开后，没有转为当前文件？

baozhiliang · 发表于 2002-11-20 16:01:00

能不能使DWG文件在新的ACAD窗口中打开？或者使打开的文件显示在最前面，为什么打开后，没有转为当前文件？

龙龙仔 · 发表于 2002-11-20 16:39:00

Kingtop · 发表于 2002-11-20 18:02:00

非常感谢你们，我最后用ap-api实现了：
(apax-init)
(setq myDwg(apa-open apDocuments filename T))
(apa-activate myDwg)
不管用什么方法，都基本类似。。。

alin · 发表于 2002-11-21 09:09:00

Without using script files, can you make sildes for a few drawings (Not yet open) ?

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

如何在AutoCAD2000中用Lisp命令打开DWG文件？

方法一:· (command “vbastmt” “AcadApplication.Documents.Open \”c:/mydraw

(vla-open (vla-get-documents (vlax-get-acad-object)) "2.dwg" ;|圖檔名稱|; :

龙龙仔的方法真不错，能不能。。。。。

龙龙仔的方法真不错，能不能。。。。。

(vla-activate (vla-open.......

谢谢大家,我的问题解决了

Good, can you help me with ....