q工具源码

hao3ren

我不要钱，也不要回复，但是有问题也不要问我啊

myhobby76

I IDENTIFY SOME PROBLEM (GEOMCAL.ARX) AND (acopm.arx ) BOTH ARE NOT INSTALL IN AUTOCAD 2018 VERSION  I CHANGE SOME CODE

1. (if (and (not( Member "GEOMCAL.ARX" (mapcar (function strcase) (arx))))
   
2.          (not(member "GEOMCAL.CRX" (mapcar (function strcase) (arx)))))
   
3.     (cond ((findfile "GEOMCAL.CRX" ) (arxload (findfile "GEOMCAL.CRX") nil))
   
4.           ((findfile "GEOMCAL.ARX") (arxload (findfile "GEOMCAL.ARX") nil))))
   

(if (and (not( Member "GEOMCAL.ARX" (mapcar (function strcase) (arx)))) <br />          (not(member "GEOMCAL.CRX" (mapcar (function strcase) (arx))))) <br />     (cond ((findfile "GEOMCAL.CRX" ) (arxload (findfile "GEOMCAL.CRX") nil)) <br />           ((findfile "GEOMCAL.ARX") (arxload (findfile "GEOMCAL.ARX") nil)))) <br />

BUT STILL NOT WORKING

baitang36

一缕阳光com 发表于 2020-5-25 11:40
程序已过期

自己改一下，把(if (< cdat 20181030)   改成 (if (< cdat 30181030)

(if (/= regNumber regnum)这里也改一下 把/=改成=。也就是改成(if (= regNumber regnum)

ming1789_55399

感謝分享                              

fangmin723

沙发做起！！！

hhh454

厉害，楼主高人

davide888

感谢分享   

yanchao316

楼主，你为什么这么牛，算不算问题？

liwen888888

感谢分享  

rhww

感谢分享   

love1030312

感谢 分享  厉害了我的哥

lidaxiu

kwok

Thanks for share.