yang686526

text文字（数字）如何变为数字！
www.dimcax.com
text文字（数字）如何变为数字！
比如cad里用text写的“123.00”，“0.45”等，用lisp怎么样才能变为纯数字阿，因为要用这些数字进行计算？
谢谢了！
d
(distof "123.00")
or
(read "123.00")
d
谢谢版主，这个函数我知道，问题是我怎么样才能选取到cad图上的text文字，比如在图上某处有单行文字“121.00”，我用选择集还是用什么其他的函数阿？多谢了！
d
选择集
(ssget '((0 . "text")(1 . "121.00")))
d
谢谢4楼，问题解决了。
我是这样实现目的的：
首先：(setq tt (entget (car (entsel"\n请选择数字"))))；手动选择要转变的text数字，得到图元数据表
然后依据单行还是多行文字用下面语句：
(setq zb (nth 12 tt))；取出数据表中的文字表项
(setq zc (nth 10 tt))
(setq y (caddr zc)) ；取出表中数字元素
(setq tv (atof py))；类型转换
d