strlen新版本值不一样

mice6672

请问各位老师，这个兼容性的问题怎么解决，
在acad2020之前的版本，（strlen “中”）=2；而acad2021版本，（strlen “中”）=1
这样程序过去能运行正常，在acad2021上就不正常了，怎么解决？

llsheng_73

新版下使用(length(vl-string->list"中等线体"))和旧版下(strlen"中等线体")会是相同结果;
如果要在旧版下得到新版strlen的结果要复杂些，相当于需要按字分解字符串，也是通过vl-string->list转成表来处理，碰到大于128的，后跳2个，不同后跳1个，计数加1，表循环处理完了，结果也就出来了。
综合起来可以象下边这样，不过不管怎么样都得面对修改已有代码的问题

1. (defun Mstrlen(str NewOrOLD / l i)
   
2.   (setq l(vl-string->list"中等线体")i 0)
   
3.   (if NewOrOLD
   
4.     (while l
   
5.     (setq l((if(>(car l)128)cddr cdr)l)
   
6.           i(1+ i)))
   
7.     (length l)))

(defun Mstrlen(str NewOrOLD / l i)<br />   (setq l(vl-string->list"中等线体")i 0)<br />   (if NewOrOLD<br />     (while l<br />     (setq l((if(>(car l)128)cddr cdr)l)<br />           i(1+ i)))<br />     (length l)))

_$ (MSTRLEN "中等线体"t)
4
_$ (MSTRLEN "中等线体"nil)
8
_$

vitalgg

随着国际化事务的发展,dwg原来的采用的 ANSI (ISO-8859).不再适合当前的生产环境。
比如。一个dwg中显示多种语言。
这种情况下，只有使用 unicode编码，才能适应国际间交流。

原来的程序不适应了，就修改原来的程序。没有源代码就重写新的。

改变量 lispsys=0 能适应旧的环境 ,但终将被历史淘汰。

东升铮

桌子自2021版本加入此变量以控制VLIDE默认打开的编辑器，默认下为1，即加载vl_u.arx扩展以支持Unicode编码........

烟盒迷唇

不改变这个变量，旧的CAD版本怎么才能正常使用呢？

mokson

这是代码界犯的结构性错误 。

guosheyang

烟盒迷唇 发表于 2022-9-23 08:32
不改变这个变量，旧的CAD版本怎么才能正常使用呢？

肯定只有改代码了

烟盒迷唇

guosheyang 发表于 2022-9-23 08:40
肯定只有改代码了

改代码了就能兼容旧版本？

guosheyang

烟盒迷唇 发表于 2022-9-23 08:51
改代码了就能兼容旧版本？

判断那个变量的值   看是旧版的  还是新版的   对应不同代码应该就可以了

e2002

使用 LISPSYS 判断当前是否支持 Unicode，有一个很隐蔽的bug。
具体请参考：

https://zhuanlan.zhihu.com/p/524751350

烟盒迷唇

guosheyang 发表于 2022-9-23 10:09
判断那个变量的值   看是旧版的  还是新版的   对应不同代码应该就可以了

这样改的东西太多了吧