Создание  приложения.

      Запускаем приложение Delphi 7, в меню выбираем File/New/Application. Послу выбора на экране появляется пустая форма, в окне Object Inspector подпишем ее заголовок  «Калькулятор» (Рисунок 3)  

Рисунок 4 – Подпись заголовка формы

      Далее ставим значение False в пункт AutoSize, после чего приводим форму к желаемым размерам.

      После завершения редактирования формы приступаем к установке редактируемых полей Edit на форму. После установки они будут иметь стандартные имя и подпись (Edit1, Edit2 и т.д.) (Рисунок 4) 
 

 

Рисунок 5 – Установка редактируемого поля Edit 

      После установки поля требуется для удобства отредактировать Имя(Name) и текст (Text). Задаем имя е1 и текст «введите первое число» (рисунок 5) 

 

Рисунок 6 – изменение имени и текста поля Edit1 

      Разместив второе поле Edit на форму, производим аналогичные действия (Рисунок 6). 

 

Рисунок 7 – изменение имени и текста поля Edit2. 

      С редактируемыми полями работа закончена. Переходим к созданию поля в котором  будет выводиться ответ. Так как  стоит избежать нежелательного редактирования ответа, стоит использоваться элемент  Label.

Устанавливаем поле Label1 под полями e1 и e2 как показано на рисунке 7. 

 

Рисунок 8 – Размещение поля Label1 на форме

      Далее следует изменить имя на l1, а поле в caption записать слово «ответ». Кроме того можно сделать выравнивание текста по центру. (рисунок 8) 

 

Рисунок 9 – Редактирование поля Label1 

      Далее приступаем к установке элементов  предназначенных для выбора действия. Лучше всего для этого подходят элементы RadioBox. Разместим на форме 4 элемента RadioBox и каждому из них дадим имена r1, r2, r3 ,r4 и значения caption «сложение (+)», «вычитание (-)», «умножение (*)»,

«деление (/)»  соответственно. Примерный результат  изображен на рисунке 9. 

 

Рисунок 10 – Размещение на форме элементов  RadioBox.

      Итак, на форму осталось установить последний  и главный компонент – Button.

      Устанавливаем на форму кнопку, даем ей имя b1, а в caption вводим «выполнить действие» (рисунок 10), именно это будет происходить при нажатии кнопки.  

 

Рисунок 11 – Параметры для элемента Button 

    В конечном итоге форма должна выглядеть примерно как на рисунке 11. 

 

Рисунок 12 – Результат оформления формы.

      Описание  и исходный текст  приложения.

      Вид диалогового окна программы «Калькулятор»  приведен на рисунке 13. 

 

Рисунок 13 – Диалоговое окно программы «Калькулятор» 

      Функция StrToFloat преобразует записываемые в поля e1 и e2 значения и числа с плавающими запятыми, это требуется для возможности производить действия с дробными числами и получения их в ответе (рисунок 14).  

 

Рисунок 14  – ввод значений в поля e1 и e2 
 
 

      Функция Checked – выбор компонента RadioBox, указывающего программе на выбор того или иного действия, реализуется с помощью использования условных операторов if then (рисунок 15) 

 

Рисунок 15 – Реализация функции Checked с использованием

 условных  операторов If Then 
 
 
 
 
 
 
 
 
 
 
 
 
 

Текст процедуры TForm1.Button1Click 

procedure TForm1.b1Click(Sender: TObject);

var

a, b, rez : real;

begin

a := StrToFloat(e1.Text); {значение  переменной а вводится с

                         клавиатуры в поле Edit с именем e1} 

b := StrToFloat (e2.Text);  {значение переменной b вводится  с

                         клавиатуры в поле Edit с именем e2} 
 

if r1.Checked = True then

rez := a + b;               {если выбран RadioBox под именем r1, то

                          переменная rez принимает значение суммы a и b}

if r2.Checked = True then

rez := a - b;               {если выбран RadioBox под именем r2, то

                          переменная rez принимает значение разности a и b}

if r3.Checked = True then

rez := a * b;               {если выбран RadioBox под именем r3, то

                          переменная rez принимает значение произведени a и b}

if r4.Checked = True then

rez := a / b;               {если выбран RadioBox под именем r4, то

                          переменная rez принимает значение частного a и b} 

l1.Caption := FloatToStr(rez); {вывести в поле Lable с именем l1

                                значение переменной rez} 

end;

Описание  интерфейса.

      Приложение  «Калькулятор» написано для ОС Windows, его интерфейс соответствует требованиям, предъявляемым к графическому интерфейсу пользователя.

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

      На  форме расположены четыре круга обозначающие выбор того или иного арифметического действия при их нажатии, а так же кнопка, дающая указания программе, на выполнение выбранного арифметического действия (рисунок 16). 

 

Рисунок 16 – Интерфейс программы 
 
 
 
 
 
 

      Инструкция  для пользователей 

1. Запустите файл Калькулятор.exe
2. В поля с надписями «введите первое число» и «введите второе число»  введите с клавиатуры требуемые числа для произведения действия.
3. Выберете требуемое действие установив маркер кликом левой клавиши мышки по белому кругу возле надписи с требуемым действием.
4. Кликните левой клавишей мышки на кнопку «выполнить действие».
5. Результат вычислений появится в поле «ответ».

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

      Пример  работы Windows приложения «Калькулятор» 

      Пример 1. Операции над целыми числами.

      Проверим  работоспособность программы на простых примерах с целыми числами.

      Введем  в первое поле число 25, во второе 5 и  поочередно произведем сложение, вычитание, умножение и деление (Рисунок 17, Рисунок 18, Рисунок 19 и Рисунок 20 соответственно) 

 

Рисунок 17 – Операция сложение 

 

Рисунок 18 – Операция вычитание 

 

Рисунок 19 – Операция умножение 

 

Рисунок 12 – Операция деление 

      Пример 2. Операции с дробными (вещественными) числами.

      Введем  дробные числа и произведем над  ними несколько операция

      (Рисунок  13 и 14).  

 

Рисунок 13 – Сложение и вычитание дробных  чисел 

 

Рисунок 14 – Умножение и деление с  дробными числами

     Выводы  и рекомендации

 
     

1. Разработанное Windows-приложение соответствует требованиям задания на курсовое проектирование.
2. Размер исполнимого файла составляет 379 килобайт.
3. Для более простого поиска программы на рабочем столе, можно нарисовать простой ярлык вызывающий ассоциацию с калькулятором, например как на рисунке 15.

 

Рисунок 15 – Пример ярлыка 

     

4. Калькулятор можно оснастить клавишами для  ввода цифр при помощи кликов мыши, а так же заменить элементы RadioBox на кнопки, однако это приведет к усложнению программы и значительному увеличению программного кода, что соответственно приведет к увеличению затрачиваемого времени на создание программы.

Библиографический список

 

1. http://ru.wikipedia.org/wiki/Delphi_(%D1%8F%D0%B7%D1%8B%D0%BA_%D0%BF%D1%80%D0%BE%D0%B3%D1%80%D0%B0%D0%BC%D0%BC%D0%B8%D1%80%D0%BE%D0%B2%D0%B0%D0%BD%D0%B8%D1%8F)
2. http://ru.wikipedia.org/wiki/%D0%9A%D0%B0%D0%BB%D1%8C%D0%BA%D1%83%D0%BB%D1%8F%D1%82%D0%BE%D1%80
3. Delphi. Быстрый старт, Гофман В. Э., Хомоненко А. Д. Издательство: BHV Год: 2003

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Приложение  А