Delphi. Страница Standart. Васильев В.В - 9 стр.

UptoLike

9
мент массива Items списка ListBox1}
Memo1.Lines.Add(ListBox1.Items[ListBox1.ItemIndex]);
{Добавить в Memo1 выбранный пользователем пункт
списка ComboBox1}
Memo1.Lines.Add(ComboBox1.Text);
end;
36. Добавьте код
обработки события
OnClick компонента
Button3кнопки
Очистить текст
p
rocedure TStandardTab.Button3Click(…);
begin
{Очистить содержимое компонента Memo1}
Memo1.Clear;
end;
37. Напишите код
обработки события
OnClick компонента
Button4кнопки
Выход
p
rocedure TStandardTab.Button4Click(…);
begin
{Закрыть форму}
Close;
end;
38. Сохраните результаты работы
File|Save
39. Проверьте работу программы
Run|Run
3. Компоненты RadioButton, RadioGroup, CheckBox, ScrollBar
1-5. Создание группы RadioGroup1 переключателей Фон формы.
6-7. Написание обработчика OnClick компонента RadioGroup1.
8-10. Добавление компонента ScrollBar.
11-13. Создание и проверка обработчика OnChange элемента ScrollBar.
Пример работы 2: Подсказка
1. Добавьте в форму компонент RadioGroup Страница Standard
2. Замените подпись с RadioGroup1 на Фон формы Свойство Caption
3. Задайте расположение радиокнопок в две колонки
Свойство Columns
4. Укажите подписи для переключателей:
Серебристый
Голубой
Желтый
Красный
В свойстве Items щелкните по
кнопке с тремя точками и в поя-
вившемся диалоговом окне запи-
шите в столбик цвета формы. Для
сохранения - нажмите Оk
5. Сделайте активной первую радиокнопку
Свойство ItemIndex=0
Контейнер RadioGroup содержит список Items зависимых переключа-
телей RadioButton, каждый из которых доступен по своему номеру. В груп-
пу обычно включают не менее двух зависимых переключателей. Свойство
В учебном проекте цвет формы будет изме-
няться в зависимости от выбора радиокнопки в
группе Фон формы и в зависимости от положе-
ния указателя на полосе прокрутки.
На рис. 3 показан макет формы после вы-
полнения примера работы 2.
Рис.3. Макет формы после выполнения при-
мера работы 2.
План примера 2