Основы языка Delphi


Листинг В2 Процедура обработки



Листинг В2. Процедура обработки события Onclick на кнопке Button2 (Завершить)


// нажатие кнопки Завершить

procedure TForm1.Button2Click(Sender: TObject);

begin

Form1.Close; // закрыть главное окно программы

end;












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