Abs

function Abs(Number Numeric type):Numeric type;

Returns the absolute value of an integer.

Syntax:

value := Abs(value);

Example:
Let's say you have a variable i. The type of this variable is assigned as integer. The value of this variable can be given an integer value. Here we have given a negative value. Finally, abs function was used to get the absolute value.

var
 i : Integer;

begin
 MyForm := TclForm.Create(Self);

 i := -1235;
 ShowMessage('Before: '+ IntToStr(i));
 //The absolute value of i is taken and put back to i.
 i:= Abs(i);
 ShowMessage('After: '+IntToStr(i));

 MyForm.Run;

end;