Delphi里面的两个函数不会使，大家帮忙看看怎样才能生效

你丫的，看我

procedure TForm1.Button2Click(Sender: TObject);
var
  num:Integer;
  temp:Integer;
begin
    num:=StrToInt(edt1.Text);
    temp:=Abs(num);
    edt1.Text:=IntToStr(temp);
end;


procedure TForm1.Button4Click(Sender: TObject);
var
  num:Extended;
  temp:Int64;
begin
    num:=StrToFloat(edt1.Text);
    temp:=Round(num);
    edt1.Text:=FloatToStr(temp);
end;

~_清_風_~

Round(number,num_digits)
Number  需要进行四舍五入的数字。
Num_digits  指定的位数，按此位数进行四舍五入。

Abs 好像没错  

11年__那些事儿

uses单元里加入math单元