МУНИЦИПАЛЬНОЕ ОБЩЕОБРАЗОВАТЕЛЬНОЕ УЧРЕЖДЕНИЕ СРЕДНЯЯ ОБЩЕОБРАЗОВАТЕЛЬНАЯ ШКОЛА 25 Выполнила: учитель информатики Турганова Н.В. Томск

Любой объект реальной жизни вынужден реагировать на те или иные события окружающего мира: зазвонил телефон – человек берёт трубку, пошёл дождь – мы открываем зонт. С компьютером тоже связаны различные события: включение питания, нажатие клавиши на клавиатуре, щелчок кнопкой мыши и пр. Среда Delphi предоставляет возможность своим клиентам реагировать на них: она по указанию программиста устанавливает связь специальных процедур компонента, называемых обработчиками событий, с соответствующим механизмом операционной системы. Windows первой узнает о любом событии, и если связь с обработчиком события установлена, передаёт ему управление. Пользователь нажал на кнопку мыши Windows генерирует событие щелчка Click Приложение обрабатывает это событие

Основная идея ООП связана не с выполнением некоторой, заранее написанной последовательности инструкций, а с реагированием на те или иные события. Если не происходит ни одного события из тех, на которые предусмотрена реакция в приложении, оно ничего и не выполняет. Нажали клавишу – приложение отреагировало: его обработчик событий вывел что- либо на экран компьютера, что-то напечатал, то есть вызвал какую-либо процедуру. На генерацию события программист обычными средствами повлиять не может. В его компетенции только обработать событие, то есть написать процедуру, которая будет выполняться при его возникновении. Среда Delphi хранит для каждого компонента имена всех его обработчиков событий и выводит их на экран в окне «Инспектор объектов» (Object Inspector) во вкладке «События» (Events). Для того, чтобы создать обработчик события, необходимо выполнить следующие действия: – – выберите компонент, для которого необходимо обработать событие. – – два раза щелкните на компоненте. В результате этих действий Delphi автоматически сгенерирует процедуру обработки события. Имя этой процедуры состоит из имени компонента и названия события. Оно может быть изменено пользователем непосредственно в окне «Инспектор объектов».

. Самый простой способ сообщить приложению о событии – это щёлкнуть мышью на каком-либо компоненте. При щелчке по кнопке мышью в работающей программе возникает событие OnClick (по щелчку). Пока это событие не обрабатывается программой, поэтому нажатие кнопки не приведёт ни к каким последствиям. Чтобы заставить программу реагировать на нажатие кнопки, необходимо написать на языке Object Pascal фрагмент программы, который называется обработчиком события. Этот фрагмент должен представлять собой последовательность текстовых строк, в которых программист указывает, что именно должна делать программа в ответ на нажатие кнопки. Фрагмент оформляется в виде процедуры на языке Pascal. Чтобы заставить Delphi самостоятельно сделать заготовку для процедуры обработчика события OnClick, необходимо дважды щёлкнуть по вставленному компоненту. В ответ Delphi активизирует окно кода, в котором можно увидеть следующий фрагмент:

procedure TForm1.Button1Click(Sender: TObject); beginend; Слово procedure извещает компилятор о начале процедуры. За ним следует имя метода TForm1.Button1Click. Это имя составное: оно состоит из имени класса TForm1 и собственно имени метода Button1Click. Пока имеется только заготовка обработчика – тело метода пусто. Команды, которые будут написаны внутри обработчика, выполнятся при щелчке по компоненту. Сделаем так, чтобы кнопка закрывала программу. Для этого в пустой строке между словами begin и end необходимо написать следующую команду: Form1.Close; Будет вызван метод Close (закрыть) для объекта Form1 (окно про- граммы).

procedure TForm1.Button1Click(Sender: TObject); begin Label1.Caption:='ул. Базарова, дом 35, кв 35'; end; procedure TForm1.Button2Click(Sender: TObject); begin Label2.Caption:='Проспект Программистов, корпус 3/1, кв. 275'; end; procedure TForm1.Button3Click(Sender: TObject); begin Label3.Caption:='переулок Ковалевской, дом 27, кв 181'; end; procedure TForm1.Button4Click(Sender: TObject); begin Label4.Caption:='ул. Беринга, дом 22, кв 209'; end;end.

procedure TForm1.Button1Click(Sender: TObject); beginButton1.Visible:=False;Button2.Visible:=True;end; procedure TForm1.Button2Click(Sender: TObject); beginButton2.Visible:=False;Button3.Visible:=True;end;... procedure TForm1.Button7Click(Sender: TObject); beginButton7.Visible:=False;Button8.Visible:=True;end; procedure TForm1.Button8Click(Sender: TObject); beginButton8.Visible:=False;Button1.Visible:=True; end; end.

Название события Когда возникает OnKeyPress Наступает, когда пользователь нажимает какую-либо клавишу. OnDBClickВозникает при двойном щелчке на компоненте OnMouseMove Возникает при перемещении курсора мыши над компонентом OnMouseDownВозникает при нажатии на кнопку мыши OnMouseUpВозникает при отпускании кнопки мыши OnEnterВозникает при получении компонентом фокуса ввода OnExitВозникает при потере компонентом фокуса ввода OnCreate Возникает в момент создания формы. Существует только у формы