Иллюстрированный самоучитель по Kylix


Листинг 3 3 Пример работы с оператором with



Листинг 3.3 Пример работы с оператором with

type TDate = record // Объявляем новый тип - запись с тремя полями
Day: Integer; // Поле День Month: Integer; // Поле Месяц
Year: Integer; // Поле Год end;
var OrderDate: TDate; // Объявляем запись OrderDate begin with OrderDate do // Далее оперируем с записью OrderDate
if Month =12 then begin Month := 1;
Year := Year + 1;
end
else
Month := Month + 1; end;

Таким образом, при обращении к полям записи нам не нужно указывать имя самой записи.

Кроме обращения к полям записи, при помощи оператора доступа можно повысить удобство работы с объектами Kylix, которые мы рассмотрим во второй части книги.

Назад
Начало
Вперед


Начало Назад Вперед


Книжный магазин