对我来说，它听起来像是在做下面这样的简单版本检查，当前版本不在列表中，更糟糕的是，当13出来时，如果你不能添加版本，软件将不会再次运行。
((vl-string-search "R17.2" vrsn) (setq appstr "6.0")) ;autocad 09
((vl-string-search "R18.0" vrsn) (setq appstr "7.0")) ;10
((vl-string-search "R18.1" vrsn) (setq appstr "8.0")) ;11
((vl-string-search "R18.2" vrsn) (setq appstr "9.0")) ;12
为了不侵犯版权，请不要在此处张贴代码，除非您确信可以。
页:
1
[2]