Функции Delphi для порядковых типов данных

В Delphi имеются следующие стандартные функции для порядковых типов данных.

  • Low(I) - минимальное значение типа I;
  • High(I) - максимальное значение типа I;
  • Pred(I) - предшествующее значение выражения I;
  • Succ(I) - следующее значение после выражения I;
  • Ord(I) - порядковый номер выражения I.

Давайте расположим на форме кнопку и два компонента Label, первый будет показывать минимальное значение, а второй максимальное значение целочисленного диапазона. Обработчик кнопки будет иметь следующий вид:

procedure TForm1.Button1Click(Sender: TObject);
var
  I : integer;
begin
  Label1.Caption := IntToStr(High(I));
  Label2.Caption := IntToStr(Low(I));
end;

Запустив приложение и нажав кнопку мы узнаем самое меньшее и самое число принадлежащее целому типу.

 Для оставшихся функций создадим другое приложение. На форме расположим кнопку и 4 компонента Label. Где первый компонент будет показывать порядковый номер, второй - значение, третий и четвертый предшествующие и последующие значения.

procedure TForm1.Button1Click(Sender: TObject);
Type Klass = 'A'..'F';
var Paragrf : Klass;
begin
   Paragrf := 'B';
   Label1.Caption :=  IntToStr(Ord(Paragrf));
   Label2.Caption :=  Paragrf ;
   Label3.Caption :=  Pred(Paragrf) ;
   Label4.Caption :=  Succ(Paragrf) ;
end;

Для порядковых типов данных имеются еще 2 процедуры Inc и Dec.

Итог: в данной статье мы ознакомились с функциями Delphi для порядковых типов данных.

Добавить комментарий

Ваш e-mail не будет опубликован. Обязательные поля помечены *