JS+
Усиленный язык сценариев для Windows
с возможностью встраивания
в ваши приложения
О языке JS+ Справочник Скачать JS+ DLL
Контакты
СПРАВОЧНИК ПО ЯЗЫКУ JS+ Содержание

TToolButton

- визуальный компонент
Компонент TToolBar
Определяет кнопку компонента TToolBar.

Создание объекта

tbtObj=new TToolButton(toolBarObj);

Доступ к объекту

tbtObj=toolBarObj.Buttons[Index];

Собственные свойства
Свойство Тип Описание
AllowAllUp Boolean разрешить отжатое состояние для всех кнопок группы (при установленном свойстве Grouped)
AutoSize Boolean автоматически подгонять размеры кнопки под размер содержимого
Caption String заголовок кнопки
Down Boolean кнопка находится в нажатом состоянии
DropdownMenu TPopupMenu выпадающее меню, вызываемое при нажатии на кнопку (при установленном свойстве EnableDropdown)
EnableDropdown Boolean разрешить вызов выпадающего меню, указанного в свойстве DropdownMenu
Grouped Boolean кнопка входит в группу
ImageIndex Number индекс значка кнопки в списке Images родительского компонента
Indeterminate Boolean кнопка находится в неопределенном состоянии (см. Примечание)
Marked Boolean кнопка находится в выделенном состоянии (фон кнопки меет цвет clHighlight)
MenuItem TMenuItem элемент главного меню, ассоциированный с кнопкой
Style Number стиль кнопки (см. ниже)
Wrap Boolean кнопка завершает текущий ряд (при сброшенном свойстве Wrapable родительского компонента)
Только чтение
Canvas TCanvas дескриптор графической канвы
Index Number индекс кнопки в списке Buttons родительского компонента

Свойство Style
tbsButton обычная кнопка со значком
tbsCheck переключатель
tbsDropDown выпадающее меню
tbsSeparator разделитель
tbsDivider разделитель
tbsTextButton текстовая кнопка без значка

Стандартные свойства

Собственные методы
Метод Описание
CheckMenuDropdown отображает выпадающее меню, указанное в свойстве DropdownMenu
Click имитирует нажатие на кнопку
SetBounds устанавливает положение и размеры кнопки

Стандартные методы

Стандартные события

Пример (JS+)
// Главная форма
frm=new TForm();
frm.Caption="JS+ - визуальный компонент TToolButton";
frm.Width =525;
frm.Height=375;

// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=" Нажмите на любую кнопку ToolBar";

tlb=new TToolBar(frm);
tlb.DrawingStyle=dsGradient;
tlb.EdgeBorders=ebBottom;
tlb.EdgeInner=esRaised;
tlb.ButtonMargin=2;
tlb.ShowCaptions=true;
tlb.Customizable=true;

for (i=j=0;i<5;i++) {
  tbt=new TToolButton(tlb);
  tbt.Style=tbsButton;
  tbt.ShowHint=true;

  switch (i) {
    case 3: tbt.Style=tbsSeparator;
             tbt.Width=3;
             continue;

    default: tbt.Hint="Кнопка "+(j+1);
  }

  tbt.Caption=tbt.Hint;
  tbt.LoadImage(
  JSPlus.HelpDir+"IMAGE\\TToolBar\\"+(j++)+".ico");
  tbt.OnClick=tbt_Click;
}

// Метка
lbl=new TLabel(frm);
lbl.Alignment=taCenter;
lbl.Caption=
"Редактируйте панель кнопок:\n"+
"перетаскиванием кнопок при нажатой клавише Shift или\n"+
"после двойного щелчка на свободной области компонента";
lbl.Left=(frm.ClientWidth-lbl.Width)/2;
lbl.Top =(stb.Top-lbl.Height)/2;

frm.ShowModal();

// Обработчик события OnClick
function tbt_Click(tbt)
{
  alert("Нажата "+tbt.Hint);
}
Примечание
При установке свойства Indeterminate кнопка переходит в неопределенное состояние: отображается отжатой и недоступной, однако, при нажатии на нее, кнопка выходит из неопределенного состояния и отрабатывает все положенные действия.
Совместимость
C++ Builder/Delphi
См. также
JS+Руководство пользователя
Адрес этой страницы: http://jsplus.ru/MANUAL/JSPlus/Component/TToolBar/TToolButton.htm
© 2024,