Книга: Delphi. Учимся на примерах

Конструкция with-do

Конструкция with-do

Для упрощения программного кода при работе с записями и классами в языке Object Pascal используется конструкция with-do. Например, фрагмент кода

MyCD.Group:= 'Название группы';
MyCD.Year:= 2005;
MyCD.Title:= 'Название альбома';
Form1.Caption:= 'Заголовок формы';
Form1.Font.Color:= clWhite;

можно записать в виде:

with MyCD do begin
 Group:= 'Название группы';
 Year:= 2005;
 Title:= 'Название альбома';
end;
with Form1 do begin
 Caption:= 'Заголовок формы';
 Font.Color: = clWhite;
end;

Еще один вариант записи этого же фрагмента:

with MyCD, Form1 do begin
 Group:= 'Название группы';
 Year:= 2005;
 Title:= 'Название альбома';
 Caption:= 'Заголовок формы';
 Font.Color:= clWhite;
end;

При такой записи подстановка имен объектов осуществляется в порядке их следования. Однако в этом случае требуется следить за тем, чтобы для объектов, указанных после слова with, не использовались поля, свойства или методы с одинаковыми названиями, поскольку это может привести к путанице.

Оглавление книги