var
d: Real;
v: Variant;
begin
d := Abs(-1.2);
ShowMessage(FloatToStr(d)); {1.2}
v := '-100';
ShowMessage(v); {-100; v 是变体类型可以直接显示}
v := Abs(v);
ShowMessage(v); {100; 如果变量的确是个数字, 变体类型也是可以取绝对值}
end;
System 单元下的公用函数目录System.Abs - 绝对值
原创
©著作权归作者所有:来自51CTO博客作者JLee79的原创作品,请联系作者获取转载授权,否则将追究法律责任
举例:
提问和评论都可以,用心的回复会被更多人看到
评论
发布评论
相关文章
-
abs(x )求绝对值
abs(-1)1abs(1)1
Linux 求绝对值