Кнопка с рисунком – TBitBtn

 

Кнопка TBitBtn – большая модница; ее украшает битовый образ (пиктограмма). В классе TBitBtn объявлено примечательное свойство, отвечающее за вид и модальный результат кнопки:

propertyKind: TBitBtnKind;

typeTBitBtnKind = (bkCustom, bkOK, bkCancel, bkHelp, bkYes, bkNo, bkClose, bkAbort,bkRetry, bkIgnore, bkAll);

 

Каждому возможному значению TBitBtnKind поставлен в соответствие модальный результат, передаваемый окну: bkCustom – 0, bkOk – mrOk, … , bkAll – mrAll. Для большей наглядности (рис. 8.4) кнопка одновременно снабжается пиктограммой. Если вас не устраивает назначаемое по умолчанию изображение, воспользуйтесь свойством:

propertyGlyph: TBitmap;

 

Найдите подходящий файл-картинку (*.bmp), и кнопка отобразит новую пиктограмму. Имейте в виду, что кнопка одновременно может поддерживать до четырех изображений, каждое из которых соответствует определенному состоянию (кнопка не нажата, не

активна, в момент щелчка, нажата). Количество подключаемых пиктограмм определяется свойством:

propertyNumGlyphs: TNumGlyphs;

typeTNumGlyphs = 1..4;

Все пиктограммы должны быть объединены в единый файл. Посмотрите набор файлов *.bmp, предоставленных Delphi. По умолчанию он размещается в папке:

…\Program Files\Common Files\Borland Shared\Images\Buttons

Каждый файл каталога включает два рисунка (NumGlyphs=2) для отображения обычного и неактивного состояния кнопки.

По желанию разработчика местоположение пиктограммы на рабочей поверхности кнопки изменяется при помощи свойства:

propertyLayout: TButtonLayout;

typeTButtonLayout = (blGlyphLeft, blGlyphRight, blGlyphTop, blGlyphBottom);

 

По умолчанию пиктограмма расположена слева от заголовка кнопки (Layout

= blGlyphLeft). Расстояние (в пикселах) от края кнопки до границы пиктограммы определяется свойством:

propertyMargin: Integer;

 

Расстояние между пиктограммой и текстом заголовка кнопки изменяется

в свойстве:

propertySpacing: Integer;

За стиль кнопки отвечает свойство:

propertyStyle: TButtonStyle;

typeTButtonStyle = (bsAutoDetect, bsWin31, bsNew);

 

Это не что иное, как наследие времен перехода с ОС Windows 3.1 на ОС

Win32. Свойство предназначено для обеспечения обратной совместимости

проектов различных версий Delphi.

 








Дата добавления: 2016-03-15; просмотров: 582;


Поиск по сайту:

При помощи поиска вы сможете найти нужную вам информацию.

Поделитесь с друзьями:

Если вам перенёс пользу информационный материал, или помог в учебе – поделитесь этим сайтом с друзьями и знакомыми.
helpiks.org - Хелпикс.Орг - 2014-2024 год. Материал сайта представляется для ознакомительного и учебного использования. | Поддержка
Генерация страницы за: 0.009 сек.