Interface

Uses

Windows,Messages,SysUtils,Classes,Graphics,

Controls,Forms,Dialogs, StdCtrls;

Type

TForm1 = class(TForm)

Button1: TButton; // Автоматически добавлены объект и

procedureButton1Click(Sender: TObject); // событие

Private

{ Private declarations }

Public

{ Public declarations }

end;

Var

Form1: TForm1;

Implementation

{$R *.DFM}

procedureTForm1.Button1Click(Sender: TObject);

Begin

Form1.Close;//Единственное место «ручного» программирования

end;

End.

Для удовлетворения собственного любопытства Вы можете посмотреть текст формы, созданного Вами приложения, если нажмете правую кнопку мыши на форме и выберете “View as Text” . Вы увидите значения свойств Вашего главного объекта – формы, которая является родительским объектом (Parent) для кнопки, а заодно и её владельцем (Owner). Свойства всех дочерних объектов, записываются во вложенных блоках Object…end.

Рекомендуем для удобства чтения программы писать пользовательские коды с отступом по 2 пробела для каждого вложенного блока.

Далее сохранить подготовленный проект. Выбирать в строке меню Delphi команду File®Save Project As, в появившемся диалоговом окне выбирать новую папку, задать имя проекту, а в следующем окне – задать имя главному модулю проекта. Если необходимо сохранить проект с тем же именем, то следует выбрать команду File®Save All, или нажать на кнопку

7. Запустить программу на выполнение. Для этого необходимо в строке меню Delphi выполнить команду Run®Run или нажать на кнопку панели управления, или функциональную клавишу F9 (компиляция – Ctrl+F9).

Не следует «вручную» удалять обработчики событий, поскольку их заголовки вставляются в описание класса TForm1. Достаточно удалить всё, что находится между beginи endи сохранить проект. Delphi автоматически удалит все пустые обработчики событий.