好我想你早就超过我了。网络研究
你这么说真是太好了,我的朋友。
你提到这很有趣。NET,因为我刚刚为LISP编写了一个LispFunction方法“NETLOAD”,它接受一个参数,一个指向DLL的有效文件路径,作为字符串(只是为了好玩)。英雄联盟
FWIW-
我保留了32位和64位MDITAB。同一目录中的ARX文件(我刚刚将这些文件重命名为64位,如下面代码中所述),并使用此**shell过滤要在多个AutoCAD版本和操作系统中加载的文件:
**我实际上没有使用这个命令,而是使用系统变量Reactor自动执行相同的功能。
(defun c:MdiTab(/ 64Bit-p)
;; © RenderMan, 2011
(vl-load-com)
(defun 64Bit-p ()
;; © RenderMan, 2011
;; Returns T if version is 64-Bit
;; Example: (64bit-p)
(if (vl-string-search "64" (getenv "PROCESSOR_ARCHITECTURE"))
T
nil))
((lambda (key sdi / mditab flag)
(if (and
sdi
(setq mditab
(cond
((vl-string-search "17" key) ; 2007, 2008, 2009
(if (64Bit-p)
"mditab17x64.arx"
"mditab17.arx"))
((vl-string-search "18" key) ; 2010, 2011, 2012
(if (64Bit-p)
"mditab18x64.arx"
"mditab18.arx"))))
(setq flag (findfile mditab))
(not (vl-position mditab (arx))))
(and (arxload mditab) (princ "\rMDITAB: LOADED "))
(cond
(flag (and (arxunload mditab) (princ "\rMDITAB: UNLOADED ")))
(mditabs
(prompt (strcat "\n** \"" mditab "\" cannot be found ** ")))
(sdi (prompt "\n** This AutoCAD version not supported ** "))
((prompt "\n** Command not allowed in SDI mode ** ")))))
(vlax-product-key)
(= 0 (getvar 'sdi)))
(princ))
HTH公司 是的!它确实有效。。。
非常感谢李!!
请务必在我稍后的下一篇文章中提供帮助 RenderMan的第二个建议也很好!谢谢你 嘿,男孩们,不知道这条线有多旧,日期没有出现。。。但是我刚刚运行了这个(32对64代码),我得到了不可比拟的字符串?
Im运行2010 Cad,Win7 64
我不是在这里做什么吗? **添加:只是想添加到我的阿卡多克。lsp
具体是哪种代码?
此外,如果你能够确定。。。当您在VLIDE中执行时,哪一行会抛出错误?
页:
1
[2]