Книга: Delphi. Учимся на примерах

Перечислимые типы

Перечислимые типы

Перечислимые типы используют для определения упорядоченных наборов значений в виде списка идентификаторов, соответствующих этим значениям. Для объявления таких типов используют запись следующего вида:

type имя_типа = (элемент1, ... , элементN);

По умолчанию, первому элементу соответствует число 0, второму — 1 и т.д. Для того чтобы сопоставить с каким-либо элементом другое значение, следует использовать запись вида элемент = число.

Для извлечения числа, соответствующего некоторому элементу, используется функция Ord.

Пример:

type
 TDigits = (Zero, One, Two, Three, Four, Five, Six, Seven Eight, Nine, Ten);
 TConstants = (a = 10, b = 3);
var
 x: TDigits;
 k: TConstants;
 MyResult: integer;
 …
k:= b; //k присваиваем значении 3
if x = Zero then k:= a //если x=0, то к присваиваем 10
 MyResult:= Ord(k); //MyResult = 3 или 10
 …

Оглавление книги

Оглавление статьи/книги

Генерация: 0.954. Запросов К БД/Cache: 3 / 0
поделиться
Вверх Вниз