2.2 Лінійний обчислювальний процес

Проектування застосування, яке виконує рішення лінійної обчислювальної задачі, розглянемо на прикладі завдання переліку суми в гривнях в суму в доларах і євро.

Проектування форми

Робота над новим проектом в Delphi починається із створення стартової форми. Створення форми фактично складається з двох етапів:

- створення і завдання властивостей форми;

- розміщення на формі компонентів і завдання їх властивостей.

Форма створюється шляхом зміни її властивостей:

Таблиця 5

Властивість	Значення
Caption (Заголовок)	Гривни – долари - кілограми
Height (Висота)	200
width (Ширина)	350
Color (Колір)	clAqua
Font.Name	Arial
Font.Size	10

Для визначення компонентів, які необхідно розмістити на формі, варто скласти алгоритм рішення задачі.

Алгоритм рішення. Виходячи з умови завдання алгоритм її рішення наступний:

у доларах і євро необхідно одержати від користувача початкові дані - суму в гривнах Розміщення компонентів Виходячи з алгоритму рішення задачі, програма переліку суми в гривнах в суму. Дані з клавіатури вводяться в поле редагування Edit. Значення властивостей розташованого компоненту Edit1 приведено в таблиці.

Таблиця 6

Властивості	Значення
Name	Editl
Text
Top	48
Left	24
Height	24 '
Width	121
ParentFont (спадкоємство властивостей шрифту) форми)	True

Також форма застосування, що розробляється, повинна містити 3 мітки: 1 для виведення інформаційного повідомлення, 2 для виведення результатів. Значення властивостей розташованих компонентів класу Label приведенны в таблиці.

Таблиця 7

Властивості	Значення
Name	Label1	Label2	Label3
Caption	Введіть суму в гривнах і клацніть на Перелік
AutoSize	False	False	False
Top	0	96	170
Left	24	24	90

Таблиця 8

Властивість	Значення і
Height		40	49	49
Width		209	121	121
Wordwrap		True	True	True
ParentFoht		True	False	False

У завершенні у форму потрібно додати кнопку Button, при натисненні якої виконуватиметься перелік. Значення властивостей командної кнопки Button1 приведені в таблиці.

Таблиця 9

Властивість	Значення
Name	Buttonl
Text	Перелік
Top	56
Left	184
Height	25
Width	75

Готова форма має наступний вигляд

Рисунок 2 Готова форма

Написання програмного коду Застосування повинне виконувати перерахунок по натисненню кнопки. Для реалізації обчислення необхідно створити процедуру відповідної події. Для цього необхідно виконати наступні дії: -

- виділити командну кнопку Buttonl;

- вибрати закладку Events діалогового вікна Object Inspector, виконати подвійне клацання в полі імені необхідної події, тобто Onclick;

- у вікні редактора коду, яке з'явилося, у області введення певної процедури ввести програмний код, який відповідає розробленому алгоритму.

procedure TForml.ButtonlClick(Sender: TObject);

var

Grn: rreal; { торба в гривнах}

Dol: real; { торба в доларах}

Euro:real; { торба в Євро}

begin

Grn:=StrToFloat(Editl.Text);

Dol:=Grn/5.4;

Euro:=Grn/6.7;

Label2.Caption:=Editl.Text+' грн. це '+FloatToStr(Dol,ffGeneral,4,2)+ * $'; Label3.Caption:=Editl.Text+' грн. це '+ FloatToStr(Euro,ffGeneral,5,3)+'EUR0';

end: