Epsilon: Double;
The Epsilon property returns the minimum positive value of a non-zero real number.
Sub UserProc;
Var
D: Double;
Begin
D := Double.Epsilon;
End Sub UserProc;
After executing the example the "D" variable contains the least value, that is, 4.94065645841247E-324.
See also: