Лабораторная работа № 22. Использование компонентов зависимых и независимых переключателей.
Цель работы: Применение теоретических навыков на практике. Ознакомить учащихся с компонентами «переключателями» на форме приложения. Закрепить полученные на лекции знания. Написать и отладить программу.
Теория.
Рассмотрим 2 вида переключателей
TCheckBox - независимый переключатель
Н
езависимый
переключатель TCheckBox используется для
того, чтобы пользователь мог указать
свое решение типаДа/Нет или Да/Нет/Не
совсем (в последнем случае в окошке
компонента устанавливается флаг выбора,
но само окошко закрашивается серым
цветом). Это решение отражается в свойстве
State компонента, доступном как для чтения,
так и для записи. В составе диалогового
окна может быть несколько компонентов
TCheckBox. Состояние любого из них не зависит от состояния остальных, поэтому такие переключатели называются независимыми.
Типичное использование компонента:
ifCheckBoxl.Checkedthen
e
lse
Или:
caseCheckBoxl.Stateof cbChecked :... ; {выбран }
cbUnchecked:...; {невыбран}
cbGrayed :...; {выделенсерым}
end;
2) TRadioButton -зависимые переключатели , предназначенные для выбора одного из нескольких взаимоисключающих решений. На форму (точнее, в компонент-контейнер) помещается по меньшей мере два таких компонента. Они могут иметь только два состояния, определяемых свойством Сhecked. Если в одном компоненте это свойство принимает значение True, во всех других компонентах, расположенных в том же контейнере, свойства Сhecked принимают значения False.
Помимо свойства checked компонент TRadioButton имеет еще одно специфичное свойство - Alignment, аналогичное такому же свойству TCheckBox. Как и в TCheckBox, программист не может изменять размеры и цвет круглого окошка компонента.
Пример: В зависимости от выбора найти следующее или предыдущее число от числа А.
Расположите компоненты :RadioGroup на ней 2 RadioButton, Button, 2 Edit (для чисел).
С
войство
Caption (RadioGroup)
= Выберите пункт
Свойство Caption (RadioButton) = Следующее число
Свойство Caption (RadioButton) = Предыдущее число
Обработчик события:
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) поменять местами первый элемент и предпоследний в массиве.
Контрольные вопросы:
Какие типы переключателей вы знаете?
Назначение компоненты TRadioButton?
Назначение компонентыTCheckBox?