Компоненти вибору

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

Kомпонент перемикач (RadioButton) 

Перемикачі  використову ють  у  ситуаціях,  коли  потрібно  вибрати  один  із  декількох  наявних  варіантів.  Перемикачі  завжди  розміщуються  на  формі  групами,  в  яких  потрібно  вибрати  тільки  один  перемикач.  При  виборі  іншого  перемикача  попередній  вимикається. Компонент  RadioButton   (вкладка  Standard  на  Палітрі компонентів)  складається з круглого віконця  і те кстового рядка. У віконці з’являється  позначка  вибору  даного  варіанта,  а  текстовий  рядок  пояснює  його  призначення.  За  зміст  текстового  рядка  відповідає  властивість  Caption.  Основ на  властивість  елемента  RadioButton — Checked  (вибрано)  логічного  типу  (Boolean) може набувати значень True  або False. У вибраного елемента  властивість  Checked  дорівнює  True.

Основною  подією  компонента  RadioButton  є OnСlick. Можна  створити  спільний обробник події OnСlick для всіх перемикачів на формі  (в групі): 1)  вибрати  групу  переми качів; 2) у  вікні  Інспектор об’єктів  на  вкладці  Події  двічі  клацнути  в  рядку OnСlick.  Після  цього  процедура  TForm1.RadioButton1Click  буде  виконуватися  для  всіх  перемикачів,  які  були  вибрані  в  момент  її  створення.  procedure TForm1.RadioButton1Click(Sender: TObject);

var V: Integer;
begin 

with (Sender as TRadioButton) do 

V := StrToInt(copy(Name,12,1)); // Для RadioButton1 V = 1,

                                                     // для RadioButton2 V = 2 і т. д. 

Case V of

 1: Form1.Color := clRed; 

2: Form1.Color := clYellow; 

3: Form1.Color := clGreen;

 end;

 end;

Оператор with (Sender as TRadioButton)  означає, що  властивість Name,  яка  в ньому  використовується, є  властивістю саме  того з елементів  керування  RadioButton,  із  яким  відбулася  подія.

Kомпонент прапорець (CheckBox) 

Елемент  керування  Checkbox  використовується  в  програмі  для  візуалізації  станів  увімкнено / вимкнено,  коли  серед  незалежних  параметрів  або  характеристик  користувачеві  необ хідно  вибрати  потрібні.  Компонент  CheckBox   (вкладка  Standard  на  Палітрі компонентів)  є  поєднанням  квадратного  віконця,  яке  і  показує  стан  компонента  (вибраний / невибраний),  і  текстового  рядка  (властивість  Caption) —  за

головка,  що  пояснює  призначення  прапорця.

Основною  власти вістю  компонента  CheckBox  є  властивість  Checked логічного  типу  (Boolean).  Клацання  компонента  CheckBox  змінює  значення  властивості Checked на  протилежне.  Зміна  стану  перемикача  доступна  і  в  програмі: CheckBox1.Checked = False; // зняти позначку CheckBox2.Checked = True; // встановити позначку Під  час  кожної  зміни  стану  прапорця,  тобто  при  його  встановленні  або  скиданні,  для  даного  елемента  керування   відбувається  подія OnClick. З’ясувати,  встановлений прапорець  чи скинутий, можна за  значенням  властивості  Checked. 

У  коді  процедури  перевіряється  стан  прапорця  й  активізуються  параметри,  пов’язані  з  прапорцем: If CheckBox1.Checked Then <активізація параметрів, які пов’язані з прапорцем> Else <відключення параметрів, які пов’язані з прапорцем>:

Завдання 3. "Автозаправка"

Клієнт на автозаправці придбав k літрів пального. Розрахуйте оплату в залежності від виду пальногo та наявністі дисконтної картки постійного клієнта, яка передбачає знижку 10%.
(Для створення програмного модуля подвійний клік виконуйте тількі по кнопці)

Виконайте  тестове завдання 38 з  автоматичною перевіркою на сайті
interactive.ranok.com.ua

Чекаю відповіді.
З повагою Людмила Скуратовська