Инструкция with
Инструкция with позволяет использовать в тексте программы имена полей без указания имени переменной-записи. В общем виде инструкция with выглядит следующим образом:
with Имя do begin (инструкции программы } end;
Где:
- Имя – имя переменной-записи;
- with – зарезервированное слово языка Delphi, означающее, что далее, до слова end, при обращении к полям записи имя, имя записи можно не указывать.
Например, если в программе объявлена запись:
student:record // информация о студенте f_name: string [30]; // фамилия l_name: string [20]; // имя address: string [50]; // адрес end;
И данные о студенте находятся в полях Edit1, Edit2 и Edit3 диалогового окна, то вместо инструкций:
student.f_name: = Edit1.text; student.l_name: = Edit2.text; student.address: = Edit3.text;
Можно записать:
with student do begin f_name: = Edit1.text; f_name: = Edit2.text; address: = Edit3.text; end;