这句话为何不能运行

heyong · 发表于 2004-4-5 10:29:00

我的意思是用模版新建一个文件

(command "new" "coremode.dwt")

模版文件已在搜索目录下，在r14下可以，在2002下提示 "coremode.dwt"为非法命令

citykunan · 发表于 2004-4-5 15:01:00

本帖最后由作者于 2004-4-6 8:35:28 编辑

将SDI系统变量设成0,将FILEDIA也设成0.

heyong · 发表于 2004-4-5 16:03:00

我试了还是不行，command还是把"coremode.dwt"看成是命令

alin · 发表于 2004-4-6 07:05:00

;I found this pasted by R.Robert Bell (defun NewDwg (fqnName / oldCmdEcho)
(setq oldCmdEcho (getvar "CmdEcho"))
(setvar "CmdEcho" 0)
(cond ((= (getvar "SDI") 0)
(command "._VBAStmt"
(strcat "AcadApplication.Documents.Add \"" fqnName "\"")))
((command "._VBAStmt" (strcat "ThisDrawing.New \"" fqnName "\""))))
(setvar "CmdEcho" oldCmdEcho)
(princ)) ;;;Usage: (NewDwg (findfile "acad.dwt"))

citykunan · 发表于 2004-4-6 08:37:00

(defun c:test ()
(command "sdi" "1")
(command "new" "y" "C:\\Program Files\\AutoCAD 2002\\Template\\acad.dwt")
(command "sdi" "0")
)

heyong · 发表于 2004-4-7 14:55:00

sdi 是个什么参数

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