With x Do

Оператор;

где With - служебное слово c,

x - имя переменной-записи,

Внутри этого оператора поля переменной-записи обозначаются без имени самой записи:

With stud_1 Do

Begin

nomer := ‘ИС-09’;

fam := ‘Иванов’;

name := ‘Ваня’;

ocenka := 4;

sr_ball := 4.12;

End;

Внимание! Запись может быть введена с клавиатуры и выведена на экран только по полям, а не целиком, то есть в операторах ввода и вывода ReadLn и WriteLn нельзя указывать имя записи без имени поля:

ReadLn(stud_1); это неправильно!

WriteLn(stud_1); это неправильно!

ReadLn(stud_1.ocenka); это правильно!

WriteLn(stud_1.ocenka); это правильно!

Записи могут являться элементами массивов, то есть разрешены массивызаписей, например, описанный выше массив gruppa. Каждый элемент этого массива – отдельная запись со всеми полями, определенными при ее описании. При обращении к элементу такого массива указывается имя массива, индекс элемента и через точку – имя поля:

gruppa[5].nomer := ‘ИС-09’;

gruppa[5].fam := ‘Иванов’;

gruppa[5].name := ‘Ваня’;

gruppa[5].ocenka := 4;

gruppa[5].sr_ball := 4.12;

В этом случае тоже можно использовать оператор присоединения:

With gruppa[5] Do

Begin

nomer := ‘ИС-09’;

fam := ‘Иванов’;

name := ‘Ваня’;

ocenka := 4;

sr_ball := 4.12;

End;

При работе с файлами записей (базами данных) необходимо учитывать то, что для ввода и вывода элементов такого файла – отдельных записей – необходимо использовать рабочую переменную-запись, имеющую такие же поля, что и элементы файла. Для ввода очередного элемента в данный файл сначала необходимо заполнить все поля рабочей переменной, например, операторами ввода: