InRange

Definition

function InRange(const Value, Min, Max: Integer): Boolean;

Source

function InRange(const Value, Min, Max: Integer): Boolean;
begin
  Result := (Value >= Min) and (Value <= Max);
end;

Availability

SCAR Divi 3.00 > Current

Description

Returns true if a given integer value Value is larger than or equals a given value Min and is smaller than or equals a given value Max.

Example

begin
  WriteLn(InRange(5, 1, 10));
  WriteLn(InRange(0, 1, 10));
end.

Output:

1
0

See Also

• SameValue