数字转汉字(支持整数和小数)

czb203 · 发表于 2017-10-19 14:22:31

大神，你又出手啦~~~好久不见~

lifuq1979 · 发表于 2017-10-19 19:02:02

好程序，就是不知用在哪个领域

梦里水香 · 发表于 2017-10-20 08:47:41

USER2128 发表于 2017-10-18 19:57
在(setq lst3 (reverse lst3) ... 行前加入:
(if (not Lst4) (setq Lst4 Lst3 Lst3 nil))
可解决(numtost ...

(numtostr 0.1)
"点一"

USER2128 · 发表于 2017-10-20 11:13:56

梦里水香发表于 2017-10-20 08:47
(numtostr 0.1)
"点一"

程序没有问题的，是因你的系统变量中去掉了头部"0"造成的，
意思是：(rtos 0.1 2 16) 转成了".1" 而非正常的"0.1"

梦里水香 · 发表于 2017-10-21 08:49:32

USER2128 发表于 2017-10-20 11:13
程序没有问题的，是因你的系统变量中去掉了头部"0"造成的，
意思是：(rtos 0.1 2 16) 转成了".1" 而非正 ...

(rtos 0.1 2 16)
"0.1000000000000000"

pengfei2010 · 发表于 2017-10-21 08:52:45

回帖是一种美德！感谢楼主的无私分享谢谢

USER2128 · 发表于 2017-10-21 11:38:34

本帖最后由 USER2128 于 2017-10-21 11:44 编辑

梦里水香发表于 2017-10-21 08:49
(rtos 0.1 2 16)
"0.1000000000000000"

这个，你就用用系统变量将尾"0"去掉
详见“DIMALTZ”系统变量

我的：DIMALTZ = 9

梦里水香 · 发表于 2017-10-21 11:53:17

USER2128 发表于 2017-10-21 11:38
这个，你就用用系统变量将尾"0"去掉
详见“DIMALTZ”系统变量

改成9了也不行，版本是autocad2008

USER2128 · 发表于 2017-10-21 12:05:31

本帖最后由 USER2128 于 2017-10-21 12:09 编辑

梦里水香发表于 2017-10-21 11:53
改成9了也不行，版本是autocad2008

应该是系统变量
dimzin
我的设置成8

梦里水香 · 发表于 2017-10-21 12:37:30

USER2128 发表于 2017-10-21 12:05
应该是系统变量
dimzin
我的设置成8

我的系统变量dimzin也是8

账号		自动登录	找回密码
密码			注册

[函数] 数字转汉字(支持整数和小数)