Ключевое слово const

Любой модуль может содержать один и более разделов объявления констант. Такой раздел начинается с ключевого слова const.

Если в программе много раз используется одно и то же численное значение или определенная строка текста появляется в нескольких местах, стоит объявить повторяющееся значение как константу.

Новый термин. Константа – это имя фиксированного значения, на которое вы часто ссылаетесь в своих программах. Объявление константы позволяет обращаться в программе к соответствующему значению по имени вместо написания величины.

Допустим, что имеется несколько значений, которые будут встречаться в программе много раз. Возможно, эти значения понадобятся другой программе. Тогда их можно (и нужно!) объявить как константы. В качестве примера добавим раздел констант к тексту модуля на листинге 1.3. Один раздел констант поместим в интерфейсную секцию модуля, а другой – в секцию реализации. Константы, объявления которых находятся в интерфейсной секции модуля, будут доступны в других модулях. Константы, объявленные в секции реализации, доступны только в данном модуле. На листинге 1.4 показан модуль с двумя разделами объявления констант.

Константы AppCaption, EarthMeanRadius, EarthGravitation, объявленные в интерфейсной секции модуля Unit2, могут быть в будущем использованы в любом из модулей, который в своем uses – списке содержит имя Unit2.

Константы, обозначенные идентификаторами BaseX и BaseY, будут доступны только в данном модуле, поскольку их объявления размещены в секции implementation.

Ключевое слово const используется и других контекстах исходного кода. Об этом – в разделе «Переменные, константы и параметры–переменные».

Листинг 1.4. Разделы объявления констант в модуле

unit Unit2; interface const AppCaption = 'My Cool Program 1.0'; EarthMeanRadius = 6371.21; {km} EarthGravitation = 0.398603e6; {km^3/s^2} procedure DoSomething; implementation const BaseX = 20; BaseY = 200; procedure DoSomething; begin { Здесь должен быть код процедуры DoSomething. } end; end.

Ключевое слово type

Новый термин: Ключевое слово type используется для объявления нового типа данных.

Объявление нового типа данных – изощренная технология программирования, суть которой на данном этапе объяснить трудно. Все же, давайте рассмотрим пример. Допустим, что для хранения данных в некоторой программе необходима коллекция величин (массив), каждый элемент которой имеет размер в один байт, а общее количество элементов равно 20. Если ссылки на подобный массив в программе будут встречаться часто, можно (и нужно!) объявить новый тип данных. В данном случае объявление нового типа данных имеет вид

type

TMyArray = array [0..19] of Byte;

Теперь любой контекст вида «array [0..19] of byte» можно будет заменить словом TMyArray. Далее мы увидим много примеров использования объявлений типов данных.

Ключевое слово var

Новый термин: Ключевое слово var обозначает секцию модуля, в которой объявляются переменные.

Ключевое слово var используется для объявления переменных (понятие «переменная» подробно рассматривается в разделе «Переменные»). Секции объявления переменных могут присутствовать в модулях, в процедурах и в функциях. В модуле может быть несколько секций объявления переменных.

На листинге 1.5 показан текст модуля с секциями объявлений типов и переменных.

Листинг 1.5. Модуль с объявлениями типов и переменных

unit Unit2; interface type TMyArray = array [0..19] of Byte; TMyOrbit = record A,e,u,w,i,O : real; end; const AppCaption = 'My Cool Program 1.0'; EarthMeanRadius = 6371.21; {km} EarthGravitation = 0.398603e6; {km^3/s^2} var X : Integer; MyArray : TMyArray; MyOrbit : TOrbit; procedure DoSomething; implementation const BaseX = 20; BaseY = 200; procedure DoSomething; begin { Code for DoSomething goes here. } end; end.

ПРИМЕЧАНИЕ: Начало секции объявления типов, констант или переменных идентифицируется одним из ключевых слов var, const, или type. Окончание секции – перед следующим ключевым словом