求教小数问题.........

dwt2601

求教小数问题......... 我想问一下,,怎么样才能知道一个浮点型数,小数位是否有值.........
如:128.000000 (小数位无值) 266.000123 (小数位有值)
哪位朋友有什么好办法吗？？？ 有判断的函数吗？？？？ 求教。。。。。。。。谢谢了。。
给个程序段最好了。。。。呵呵。。。。。。。

dwt2601

谢谢了

王咣生

(defun myfunc ( val )
(if (= (fix val) val)
t ;无值
nil ;有值
)
) (defun c:test ()
(if (myfunc 128.000000) ;266.000123
(alert "无值")
(alert "有值")
)
)

dwt2601

xie le