Студопедия

КАТЕГОРИИ:

АстрономияБиологияГеографияДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРиторикаСоциологияСпортСтроительствоТехнологияФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника


Компонент Delphi FontDialog




 

Компонент Delphi FontDialogрасполагается на странице Dialogs Палитры компонентов. C его помощью можно настроить характеристики шрифта для любых визуальных компонентов.

Выбор параметров диалогового компонента FontDialog происходит в следующем окне (см. рисунок 40).

Рисунок 40 – Пример использования компонента FontDialog

 

Выбор шрифта, его начертание, размер и цвет устанавливается интуитивно просто согласно выбранных значений. Основные свойства компонента следующие:

− Font - задает характеристики шрифта, которые определяются его подсвойствами. Такими как Name, Color, Size.

− MaxFontSize - задает в диалоге максимальный размер шрифта. Активен если параметр fdLimitSize установлен в TRUE.

− MinFontSize - задает в диалоге минимальный размер шрифта. Активен если параметр fdLimitSize установлен в TRUE.

− Device - указывает для какого устройства устанавливается шрифт. Его значение может быть равно: fdScreen (вывод осуществляется на экран), fdPrinter (вывод осуществляется на принтер) и fdBoth (вывод осуществляется на экран и принтер).

 

Свойство Option используется для настройки различных параметров диалога их более пятнадцати. Наиболее важные это:

− fdEffects - устанавливает видимость переключателей зачеркнутый и подчеркнутый.

− fdLimitSize - с помощью него устанавливается размер диапазона шрифтов размером от MaxFontSize до MinFontSize.

− fdTrueTypeOnly - выводятся в списке только шрифты TrueType.

− fdWysiwyg - выводятся в списке шрифты доступные одновременно для экрана и принтера.

Для закрепления материала на форму поместим кнопку и диалог выбора шрифта. Для кнопки напишем такой обработчик события:

if FontDialog1.Execute then Button1.Font := FontDialog1.Font;

 

Нажав на кнопку мы можем выбрать шрифт и его параметры для нашей кнопки.


 

Компонент Delphi ColorDialog (диалог выбора цвета)

 

Компонент Delphi ColorDialog (диалог выбора цвета) располагается на вкладке Dialog Палитры Компонентов. C его помощью можно задать цвет любого визуального компонента.

Рисунок 41 – Пример использования компонента ColorDialog

 

Выбор цвета осуществляется с помощью диалогового окна, показанного выше. Первоначально окно состоит из левой половины и мы можем выбрать "Основные цвета". При необходимости мы можем задать "Дополнительные цвета". Для этого нажимаем кнопку "Определить цвет" и перед нами появиться вторая, правая половина нашего диалогового окна, в котором выбрав визуально интересующий нас цвет нажимаем кнопку "Добавить в набор".

Цвет выбранный пользователем, основное свойство данного компонента, определяется свойством Color. Свойство Color можно задать на этапе проектирования в Инспекторе Объектов или же программно.

С помощью свойства CustomColors можно задать цвета дополнительной палитры. Цвета задаются строками:

порядковый номер цвета = шестнадцатеричное представление цвета;

порядковый номер цвета - ColorA (первый цвет) и далее до СщдщкЗ(последний шестнадцатый цвет). Для примера строка

ColorA = 909090

задаст первый цвет и он будет серый.

 

Свойство Options состоит из следующего множества опций:

− cdFullOpen - мы будим видим сразу же при открытии диалогового окна обе панели, как на рисунке вверху;

− cdPreventFullOpen - кнопка "Определить цвет" будет недоступной (серого цвета) и как следствие мы не сможем вызвать правую панель для определения цвета;

− cdShowHelp - справа, после кнопки отмена в диалоговом окне появиться кнопка "Справка";

− sdSolidColor - дается указание использовать ближний к выбранному сплошной цвет, что уменьшает палитру;

− cdAnyColor - tcnm возможность выбрать не сплошные цвета.

 

Первоначально все опции отключены.

Рисунок 42 – Пример использования компонента ColorDialog

 

Для примера расположим на форме компонент Edit и кнопку Button, а также сам компонент ColorDialog, как показано на рисунке. Нажав на кнопку мы будем вызывать диалог выбора цвета и задавать цвет фона компонента Edit.

Обработчик кнопки будет таким:

procedure TForm1.Button1Click(Sender: TObject);begin if ColorDialog1.Execute then edit1.Color := ColorDialog1.Color;end;

 


Поделиться:

Дата добавления: 2015-02-10; просмотров: 256; Мы поможем в написании вашей работы!; Нарушение авторских прав





lektsii.com - Лекции.Ком - 2014-2024 год. (0.008 сек.) Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав
Главная страница Случайная страница Контакты