На этом шаге мы рассмотрим описание простых констант.
Описание простой константы имеет следующий вид:
const
<ИдентификаторКонстанты> = <КонстантноеВыражение>;
В простейшем случае константное выражение представляет собой число, строку, символ или булевское значение. Например,
const Length = 100; MinNeg = -1; MaxNeg = -32678; Numb = 7.87e-3; //Числовые константы. Booll = True; Bool2 = False; //Булевские константы. Char7 = '7'; CharCR = #13; //Символьные константы. Strl = 'Object'; Str2 = 'Pascal'; //Строковые константы.
В более сложных случаях Object Pascal допускает использование константных выражений, которые могут быть вычислены во время компиляции программы. Если предполагать, что нижеприведенные константы будут располагаться после вышеприведенных, то следующие объявления будут допустимыми. Например,
const ChrLength = Chr(Length); Mean = (MaxNeg - MinNeg) div 2; BoolAnd = Bool1 and Bool2; CodeOfChar7 = Ord(Char7); Name = Strl + Str2 + CharCR;
Константные выражения описываются точно по таким же правилам, что и обычные выражения. Однако перечень допустимых в константных выражениях стандартных функций ограничен следующими функциями:
Abs, Addr, Chr, Hi, Length, Lo, Low, Odd,
Ord, Pred, Round, SizeOf, Succ, Swap, Trunc
На следующем шаге мы рассмотрим типизированные константы.
