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.