Комитет по образованию Правительства Санкт-Петербурга

ДИАЛОГИ ВЫБОРА ЦВЕТА И ШРИФТА

На вкладке Dialogs располагаются компоненты стандартных диало-говых окон Windows. Среди них есть диалог выбора цвета ColorDialog

• 
  выбора параметров шрифта для текста FontDialog. Сами диалоги ни-чего не устанавливают, а только получают от пользователя нужные зна-чения цвета и параметров шрифта.
  

Рис. 24. Закладка Dialogs с компонентами

Диалоги являются невизуальными компонентами. Для вызова любо-го стандартного диалога при работе приложения используется метод-функция Execute(). При ее выполнении появляется окно, в котором можно выбрать необходимые параметры цвета или шрифта. Метод воз-вращает true, если при закрытии диалога пользователь нажал кнопку Ok (либо клавишу Enter) или возвращает �f����������������������������alse,еслипризакрытиидиа-лога пользователь нажал кнопку Cancel (или клавишу Esc). Данный ме-тод часто вызывают в теле события щелчка по кнопке или пункту меню.

15.1. Диалог выбора цвета (ColorDialog)

Компонент ColorDialog обеспечивает выбор цвета для любого визуального компонента, имеющего свойство Color. Диалог ColorDialog имеет основное свойство Color типа ТСоlог – активный цвет. При открытии диалога в окне актив-ный цвет обведен пунктирной рамкой.

При нажатии на кнопку «Определить цвет», по-является дополнительная об-ласть для создания своей цве-товой палитры. При закры-тии окна кнопкой Ok (метод Execute() возвращает значе-ние true), свойство Color ком-понента ColorDialog содержит выбранный цвет. Например: Выбирается цвет для формы из диалога цвета:

if (ColorDialog1→Execute())

29

15.2. Диалог выбора параметров шрифта (FontDialog)

Рис. 27.


Компонент FontDialog
Компонент FontDialog обеспечивает выбор параметров шрифта (название шрифта, размер, цвет, начертания и дру-гие характеристики) для любого визуального компонен-та, имеющего свойство Font. Основное свойство диало-га – Font – сложное свойство, которое определяет параме-тры шрифта.

Например: Настроить шрифт тек-ста на метке можно следующей про-граммной строчкой:

if (FontDialog1→Execute()) Label1→Font=FontDialog1→Font;

Рис. 28. Компонент


FontDialog в работе

16.