Ord/ru
From Free Pascal wiki
Jump to navigationJump to searchThe printable version is no longer supported and may have rendering errors. Please update your browser bookmarks and please use the default browser print function instead.
│
Deutsch (de) │
English (en) │
français (fr) │
русский (ru) │
Функция Ord возвращает индекс (порядковый номер, начиная с 0) элемента перечисления.
Исторически сложилось, что функция Ord использовалась для приведения типа Char к типу Byte для получения ASCII-кода символа строки.
function Ord(X: TOrdinal): LongInt;
function Ord(c: Char): Byte;
Пример использования
Program Example45;
{ Программа, демонстрирующая работу функций Ord(), Pred(), Succ(). }
type
TEnum = (Zero, One, Two, Three, Four);
var
X: LongInt;
Y: TEnum;
begin
X := 125;
Writeln(Ord(X)); { выводит 125 }
X := Pred(X);
Writeln(Ord(X)); { выводит 124 }
Y := One;
Writeln(Ord(y)); { выводит 1 }
Y := Succ(Y);
Writeln(Ord(Y)); { выводит 2}
end.