|
|||||||||||||||||||||||||||||
Проект «Калькулятор». Хід виконання ⇐ ПредыдущаяСтр 4 из 4 Проект «Калькулятор» Завдання. Створити програму для обчислення суми двох чисел. Вікно програми має виглядати так, як показано на малюнку.
Хід виконання 1. Створіть додаток. Збережіть проект у папці Калькулятор. 2. Створіть Інтерфейс за зразком. 3. Налаштуйте властивості об'єктів відповідно до таблиці.
4. Написати процедуру обробки клацання на кнопці Обчислити. Для цього виконайте подвійне клацання на кнопці Обчислити. Це призведе до створення процедури TForm1. Button1Click в розділі implementation: procedure TForm1. Button1Click(Sender: TObject); begin end; Зрозуміло, що створена процедура не містить жодної команди. Ваше завдання - заповнити шаблон операторами. Всі команди, зазначені в процедурі між begin і end, будуть виконані при натисканні на кнопці Обчислити. У нашому випадку процедура TForm1. Button1Click матиме вигляд: procedure TForm1. Button1Click(Sender: TObject); var num1, num2, result: integer; begin num1: =StrToInt(editNum1. text); num2: =StrToInt(editNum2. text); result: =num1+num2; edit3. text: =IntToStr(result); end; Зверніть увагу, що були написані всього 5 команд, призначених для вирішення поставленого завдання. Решта тексту у вікні редактора створюється автоматично Зберегти проект. Перевірте роботу програми. Введіть в перші два поля цілі числа, натисніть кнопку Обчислити. В поле результат повинна відобразитися сума цих чисел. На цьому уроці ми повторили основні елементи мови програмування: змінні, числові типи, основні арифметичні операції і функції, створили найпростіший калькулятор. Наступний урок: «Введення і виведення даних».
|
|||||||||||||||||||||||||||||
|