Skip to content

Ord

Return ordinal value of an ordinal type.

Declaration

Source position: system.fpd line 58

  function Ord(X: TOrdinal) : LongInt;

Description

Ord returns the Ordinal value of a ordinal-type variable X.

Historical note:

Originally, Pascal did not have typecasts and ord was a necessary function in order to do certain operations on non-integer ordinal types. With the arrival of typecasting a generic approach became possible, making ord mostly obsolete. However ord is not considered deprecated and remains in wide use today.

Errors

None.

See also

Name Description
Chr Convert byte value to character value
High Return highest index of open array or enumerated
Low Return lowest index of open array or enumerated
Pred Return previous element for an ordinal type.
Succ Return next element of ordinal type.

Example

Program Example45;
{ Program to demonstrate the Ord,Pred,Succ functions. }
Type
  TEnum = (Zero, One, Two, Three, Four);
Var
  X : Longint;
  Y : TEnum;
begin
  X:=125;
  Writeln (Ord(X));  { Prints 125 }
  X:=Pred(X);
  Writeln (Ord(X));  { prints 124 }
  Y:= One;
  Writeln (Ord(y));  { Prints 1 }
  Y:=Succ(Y);
  Writeln (Ord(Y));  { Prints 2}
end.