Иллюстрированный самоучитель по Delphi 7 для начинающих

Интервальный тип

Интервальный тип является отрезком или частью другого типа, называемого базовым. В качестве базового обычно используют целый тип данных (integer).

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

Тип = НижняяГраница..ВерхняяГраница;

Где:

• Тип – имя объявляемого интервального типа данных;
• НижняяГраница – наименьшее значение, которое может принимать переменная объявляемого типа;
• верхняяГраница – наибольшее значение, которое может принимать переменная объявляемого типа.

Примеры:

TIndex = 0.. 100;
TRusChar = 'А'.. 'я';

В объявлении интервального типа можно использовать именованные константы. В следующем примере в объявлении интервального типа TIndex использована именованная константа HBOUND:

const
HBOUND=100;
type
TIndex=l..HBOUND;

Интервальный тип удобно использовать при объявлении массивов, например, так:

type
TIndex =1.. 100;
var
tab1: array[TIndex] of integer; i:TIndex;

Помимо целого типа в качестве базового можно использовать перечисляемый тип, созданный программистом. В следующем фрагменте на основе типа TMonth объявлен интервальный тип TSammer:

type
TMonth = (Jan, Feb, Mar, Apr, May, Jun,
Jul, Aug, Sep, Oct, Nov, Dec);
TSammer = Jun.. Aug;