Записи в Паскале

Что такое запись в Паскале?

Записи в Pascal

Запись в Паскале является структурным типом данных.

Подобно массивам запись содержит множество элементов.

Но есть различия: в массивах все элементы имеют один тип, а в записи они могут иметь различные типы, другим различием является то, что к элементу массива обращаются по его индексу, а к элементу записи обращаются по его имени.

Элементы записи обычно называют полями.

Запись в Паскале пример

Простой пример записи в Паскале:

{ TMyRec } { @author Subbotin B.P. @see http://sbp-program.ru } type TMyRec = record intVal: integer; strVal: string; end; procedure TMyArray.TestProc; var myRec: TMyRec; begin { Присваиваем значения полям записи } myRec.intVal := 123; myRec.strVal := ‘sbp-program.ru’; { Выводим значения полей записи } Writeln(‘myRec’); Writeln(‘myRec.intVal = ‘ + IntToStr(myRec.intVal)); Writeln(‘myRec.strVal = ‘ + myRec.strVal); ReadLn(); end;

В примере объявлен пользовательский тип данных TMyRec — это запись. Вот наше объявление:

В записи объявлены два поля: intVal типа integer и strVal типа string.

Далее создаем экземпляр типа TMyRec:

Теперь можно присвоить значения полям нашей записи. Для обращения к полю указываем сначала объект типа записи, у нас это myRec, а после через точку имя поля, вот так:

здесь полю intVal присвоено значение 123.

Получаем:

Итак, в нашей записи два поля: integer и string. А для чего нужна запись? Почему нельзя было создать просто два этих поля без записи? Можно было обойтись и без записи. Тогда для чего запись? Запись является структурой, она объединяет поля. Поля существуют в единой структуре, в этом смысл использования записи. Наш пример был формальным, он был нужен, чтоб посмотреть, как работать с записями. А теперь пример, чтоб понять смысл использования записи:

{ TPerson } { @author Subbotin B.P. @see http://sbp-program.ru } type TPerson = record intAge: integer; strFamily: string; strName: string; end; procedure TMyArray.TestProc; var Basil, Juan: TPerson; begin { Присваиваем значения полям записи Basil } Basil.intAge := 35; Basil.strFamily := ‘Ivanov’; Basil.strName := ‘Basil’; { Присваиваем значения полям записи Juan } Juan.intAge := 25; Juan.strFamily := ‘Petrov’; Juan.strName := ‘Juan’; { Выводим значения полей записи Basil } Writeln(‘Basil’); Writeln(‘Basil.intAge = ‘ + IntToStr(Basil.intAge)); Writeln(‘Basil.strFamily = ‘ + Basil.strFamily); Writeln(‘Basil.strName = ‘ + Basil.strName); Writeln(); { Выводим значения полей записи Juan } Writeln(‘Juan’); Writeln(‘Juan.intAge = ‘ + IntToStr(Juan.intAge)); Writeln(‘Juan.strFamily = ‘ + Juan.strFamily); Writeln(‘Juan.strName = ‘ + Juan.strName); ReadLn(); end;

В этом примере мы создаем запись TPerson, поля которой описывают одного человека. Далее создаем два объекта типа TPerson: Базиль и Хуан. Теперь можно присвоить значения полям объектов, т.е. указать возраст, имя, фамилию. Запись позволяет логически объединить эти поля. В этом вся суть — запись позволяет описать целый объект, значения полей относятся к данному объекту. Названия полей одинаковы, но объекты разные. Цель записи описать объект, а у объекта имеются различные характеристики: возраст, имя, фамилия. Эти характеристики, т.е. поля записи, объединяем в одной структуре — нашей записи.

Получаем:

На картинке первый блок информации относится к Базилю, а второй к Хуану. Запись позволяет комплексно описывать объект в совокупности его характеристик.