 |
Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | |
Диалоговое окно настройки шрифтов текста
|
|
Для вызова диалогового окна настройки шрифтов (рис. 7.26) необходимо в событие click кнопки cbcontrol ввести следующий код:
Private Sub cbControl_Click()
cdlMyDialog.Flags = cdlCFBoth + cdlCFEffects
cdlMyDialog.ShowFont
End Sub
Флаги диалогового окна настройки шрифтов перечислены в табл. 7.14.
Таблица 7.14. Значения для метода Flags диалогового окна настройки шрифтов
| Константа | Значение | Описание |
| cdlCFANSIOnly | &H400 | Назначает выбор только из системных наборов шрифтов Windows |
| cdlCFApply | &H200 | Добавляет в диалоговое окно кнопку Применить |
| cdlCFBoth | &H3 | Назначает использование экранных шрифтов принтера, указанного в свойстве hDC |
| CdlCFEffects | &H100 | Указывает на необходимость размещения в диалоговом окне элементов управления, задающих эффект подчеркивания, зачеркивания и цвета |
| cdlCFForceFontExis | it &H10000 | Назначает вывод предупреждения об ошибке при выборе несуществующего шрифта |
| cdlCFHelpButton | &H4 | Добавляет в диалоговое окно кнопку Справка |
| cdlCFLimitSize | &H2000 | Назначает выбор размеров шрифтов в интервале, указанном в свойствах Min и Мах |
| cdlCFNoFaceSel | &H80000 | Отключает выбор наименования шрифта |
| cdlCFNoSizeSel | &H1000 | Отключает выбор размера шрифта |
| cdlCFNoSimulations | &H200000 | Отключает в диалоговом окне графические шрифты |
| cdlCFNoStyleSel | &H100000 | Отключает выбор стиля шрифта |
| cdlCFNoVectorFonts | &H800 | Отключает выбор векторных шрифтов |
| cdlCFPrinterFonts | &H2 | Назначает выбор только шрифтов принтера, который указан в свойстве hDC |
| cdlCFScreenFonts | &H1 | Назначает выбор только экранных шрифтов системы |
| cdlCFTTOnly | &H40000 | Назначает только выбор шрифтов типа True Type |
| CdlCFWYSIWYG | &H8000 | Назначает выбор только тех шрифтов, которые подходят одновременно и для принтера, и для экрана. При этом должны дополнительно использоваться флаги cdlCFBoth и cdlCFScalableOnly |
Дата публикования: 2014-12-28; Прочитано: 163 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!
