понеділок, 29 січня 2024 р.

Компоненты RadioButton и CheckВox

Компоненти RadioButton и CheckВox - ознайомитись з матеріалом.

Компоненти RadioButton та CheckВox. Найпростіша програма тестування

Компоненти RadioButton та CheckВox

Компоненти RadioButton і CheckBox (вкладка Standard) дозволяють зробити вибір із кількох умов, причому Radio Button дозволяє зробити єдиний вибір із багатьох умов, а CheckBox – множинний вибір.

RadioButton і CheckBox можуть мати лише два значення властивості Checked: False (хибно) та True (істинно). Крім цього радіокнопки є безліч інших властивостей: можна змінити напис на кнопці, її колір, положення, доступність і т.д.

Завдання Створити три запитання, використовуючи компонент RadioButton та три запитання, використовуючи компонент CheckBox.

Зробити висновки стосовно використання кожного компонента.

*************

Для об'єднання RadioButton та CheckBox при розміщенні на формі зручно та красиво застосовувати компоненти GroupBox та RadioGroup.

Використання Group Box

· Поміщаємо компонент GroupBox на форму

· Поміщаємо на нього необхідну кількість компонентів (наприклад CheckBox, а можна й інших)

· В якості Caption змінюємо написи

У результаті отримуємо групу незалежних перемикачів, де значення True (чи False) може мати відразу кілька перемикачів – тобто. ми можемо здійснити множинний вибір.

Зауваження: Індекси перемикачів у Delphi мають нумерацію, що починається з нуля.

Аналогічне використання компонента RadioGroup.

Завдання 2. Створити три запитання, використовуючи компонент RadioButton та три запитання, використовуючи компонент CheckBox.

Зробити висновки стосовно використання кожного компонента.

Приклад умови для RadioButton

if RadioButton1.Checked=True Then Label1.Caption:='Стать чоловіча.'

Else If RadioButton2.Checked=True Then Label1.Caption:='Стать жіночий'

Else If RadioButton3.Checked=True Then Label1.Caption:='Стать невизначена'

Приклад умови для CheckBox

if form1.CheckBox1.Checked and

form1.CheckBox2.Checked and

not form1.CheckBox3.Checked then form1.Label4.Caption:= 'ok'

else form1.Label4.Caption:= 'хибно' ;

Приклад умови для RadioGroup (нумерація з нуля):

if form1.RadioGroup1.ItemIndex = 4 then form1.Label5.Caption:= 'ok'

else form1.Label5.Caption:= 'хибно' ;

Матеріали з Інтернет:

Компонента tCheckBox Це кнопка із незалежною фіксацією. Посилання

Компонент tRadioGroup Посилання

четвер, 25 січня 2024 р.

Лабораторна робота № 9 Середовище delphi використання компонента memo

Мета: Навчитись складати та реалізовувати програми у середовищі delphi.

Завдання 1 до лабораторної роботи:

Необхідно створити два компоненти memo. В одному компоненті вводять 5 чисел у кожному рядку по одному числу. У другому компоненті memo по натиску на кнопку повинно з'явитися квадрати цих чисел.

Створити рядок для введення тексту, який по натиску на кнопку додається до компонента memo.

Створити дві кнопки: одна буде завантажувати текст із текстового файлу до поля memo друга буде виконувати збереження інформації із цього поля у текстовий файл.

Завдання 2 до лабораторної роботи:

Розрізняють чотири основних типи темпераменту людини: сангвінік, холерик, флегматик і меланхолік.

Написати програму, яка буде виводити відповідні кнопки темпераменту людини і в залежності від вибору буде виведена характеристика.

Характеристику вивести у багаторядковому полі (memo), тексти характеристик повинні зчитуватись із текстових файлів.

Завантажити у поле Memo із файлу:

form1.Memo3.Lines.LoadFromFile('text.txt');

Добавити у поле Memo:

form1.Memo3.Lines.Append(form1.Edit1.Text);

Очистити поле Memo:

Memo1.Lines.Clear;

Зберегти інформацію із поля Memo до файлу:

form1.Memo3.Lines.SaveToFile('text.txt');