Типизированные константы и инициированные перемен

Object Pascal допускается использование типизированных констант. Они задаются в разделе объявления констант следующим образом:

<идентификатор>: <тип> = <значение>

Здесь <идентификатор> - идентификатор константы; <тип> - тип константы; <значение> - значение константы.

Во всех версиях Delphi, кроме версии 6, типизированным константам можно присваивать другие значения в ходе выполнения программы, поэтому фактически они представляют собой переменные с начальными значениями, т. е. являются инициированными переменными.

Типизированная константа приобретает указанное в ее объявлении значение, т. е. инициируется, лишь один раз: к моменту начала работы программы. При повторном входе в блок (процедуру или функцию), в котором она объявлена, инициация типизированной константы не производится, и она сохраняет то значение, которое имела к моменту выхода из блока.

Типизированные константы могут быть любого типа, кроме вариантов, файлов, объектов и классов. Нельзя также объявить типизированную константу-запись, если хотя бы одно из ее полей является полем файлового типа, вариантом, объектом или классом.

ипизированную константу нельзя использовать в качестве значения при объявлении других констант или границ типа-диапазона.

Константы простых типов и типа string

Объявление таких констант обычно не вызывает трудностей, так как в качестве их значения используются нетипизированные константы или их идентификаторы.

Примеры объявлений:

type
colors = (white, red, black);
{ ----- Правильные объявления: ----- }
const
CurrCol colors = red;
Name String = 'Вирт H.';
Year Word = 1989;
X Real = 0.1;
Min Integer =0;
Max Integer = 10;
Days 1..31 = 1;
Answer Char = 'Y';
{----- Неправильные объявления: ----- }

Mass: array [Min..Max] of Real;
{Нельзя использовать типизированные константы в качестве границ диапазона}
a,b,c: Byte =0;
{Нельзя использовать список идентификаторов}