峰峰兒 发表于 2013-8-31 13:19:24

print1985 发表于 2013-9-1 12:23:59

钻石会员 你走错门了 最好去c++那个门去问问

流_星 发表于 2014-9-15 22:21:15

这个问题解决了吗
说说谢谢

流_星 发表于 2014-9-23 17:27:54

(if (or        (= (type c:cal) 'LIST)    ;R14
        (= (type c:cal) 'SUBR)    ;R15
        (= (type c:cal) nil)      
    )
(if (and (not(member "GEOMCAL.ARX" (mapcar (function strcase) (arx))))
       (not(member "GEOMCAL.CRX" (mapcar (function strcase) (arx)))))
    (cond ((findfile "GEOMCAL.CRX") (arxload (findfile "GEOMCAL.CRX") nil))
          ((findfile "GEOMCAL.ARX") (arxload (findfile "GEOMCAL.ARX") nil))))
)
试用全版本
页: [1]
查看完整版本: ARX