Lee Mac 发表于 2022-7-6 07:59:49

 
好我想你早就超过我了。网络研究

BlackBox 发表于 2022-7-6 08:04:27

 
你这么说真是太好了,我的朋友。
 
你提到这很有趣。NET,因为我刚刚为LISP编写了一个LispFunction方法“NETLOAD”,它接受一个参数,一个指向DLL的有效文件路径,作为字符串(只是为了好玩)。英雄联盟

BlackBox 发表于 2022-7-6 08:05:18

 
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公司

jamesfui 发表于 2022-7-6 08:11:16

是的!它确实有效。。。
非常感谢李!!
请务必在我稍后的下一篇文章中提供帮助

jamesfui 发表于 2022-7-6 08:15:20

RenderMan的第二个建议也很好!谢谢你

N_461 发表于 2022-7-6 08:18:43

嘿,男孩们,不知道这条线有多旧,日期没有出现。。。但是我刚刚运行了这个(32对64代码),我得到了不可比拟的字符串?
Im运行2010 Cad,Win7 64
 
我不是在这里做什么吗?

N_461 发表于 2022-7-6 08:22:06

**添加:只是想添加到我的阿卡多克。lsp

BlackBox 发表于 2022-7-6 08:22:40

 
具体是哪种代码?
 
此外,如果你能够确定。。。当您在VLIDE中执行时,哪一行会抛出错误?
页: 1 [2]
查看完整版本: lsp加载和卸载帮助