随笔 - 2146  文章 - 97 评论 - 11761 trackbacks - 253

举例:
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 万一 阅读(...) 评论(...) 编辑 收藏