Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №25




НазваниеМуниципальное общеобразовательное учреждение средняя общеобразовательная школа №25
Дата конвертации03.03.2013
Размер444 b.
ТипПрезентации


МУНИЦИПАЛЬНОЕ ОБЩЕОБРАЗОВАТЕЛЬНОЕ УЧРЕЖДЕНИЕ СРЕДНЯЯ ОБЩЕОБРАЗОВАТЕЛЬНАЯ ШКОЛА № 25




Основная идея ООП связана не с выполнением некоторой, заранее написанной последовательности инструкций, а с реагированием на те или иные события. Если не происходит ни одного события из тех, на которые предусмотрена реакция в приложении, оно ничего и не выполняет. Нажали клавишу – приложение отреагировало: его обработчик событий вывел что-либо на экран компьютера, что-то напечатал, то есть вызвал какую-либо процедуру.

  • Основная идея ООП связана не с выполнением некоторой, заранее написанной последовательности инструкций, а с реагированием на те или иные события. Если не происходит ни одного события из тех, на которые предусмотрена реакция в приложении, оно ничего и не выполняет. Нажали клавишу – приложение отреагировало: его обработчик событий вывел что-либо на экран компьютера, что-то напечатал, то есть вызвал какую-либо процедуру.

  • На генерацию события программист обычными средствами повлиять не может. В его компетенции только обработать событие, то есть написать процедуру, которая будет выполняться при его возникновении.

  • Среда Delphi хранит для каждого компонента имена всех его обработчиков событий и выводит их на экран в окне «Инспектор объектов» (Object Inspector) во вкладке «События» (Events).

  • Для того, чтобы создать обработчик события, необходимо выполнить следующие действия:

    • выберите компонент, для которого необходимо обработать событие.
    • два раза щелкните на компоненте.
    • В результате этих действий Delphi автоматически сгенерирует процедуру
    • обработки события. Имя этой процедуры состоит из имени компонента и названия события. Оно может быть изменено пользователем непосредственно в окне «Инспектор объектов».


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

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

  • Этот фрагмент должен представлять собой последовательность текстовых строк, в которых программист указывает, что именно должна делать программа в ответ на нажатие кнопки. Фрагмент оформляется в виде процедуры на языке Pascal.

  • Чтобы заставить Delphi самостоятельно сделать заготовку для процедуры обработчика события OnClick, необходимо дважды щёлкнуть по вставленному компоненту. В ответ Delphi активизирует окно кода, в котором можно увидеть следующий фрагмент:



procedure TForm1.Button1Click(Sender: TObject);

  • procedure TForm1.Button1Click(Sender: TObject);

  • begin

  • end;





procedure TForm1.Button1Click(Sender: TObject);

  • 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);

  • procedure TForm1.Button1Click(Sender: TObject);

  • begin

  • Button1.Visible:=False;

  • Button2.Visible:=True;

  • end;

  • procedure TForm1.Button2Click(Sender: TObject);

  • begin

  • Button2.Visible:=False;

  • Button3.Visible:=True;

  • end;

  • ...

  • procedure TForm1.Button7Click(Sender: TObject);

  • begin

  • Button7.Visible:=False;

  • Button8.Visible:=True;

  • end;

  • procedure TForm1.Button8Click(Sender: TObject);

  • begin

  • Button8.Visible:=False;

  • Button1.Visible:=True;

  • end; end.







Похожие:

Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №25 iconМуниципальное общеобразовательное учреждение, средняя общеобразовательная школа №12 г. Томска
Муниципальное общеобразовательное учреждение, средняя общеобразовательная школа №12 г. Томска муниципальное общеобразовательное учреждение,...
Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №25 iconМуниципальное общеобразовательное учреждение средняя общеобразовательная школа №5 Знакомство с героями поэмы Н. В. Гоголя «Мёртвые души»
Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №5
Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №25 iconМуниципальное общеобразовательное учреждение «Средняя общеобразовательная школа г. Бирюча» Объяснение названий растений и животных. Что эти названия "рассказывают" о своих хозяевах?
Муниципальное общеобразовательное учреждение «Средняя общеобразовательная школа г. Бирюча»
Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №25 iconМуниципальное общеобразовательное учреждение «Средняя общеобразовательная школа с. Прималкинского» Люди сами творят чудеса. Они так к ним привыкают, что перестают видеть в них что- либо чудесное
Муниципальное общеобразовательное учреждение «Средняя общеобразовательная школа с. Прималкинского»
Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №25 iconМуниципальное общеобразовательное учреждение средняя общеобразовательная школа №5 Проект Полетим к «Заветной мечте»
Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №5
Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №25 iconМуниципальное общеобразовательное учреждение «средняя общеобразовательная школа №24» г. Абакан Республика Хакасия
Муниципальное общеобразовательное учреждение «средняя общеобразовательная школа №24» г. Абакан Республика Хакасия Воронина Галина...
Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №25 iconМуниципальное общеобразовательное учреждение «Малакеевская средняя общеобразовательная школа Вейделевского района Белгородской области» Характеристика детской организации
...
Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №25 iconРазвитие
Муниципальное образование Сосновоборский городской округ Муниципальное общеобразовательное учреждение «Средняя общеобразовательная...
Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №25 iconМуниципальное общеобразовательное учреждение «Средняя общеобразовательная школа №5»

Муниципальное общеобразовательное учреждение средняя общеобразовательная школа №25 iconМуниципальное общеобразовательное учреждение средняя общеобразовательная школа №92

Разместите кнопку на своём сайте:
hnu.docdat.com


База данных защищена авторским правом ©hnu.docdat.com 2012
обратиться к администрации
hnu.docdat.com
Главная страница