Использование компонентов зависимых и независимых переключателей.

Цель работы: Применение теоретических навыков на практике. Ознакомить учащихся с компонентами «переключателями» на форме приложения. Закрепить полученные на лекции знания. Написать и отладить программу.

 

Теория.

Рассмотрим 2 вида переключателей

1) TCheckBox - независимый переключатель

 

Независимый переключатель TCheckBox используется для того, чтобы пользователь мог указать свое решение типа Да/Нет или Да/Нет/Не совсем (в последнем случае в окошке компонента устанавливается флаг выбора, но само окошко закрашивается серым цветом). Это решение отражается в свойстве State компонента, доступном как для чтения, так и для записи. В составе диалогового окна может быть несколько компонентов

 

TCheckBox. Состояние любого из них не зависит от состояния остальных, поэтому такие переключатели называются независимыми.

Типичное использование компонента:

ifCheckBoxl.Checked then

 

else

Или:

case CheckBoxl.State of cbChecked:...; {выбран }

cbUnchecked:...; {невыбран}

cbGrayed:...; {выделенсерым}

end;

2) TRadioButton -зависимые переключатели, предназначенные для выбора одного из нескольких взаимоисключающих решений. На форму (точнее, в компонент-контейнер) помещается по меньшей мере два таких компонента. Они могут иметь только два состояния, определяемых свойством Сhecked. Если в одном компоненте это свойство принимает значение True, во всех других компонентах, расположенных в том же контейнере, свойства Сhecked принимают значения False.

Помимо свойства checked компонент TRadioButton имеет еще одно специфичное свойство - Alignment, аналогичное такому же свойству TCheckBox. Как и в TCheckBox, программист не может изменять размеры и цвет круглого окошка компонента.

Пример: В зависимости от выбора найти следующее или предыдущее число от числа А.

1. Расположите компоненты:RadioGroup на ней 2 RadioButton, Button, 2 Edit (для чисел).
2. Свойство Caption (RadioGroup) = Выберите пункт
3. Свойство Caption (RadioButton) = Следующее число
4. Свойство Caption (RadioButton) = Предыдущее число
5. Обработчик события:

 

Vara: integer;

Begin

a:= StrToInt(Edit1.Text);

if RadioButton1.Checked then

a:=a+1

else

if RadioButton2.Checked then

a:=a-1;

Edit2.Text:=IntToStr(a);

End;

Задания:

Вариант №1. Используя 3 зависимых переключателя, решить:

Даны 3 числа, в зависимости от выбора, найти сумму, разность или произведение этих чисел

Вариант №2. Используя 2 зависимых переключателя, решить:

В зависимости от выбора, найти минимальное или максимальное из 4 чисел.

Вариант №3. Используя 2 зависимых переключателя, решить:

В зависимости от выбора, возрастающая или убывающая последовательность из 3 чисел.

Вариант №4. Используя два зависимых переключателя, решить:

В зависимости от выбора, найти минимальное из первого и второго числа или максимальное из третьего и четвертого числа.

Вариант №5. Используя 3 зависимых переключателя решить:

В зависимости от выбора, найти квадрат, куб или возвести в пятую степень трехмерное число.

Вариант №6. Используя 2 зависимых переключателя, решить:

В зависимости от выбора, найти сумму, разность цифр четырехзначного числа.

Вариант №7. Используя 3 зависимых переключателя решить:

В зависимости от выбора, найти по трем сторонам треугольник равносторонний, равнобедренный или вообще не существует.

Вариант №8. Используя 3 зависимых переключателя решить:

В зависимости от выбора, 1)а>b>c>d 2)a<b<c<d 3)a=b=c=d и выдать сообщение о результате проверки.

Вариант №9. Используя 3 зависимых переключателя решить:

В зависимости от выбора, найти сумму А и В, произведение В и С, разность А и Д.

Вариант №10. Используя 3 зависимых переключателя решить:

В зависимости от выбора, найти среднее арифметическое, сумму чисел или минимальное из 4 чисел.

Вариант №11. Используя 3 зависимых переключателя решить:

В зависимости от выбора, найти сумму четных элементов, разность нечетных или количество единиц в массиве.

Вариант №12. Используя 2 зависимых переключателя решить:

В зависимости от выбора, найти количество симметричных или разных в написании двухзначных чисел.

Вариант №13. Используя 3 зависимых переключателя решить:

В зависимости от выбора, найти сумму, количество, разность минимального и максимального элемента в массиве.

Вариант №14. Используя 3 зависимых переключателя решить:

В зависимости от выбора, найти количество нулей, единиц или двоек в матрице.

Вариант №15. Используя 3 зависимых переключателя решить:

В зависимости от выбора, найти 1) поменять местами первый элемент и последний. 2)поменять местами первый элемент со вторым. 3) поменять местами первый элемент и предпоследний в массиве.

Контрольные вопросы:

1. Какие типы переключателей вы знаете?

2. Назначение компоненты TRadioButton?

3. Назначение компонентыTCheckBox?

 

 

Лабораторная работа №21