[求助]：帮忙看看小数位数的问题。

jsrlb · 发表于 2005-9-27 19:26:32

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

(setq a 0.00)
(setq b (rtos a 2 2))
(command "text" "bl" (list 0 0 0) 2.5 0 b)

它写出来的结果是0，而不是0.00，怎么才能让它写出来的是0.00呢？
各位老大帮帮忙啊，谢谢啦。

yshf · 发表于 2005-9-27 20:07:42

如下处理：
(setq dz (getvar "dimzin"))
(setvar "dimzin" 0)
(setq a 0.00)
(setq b (rtos a 2 2))
(command "text" "bl" (list 0 0 0) 2.5 0 b)
(setvar "dimzin" dz)

jsrlb · 发表于 2005-9-28 09:13:47

用了一下，不错，谢谢啊

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

[求助] [求助]：帮忙看看小数位数的问题。

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子