o постановка цели урока и мотивация учебной деятельности;
o воспроизведение и коррекция опорных знаний;
o практическая работа;
o самостоятельная работа
o подведение итогов урока;
o домашнее задание.
Особенности проведения: тема рассчитана на 2 академических часа. Данный урок является 12, изучает понятие свойства и события объектов.
Ход урока:
I этап. Организационный.
o приветствие;
o проверка отсутствующих;
o проверка готовности к занятию;
o Актуализация деятельности учащихся.
Объявление плана урока: закрепление теоретических понятий, практическая работа, подведение итогов, задание на дом;
Постановка проблемы: изучение свойств и событий объектов.
II этап. Подготовка учащихся к активному усвоению знаний. Фронтальный опрос
III. ВЫПОЛНЕНИЕ ПРАКТИЧЕСКОГО ЗАНЯТИЯ
Тема: Метод обработки исключительных ситуаций.
Цель работы: Изучение методов обработки исключений в визуальном программировании приложения Delphi.
Оборудование: ПК, методическое указание, приложение Delphi
В программе использовать:
o обработку исключительных ситуаций с помощью оператора Try – except – end;
o процедуры ShowMessage для вывода сообщения в отдельном окне.
ПОСТАНОВКА ЗАДАЧИ «ВАШ ВЕС»
Пусть оптимальный вес человека определяется как рост минус 100. Если фактический вес человека меньше оптимального, то будем считать его худым, если больше, то полным.
Создать программу, с помощью которой можно выполнить:
Введя свой рост и фактический вес, и нажав кнопку Расчет, школьник может определить, худой он или полный, и на сколько надо поправиться или похудеть.
По окончании - выйти из программы с помощью кнопки Выход.
ПОРЯДОК ВЫПОЛНЕНИЯ:
1.1. Открыть новый проект в приложении DELPHI.
1.2. При работе в среде Delphi программы с исключениями плохо прослеживаются, так как при каждом исключении среда перехватывает управление программой. Для отмены этого необходимо в команде Tools/Debugger Options/Language Exceptions убрать флаг у опции Stop on Delphi Exceptions.
1.3. Разместить в форме экземпляры компонентов в соответствии с рисунком. В Edit1 будем вводить вес в кг, а в Edit2 – рост в см.
Компонентам Label1, Label2 и Button1 свойству Caption ввести название, согласно рисунку. Компоненты “OK” “Ignore” вытащить из страницы Additional
1.4. Ввести в раздел VAR переменные для сохранения значений:
o фактического веса (faktW),
o оптимального веса (optW),
o роста (Rost)
o разницы между оптимальным весом и фактическим (Delta).
Будем считать, что все данные у нас вещественные числа:
VAR factW, optW, Rost, Delta. real;
2. СОЗДАНИЕ ПРОЦЕДУРЫ «РАСЧЕТ»
2.1. Создайте процедуру, реагирующую на щелчок по кнопке BitButton1, и заполните ее следующим кодом:
Выделенный объект Вкладка окна
Object Inspector Имя свойства/
Имя события Значение/Действие
Button1 Events OnClick factW := StrToFloat(Edit1.text);
Rost := StrToFloat(Edit2.Text);
OptW :=Rost - 100;
Delta := abs(factW - OptW);
if OptW = factW then
Label3.caption := 'Ваш вес идеален!'
else
if OptW > factW then
Label3.caption := 'Вам надо поправиться на '+FloatToStr(Delta)+' кг.'
else
Label3.caption := 'Вам надо похудеть на '+FloatToStr(Delta)+' кг.'
Пояснение Функция StrToFloat преобразует строку в вещественное число, функция FloatToStr выполняет обратное действие – вещественное число преобразует в строку.
2.2. Внести соответствующие изменения в обработку события OnClick компонента Button1.
2.3. Сохранить код программы и проект под стандартными именами в папке ВЕС на рабочем столе – File-Save All.
Проверьте содержимое папки ВЕС, где должны быть следующие файлы. Proect1.CDF, Proect1.dof. Proect1.dpr, Proect1.res, Unit1.dcu, Unit1.pas.
Если не все файлы сохранились, сохраните повторно проект в папку Вес командой File – Save Project As.
Запустить и протестировать свою программу. Проверить входные данные и расчет оптимального веса.
3. ПОСТРОЕНИЕ ОБРАБОТЧИКА ИСКЛЮЧЕНИЙ
3.1. В случае преобразования строкового типа в числовой тип может возникнуть ситуация появления ошибки, если введены недопустимые символы. Если функции StrToFloat обнаружит ошибку в записи числа, они инициируют так называемую исключительную ситуацию (исключений), которая обычно приводит к аварийному завершению работы программы.
Обработчик исключений строится в виде таких конструкций:
Try
except
FactW:=StrToFloat(Edit1.Text);
except
ShowMessage('Ошибочная запись числа: ' + Edit1.Text);
Edit1.SetFocus;
Exit;
end;
Самостоятельно ввести такую же доработку на переменную Rost В результате выполнения
FactW:=StrToFloat(Edit1.Text);
если возникнет исключительная ситуация, то на экране появится окно с текстовым сообщением и кнопкой ОК. После появления окна работа программы приостановится в ожидании реакции пользователя. При вызове стандартной процедуры Exit снова активизируется редактор, в котором обнаружен ошибочный текст.
3.2. Проверить – как влияет доработка программы на вывод сообщений.
4. Перерасчет программы с учетом Индекса массы тела
4.1. Изменить алгоритм расчета с учетом Индекса массы тела.
Вес – X,
Рост – Y.
Индекс массы тела – A, где A = X / Y2 (кг/м2)
Результат определяется по таблице:
Значение индекса Результат (сообщение, которое надо вывести) 1 A
Создать программу, выполняющую следующие действия.
После запуска программы пользователь НАЖИМАЕТ на одну из радиокнопок – на светофоре загорается панель цвета.
1. Назначение обработки исключительных ситуаций.
2. Как создать событие в приложении DELPHI?
3. Как изменить свойства объектов?
4. Какой компонент нужно использовать для создания кнопки с графикой?
5. Как ввести данные в Delphi?
6. Как вывести сообщения в Delphi?
IV. Подведение итогов
Выводы по выполненной работе:
1. процесс создания визуальной программы разбивается на 2 фазы (конструирование и кодирование);
2. конструирование форм осуществляется с помощью выбора компонентов из палитры и размещения их на форме;
3. чтобы придать компоненту нужные свойства – используется вкладка свойств инспектора объектов;
4. чтобы компонент мог откликаться на то или иное событие, программист должен создать обработку события в виде процедуры;
5. в процессе создания визуальной программы на языке Delphi, выполнено тестирование входных данных методом обработки исключительных ситуаций.
V. Домашнее задание Повторить свойства и события объектов страницы Standard. назад