|
Главная » Уроки по ООП » Урок 14. Работа с кнопками и переключателями |
ПРАКТИЧЕСКАЯ РАБОТА |
Урок 14. Работа с кнопками и переключателями
Задание 1.
Установите на форме две кнопки BitBtn, три CheckBox, один Memo (как на рис.1). По нажатию на кнопку OK должны меняться настройки шрифта в поле Memo в соответствии с установленными флажками CheckBox. По нажатию на кнопку Close форма должна закрываться.
Подсказка: установка полужирного начертания в компоненте Memo выполняется следующим оператором:
memo1.Font.Style:=memo1.Font.Style+[fsBold];
Отключение полужирного начертания:
memo1.Font.Style:=memo1.Font.Style-[fsBold];
Рисунок 1.
Задание 2. Проект «Стоимость заказа»
Создайте программу, подсчитывающую стоимость заказа (рис.2). Результат подсчета должен выводится на Panel.
Подсказка: в обработчике события onClick компонента CheckListBox необходимо проверять все строки. Если строка выделена (стоит галочка), то нужно к общей стоимости прибавлять соответствующую сумму из ListBox. Для пробега по строкам использовать цикл For.
Рисунок 2
Задание 3. Проект «Элементы управления»
Разместите на форме компоненты, как показано на рисунке и установите их необходимые свойства в инспекторе объектов. Компонент SpinEdit Вы найдете на странице Samples. Компонент ColorDialogs находится на странице Dialogs. Компонент Shape на странице Additional.
Рисунок 3
Самостоятельно создайте обработчики событий для радиогрупп.
Подсказка: Программно изменить фигуру компонента Shape можно так:
Shape1.Shape:=stCircle;//окружность
| Shape | Фигура |
| stEllipse | Эллипс |
| stSquare; | Квадрат |
| stRectangle; | Прямоугольник |
| stRoundRect; | Скругленный прямоугольник |
Программно изменить вид штриховки компонента Shape:
Shape1.Brush.Style:=bsSolid; //сплошная заливка
| Brush.Style | Стиль заливки |
| bsCross | Клеточки |
| bsDiagCross | Сеточка |
Создайте обработчик события onChange для компонента SpinEdit. Внесите в него следующий код:
Shape1.Pen.Width:=SpinEdit1.Value;
Создайте обработчик события OnClick для кнопки «Выбор цвета»:
if ColorDialog1.Execute then Shape1.Brush.Color:= ColorDialog1.Color;
Создайте обработчик события onClick для CheckBox:
Button1.Enabled:=CheckBox1.Checked;
Примерный внешний вид окна программы во время ее работы приведен на рисунке ниже.
Проверьте работу программы, составьте комментарии и объясните преподавателю, как она работает.
Рисунок 4
Составитель: Салий Н.А.