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

TEditButton

- визуальный компонент
Компонент TButtonedEdit
Определяет графическую кнопку компонента TButtonedEdit.
Доступ к объекту
Доступ к объекту выполняется через компонент TButtonedEdit:

frm=new TForm();
...

btnEdtObj=new TButtonedEdit(frm);
...

edtBtnObj=btnEdtObj.LeftButton;

edtBtnObj=btnEdtObj.RightButton;

Собственные свойства
DisabledImageIndex Number индекс изображения из списка Images для кнопки в недоступном состоянии
DropDownMenu TPopupMenu дескриптор выпадающего меню
Enabled Boolean кнопка разрешена (может быть нажата пользователем)
HotImageIndex Number индекс изображения из списка Images для кнопки, находяшейся под курсором мыши
ImageIndex Number индекс изображения из списка Images для кнопки в обычном состоянии
PressedImageIndex Number индекс изображения из списка Images для кнопки в нажатом состоянии
Visible Boolean кнопка отображается на экране
Только чтение
EditControl TButtonedEdit дескриптор родительского компонента
Images TImageList список изображений для кнопки
Position Enum расположение кнопки (см. ниже)

Свойство Position
Значение Описание
bpLeft кнопка слева
bpRight кнопка справа

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

Пример (JS+)
var Crn_Lst=new Array(
  "-",
  "Доллар США|тыс. долл.",
  "Евро|тыс. евро",
  "Российский рубль|тыс. руб."
);

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

// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=" Выберите валюту и укажите цену";

// Левая метка
lbl=new TLabel(frm);
lbl.Caption="Цена:";
lbl.Font.Style=fsBold;

// ButtonedEdit
bte=new TButtonedEdit(frm);
bte.BorderStyle=bsSingle;
bte.Alignment=taRightJustify;
bte.MaxLength=6;
bte.Width=bte.TextWidth("0000.0")+bte.Height*2;
bte.Top=(stb.Top-bte.Height)/2;

// Правая метка
lbr=new TLabel(frm);
lbr.Caption="xxxx";

lbl.Left=(frm.ClientWidth-lbl.Width-bte.Width-lbr.Width-16)/2;
bte.Left=lbl.Left+lbl.Width+8;
lbr.Left=bte.Left+bte.Width+8;
lbl.Top =lbr.Top=bte.Top+(bte.Height-lbl.Height)/2;

// Меню
mnu=new TPopupMenu(bte);

// Список изображений, пункты меню
bte.Images=new TImageList(bte);
for (i=0;i<Crn_Lst.length;i++) {
  icn=new TIcon();
  icn.LoadFromFile(JSPlus.HelpDir+"IMAGE\\TButtonedEdit\\"+i+".ico");
  bte.Images.AddIcon(icn);
  icn.Delete();

  if (i>0) {
    mni=new TMenuItem(mnu);
    mni.Caption=Crn_Lst[i].split("|")[0];
    mni.ImageIndex=i;
    mni.OnClick=mni_Click;
  }
}
mnu.Images=bte.Images;

// Левая кнопка
btl=bte.LeftButton;
btl.Visible=true;

// Правая кнопка
btr=bte.RightButton;
btr.ImageIndex=0;
btr.Visible=true;
btr.DropDownMenu=mnu;

set_Crn(1);
bte.SetFocus();
frm.ShowModal();

function set_Crn(index)
{
  btl.ImageIndex=index;
  lbr.Caption=Crn_Lst[index].split("|")[1];
}

// Обработчик события OnClick
function mni_Click(mni)
{
  set_Crn(mni.ImageIndex);
}
Совместимость
C++ Builder/Delphi
См. также
JS+Руководство пользователя
Адрес этой страницы: http://jsplus.ru/MANUAL/JSPlus/Component/TButtonedEdit/TEditButton.htm
© 2024,