举例:
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 单元下的公用函数目录

posted on 2008-03-30 22:55  万一  阅读(3716)  评论(0编辑  收藏  举报