Интегрированный урок«Закон Ома. Создание приложения в Delphi»

Интегрированный урок«Закон Ома. Создание приложения в Delphi»

Назовите основные свойства компонентов Delphi

Label
RadioGroup
Edit
Button
BitBtn
CheckListBox

Caption
Items
Text
Caption
Kind
Items

?

?

?

?

?

?

Тест «Найди пару»

Run
CheckListBox
BitBtn
Button
RadioGroup
Label
Memo
Edit

2

3 4

5 6

7 8

Проверьте ответы

1-f
2-h
3-d
4-e
5-b
6-c
7-a
8-g

Закон Ома для участка цепи

физика

Следствие

Сила тока, А

Напряжение, В

Сопротивление, Ом

Задача. Создать приложение, которое будет автоматически вычислять неизвестный параметр Закона Ома для участка цепи по известным двум другим параметрам.

Этапы создание приложения.

1 этап – создание отдельной директории для приложения;
2 этап – создание главной формы;
3 этап – сохранение всего проекта в отведенную для него папку;
4 этап - расположение компонентов на форме;
5 этап – программирование событий;
6 этап – компиляция и отладка программы.

1 этап

Создадим папку Закон Ома в своей папке.

2 этап

Запустите Delphi
Если отсутствует главная форма Application, то создайте ее, выполнив команды File-New-Application

3 этап

Сохраните проект в созданной на первом этапе папке, выполнив команду File – Save All

4 этап

Расположите на форме следующие компоненты

RadioGroup1

Label1

Label3

Label5

Label2

Label4

Edit1

Edit2

Button1

BitBtn1

Panel1

Label6

5 этап

Создать вывод подписей компонентов Label в зависимости от выбора параметра для расчета:
Например, Если в RadioGroup1 мы выбираем опцию напряжение, то значения
Label1, Label2, Label3, Label4, Label5, Label6
меняют свойство Caption соответственно на
Сила тока, Ампер, Сопротивление, Ом, Напряжение, Вольт

Следовательно событие выбора опции Напряжение опишем в окне кода

Самостоятельно запрограммировать выбор опций Сила тока и Сопротивление

Программируем кнопку Рассчитать

Если выбрана опция напряжение, то результатом будет произведение значений edit1 и edit2, т.е. используем формулу U=IR
Результат выведем на компонент Panel1

Программируем…

Если выбран индекс в RadioGroup1 =1

В свойство Caption компонента Panel1

Преобразуем текст из компонента edit1 в числовой вещественный тип

Преобразуем текст из компонента edit2 в числовой вещественный тип

Полученное число преобразуем в строку

Самостоятельно запрограммировать кнопку Рассчитать на расчет выбранных опций Сила тока и Сопротивление

6 этап

Запустите приложение.
Произведите отладку, если есть ошибки.
Заполните таблицу, применив для расчетов созданную программу.

Домашнее задание

Задача. Выполнить приложение, которое по введенным длине (а) и ширине (b) прямоугольника будет рассчитывать периметр (P) или площадь (S) в зависимости от выбранной опции.

Условия успешности выполнения приложения

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