Презентация на тему Объектно – ориентированное программирование на DELPHI - 11

Краснополянская школа № 1 Домнин Константин Михайлович 2006 год

калькулятор, подобный встроенному в ОС Windows
DELPHI - 11
Вопросы:

Весь урок мы будем создавать калькулятор и обрабатывать некоторые исключения

Создание калькулятора

мы попробуем создать программу – калькулятор, похожий на калькулятор

Windows.

Windows - калькулятор

А такой мы создадим

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

Попробовать ->

Разместим на форме нужные нам компоненты:

Кнопки цифр и действий (Вместо обычных кнопок Button возьмем кнопки BitButton – т.к на них можно менять цвет шрифта, а на обычных кнопках Windows не дает это сделать)
На кнопках сделаем соответствующие надписи, которые раскрасим через свойство Font кнопки

Разместим на форме нужные нам компоненты:

Edit для ввода и отображения цифр

MainMenu , в котором с помощью дизайнера создадим опции:
О программе
Вызов справки

Манифест ХР для украшения программы в стиле Windows XP

кода
ШАГ 2
Сначала объявим переменные:
i – в ней будет

храниться первое введенное число (арифметические операции являются двухместными, например при сложении есть два числа (переменные), а результат – третье число (переменная)
p – в ней будет храниться второе число для осуществления операции
r – здесь будет результат нашего действия
mode – переменная, в которой будем хранить код действия (например сложению поставим в соответствие код 1, делению – 2 и т.д. Это нужно для осуществления множественного выбора при выполнении действий)

кода
ШАГ 2
1. Кнопки цифр
Процедура нажатия

на кнопку с цифрой 1

При нажатии на кнопку к тексту Edit-а прибавляется (приписывается) символ 1

При нажатии на кнопку с цифрой 2 к тексту Edit-а прибавляется символ 2

Аналогично описываем и все последующие кнопки с цифрами, а для десятичной запятой в коде будет ...+ ’ , ’

кода
ШАГ 2
2. Кнопки действий
Кнопка изменения

знака числа

Если содержимое Edit-a не пустое, то меняем знак числа на противоположный, и выводим результат в том же Edit-e
Заметьте, что здесь мы еще и обработали один «глюк», который может появляться, если попробовать изменить знак числа, а числа в Edit-e еще нет

кода
ШАГ 2
2. Кнопки действий
Кнопка сложения

Переменной i присваиваем значение, введенное в Edit

Переменной mode присваиваем 1 – код, соответствующий операции сложения

Очищаем содержимое Edit-a

кода
ШАГ 2
2. Кнопки действий
Кнопка вычитания

Кнопка умножения

Кнопка деления

Коды кнопок аналогичны кнопке сложения

кода
ШАГ 2
2. Кнопки действий
Кнопка извлечения

корня

И опять обрабатываем исключение (если попытаться извлечь корень из отрицательного числа, то будет ошибка)
Если содержимое Edit-a меньше нуля, то в Edit-e выводим «Недопустимый аргумент функции», иначе вычисляем корень

Кнопка 1/x

Аналогично проверяем, нет ли в Edit-e нуля: если есть, то напоминаем, что на ноль делить нельзя, иначе вычисляем

кода
ШАГ 2
2. Кнопки действий
Кнопка извлечения

синуса

Присваиваем i значение Edit-a
Переводим i из градусов в радианы (вычисление тригонометрических функций в Паскале происходит в радианах, поэтому перед тем, как считать, надо перевести)
Отображаем в Edit-e значение синуса введенного угла (дополнительно можете обработать ситуацию, когда при вычислении синуса ничего в Edit не введено)

Кнопка извлечения косинуса (думаю здесь все понятно)

кода
ШАГ 2
2. Кнопки действий
Кнопка =

(при ее нажатии определяется код действия, затем с помощью case – выбора оно выполняется)

сложение

вычитание

Деление (и опять заметьте обработку ситуации, когда делитель оказывается равен нулю)

умножение

(Form2) для вывода информации о программе. Создание компилированного файла

справки не входит в этот урок, поэтому создадим Form3, на которой выведем об этом информацию

ШАГ 3

Форма 2 (О программе)

Форма 3 (Вызов справки)

Поработайте над дизайном форм и не забудьте их «познакомить» , а для их открытия используйте метод ShowModal

результат
Смотрим ->
Итак, мы создали свой простой,

но работоспособный калькулятор. Конечно же, у него еще есть много необработанных исключений (глюков) – попробуйте их выявить и исправить.
А пока наш проект закончен, присвоим ему версию 1.000. Понятно, что функциональность программы можно значительно расширить до уровня инженерного калькулятора и это Вам уже под силу – пробуйте !

На этом наш урок закончен

создали Windows - приложение - свой калькулятор и научились

обрабатывать исключительные ситуации

ИТОГИ УРОКА:

ООП на Delphi – 12:
Мы рассмотрим создание тестирующей системы

НА СЛЕДУЮЩЕМ УРОКЕ: