Тема: Практическая работа

 «Компоненты и функции. Умножение двух чисел»

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

Знакомство с компонентами TEdit, TPanel и функциями FloatToStr и StrToFloat.

Ход работы:

1. Запустите Delphi, откройте новое приложение File / New и в раскрывшемся каскадном меню выбрать раздел Application.

Задайте имя форме «Умножение чисел», для этого в Object Inspector измените параметр Caption

2. Перенесите на пустую форму компоненты TButton1, TLabel1, TLabel2, TLabel3, TEdit1,  TEdit2, TPanel1 со страницы Standard палитры компонентов.

	Компонент является контейнером для группирования органов управления, но может использоваться и для отображения текста с возможностями объемного оформления. Основное свойство Caption
	Отображение, ввод и редактирование однострочных текстов. Имеется возможность оформления объемного бордюра. Основное свойство Text.

3. -Измените надписи в метках компонентов TLabel1, TLabel2, TLabel3 на «Число1», «Число2», «Результат». Для этого перейдите в Object Inspector и изменяйте их свойство Caption (надпись), в свойстве Font измените шрифт и размер символов.

-Замените свойство Caption (надпись) вашей кнопки Button1на «Расчет»

В свойстве Font измените шрифт и размер символов.

-Очистите свойство Caption (надпись) у панели TPanel1    

Попробуйте поварьировать такими свойствами панели, как BevelInner  и BevelOuter, которые определяют вид (утопленный - bvLowered или выпуклый - bvRaised). В итоге форма примет вид:

4. Выделите кнопку TButton1 на форме, перейдите в Object Inspector, откройте в нем страницу событий (Events), найдите событие кнопки OnClick (но первое сверху) и сделайте двойной щелчок в окне справа от имени этого события. Это стандартный способ задания обработчиков любых событий. Но перейти в обработчик событий OnClick кнопки можно и иначе: достаточно сделать двойной щелчок на компоненте TButton1 на форме. В обоих случаях вы окажетесь в окне Редактора Кода и увидите там текс

Заголовок этой процедуры складывается из имени класса вашей формы TForm1, имени компонента TButton1 и имени события без префикса OnClick. Напишите в обработчике оператор задания:

Оператор, который вы написали означает следующее: свойству Caption компонента TPanel1 вы присвоили (:= - операция присваивания) значение выражения, указанного в правой части оператора. Знак «+» означает конкатенацию – сцепление двух строк символов. Текст храниться в свойстве Text компонентов TLabel1 иTLabel2.

Функция FloatToStr преобразует заданный ей параметр типа действительного числа в строку символов.

Функция StrToFloat преобразует символьное изображение числа в его значение типа действительного числа.

5.     

Ваше приложение готово, можете его выполнить. Для этого выполните команду Ran или нажмите горячую клавишу F9, или воспользуйтесь быстрой кнопкой.