Быстрая кнопка – TSpeedButton

Из всего списка кнопок элемент TSpeedButton – единственный неоконный элемент управления. Кнопка построена на основе графического класса TGraphicControl (подробнее класс рассмотрен в главе 6 «Невидимые классы»). Отсутствие быстрой кнопки в иерархическом списке наследования класса TWinControl лишило ее возможности реагировать на события клавиатуры и получать фокус ввода, но взамен значительно снизило потребность компонента в системных ресурсах. Быстрая кнопка, как правило, применяется в составе панелей инструментов. По аналогии с классом TBitBtn кнопка TSpeedButton умеет отображать на своей поверхности пиктограмму, которая хранится в свойстве:

propertyGlyph: TBitmap;

В дополнение к этому быстрая кнопка способна отказаться от объемного

внешнего вида и стать абсолютно плоской, но в момент подвода курсора «вынырнуть» на поверхность. Для задания такого поведения следует установить в true свойство:

propertyFlat: Boolean;

Кнопку можно сделать прозрачной (Transparent = true), воспользовавшись

свойством:

propertyTransparent: Boolean;

Несколько быстрых кнопок обычно объединяют в группу (рис. 8.6). Для это-

го свойству GroupIndex всех кнопок присваивается одинаковое, отличное от

нуля значение:

propertyGroupIndex: Integer;

Объединение двух и более элементов управления класса TSpeedButton приводит к весьма полезному результату: все кнопки группы приобретают зависимую фиксацию (очень похожую на поведение компонента TRadioGroup). Теперь щелчок по любой из быстрых кнопок переводит последнюю в утопленное состояние и одновременно возвращает в исходное предыдущую нажатую кнопку. О состоянии кнопки в группе (нажата или нет) можно судить по содержимому свойства:

propertyDown: Boolean;

В утопленном состоянии Down = true. Если кнопка не входит ни в какую из

групп (GroupIndex = 0), свойство Down неработоспособно. Для того чтобы хотя бы одна из кнопок группы всегда находилась в утопленном состоянии, установите в false свойство:

propertyAllowAllUp: Boolean;