2015-04-30
280
Uses
Windows,Messages,SysUtils,Classes,Graphics,
Controls,Forms,Dialogs, StdCtrls;
Type
TForm1 = class (TForm)
Button1: TButton; // Автоматически добавлены объект и
procedure Button1Click(Sender: TObject); // событие
Private
{ Private declarations }
Public
{ Public declarations }
end;
Var
Form1: TForm1;
Implementation
{$R *.DFM}
procedure TForm1.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 автоматически удалит все пустые обработчики событий.
