【发布时间】：2023-03-17 18:03:01
【问题描述】：
目前我有 AutoCAD 2012，想升级到 AutoCAD 2013。
我在我的 AutoCAD 中有一个定制的补充。 但是当我尝试加载这个时，我得到了这个：
COM.VLX 已加载。;错误：ARXLOAD 失败
Here is a part of my acaddoc.lsp:
;; ACADDOC.LSP is loaded into memory before the drawing is completely
;; initialized. S::STARTUP is called when a new drawing or an existing
;; drawing is opened. And is guaranteed to perform any setup operations
;; after a drawing is initialized.
(defun LoadARXVBA(/ strplatform strExt)
(if (wcmatch (getvar "platform") "*(x64)*")
(setq strExt "x64.arx")
(setq strExt ".arx")
)
;; load arx modules
(arxload (strcat "DetectESC" strExt))
(arxload (strcat "osnap" strExt))
(arxload (strcat "beditReactor" strExt))
;; load vba projects
(vla-loaddvb (acadobject) (findfile "sinkblock.dvb"))
(vla-loaddvb (acadobject) (findfile "triggers.dvb"))
(if (member "plotlog.arx" (arx));if loaded by acad.rx
(vla-loaddvb (acadobject) (findfile "PlotLog.dvb"))
)
;; connect to plotlog server
(if (member (strcat "plotlog" strExt) (arx))
(vla-runmacro (acadobject) "StartMonitor")
)
;; visuallisp projects
(load "base.vlx")
(load "startup.vlx")
(load "TSLOAD"); Load TIMESAVERS' commands:
(defun EVALCHK (dummy / ) 1)
;; run stuff
(startup)
)
(defun-q main(/)
;; load visuallisp & vba projects
(setvar "screenmenu" 1)
(setvar "menubar" 1)
(load "com.vlx")
(if (eq (vla-get-visible (acadobject)) :vlax-true)
(LoadARXVBA)
) ;end if
(princ)
) ;end main
(setvar "savetime" 8)
;; append 'main function to any posible existing S::STARTUP function
(setq s::startup (append s::startup main))
;|«Visual LISP© Format Options»
(100 2 1 2 nil "end of " 100 70 0 0 nil T T nil T)
;*** DO NOT add text below the comment! ***|;
谁能帮我解决这个问题？ 我在某些地方读到，arx 加载发生了一些变化......
【问题讨论】：