Листинг 7.1. Область видимости объекта Form1

procedure TForml.ButtonlClick (Sender: TObject);
begin
Color := clGray; // Задаем цвет формы Caption := 'Форма с одной кнопкой'; // Изменяем заголовок формы Button1.Caption := 'OK'; // Изменяем заголовок кнопки end;

Итак, на приведенном выше листинге изменим значения свойств формы Form1 без указания имени формы, т. к. данная часть программного кода является областью видимости для формы Form1. Метод Button1Click является частью объекта Form1.

Две строки

Color := clGray; // Задаем цвет формы
Caption := 'Форма с одной кнопкой'; // Изменяем заголовок формы

будут равносильны строкам

Form1.Color := clGray; // Задаем цвет формы
Form1.Caption := 'Форма с одной кнопкой'; // Изменяем заголовок формы

Последняя строка листинга 7.1 изменяет значение свойства другого компонента (Button1), поэтому нуждается в указании его имени.

Содержание

Вперед