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

TListItems

- компонент
Компонент TListView
Определяет коллекцию элементов компонента TListView.

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

lstItmsObj=lstViewObj.Items;

Собственные свойства
Свойство Тип Описание
Count Number количество элементов в коллекции
Item[] TListItem индексированный список элементов
Только чтение
Handle Number дескриптор Windows GDI коллекции элементов
Owner TListView дескриптор родительского компонента

Собственные методы
Метод Описание
Add добавляет новый элемент в конец коллекции
Assign копирует указанную коллекцию элементов
BeginUpdate выключает отрисовку компонента
Clear очищает коллекцию элементов
Delete удаляет указанный элемент коллекции
EndUpdate включает отрисовку компонента
IndexOf возвращает индекс указанного элемента коллекции
Insert вставляет новый элемент в указанную позицию коллекции

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

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

// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=" Кликайте по элементам списка";

// Метка перед списком стилей
lbl=new TLabel(frm);
lbl.Left=10;
lbl.Caption="Стиль отображения списка элементов:";

// Стили отображения списка элементов
cmb=new TComboBox(frm);
cmb.Style=csDropDownList;
cmb.Left=lbl.Left+lbl.Width+10;
cmb.Top =10;
cmb.Width=frm.ClientWidth-lbl.Width-30;
cmb.Items.Add("vsIcon");
cmb.Items.Add("vsList");
cmb.Items.Add("vsReport");
cmb.ItemIndex=0;
cmb.OnSelect=cmb_Select;

lbl.Top=cmb.Top+(cmb.Height-lbl.Height)/2;

// Список элементов
lsv=new TListView(frm);
lsv.BorderStyle=bsSingle;
lsv.GridLines=true;
lsv.Left=lbl.Left;
lsv.Top =cmb.Top+cmb.Height+10;
lsv.Width =frm.ClientWidth-lbl.Left*2;
lsv.Height=stb.Top-lsv.Top-10;
lsv.OnSelectItem=lsv_SelectItem;

// Список изображений
iml=lsv.LargeImages=new TImageList(lsv);
iml.Width=iml.Height=32;

// Столбцы для стиля отображения vsReport
for (i=0;i<4;i++) {
  lsc=new TListColumn(lsv);
  switch (i) {
    case 0 : lsc.Caption="Элементы"; break;
    default: lsc.Caption="Субэлементы "+i;
  }
  lsc.Width=lsv.TextWidth(lsc.Caption)+20;
}

// Элементы списка
icn=new TIcon();
for (i=0;i<5;i++) {
  icn.LoadFromFile(JSPlus.HelpDir+"IMAGE\\TListView\\"+i+".ico");
  iml.AddIcon(icn);

  // Элемент списка
  lsi=lsv.Items.Add();
  lsi.Caption="Элемент "+(i+1);
  lsi.ImageIndex=i;

  // Субэлементы
  for (j=0;j<3;j++)
    lsi.SubItems.Add("Субэлемент "+(i+1)+"-"+(j+1));
}
icn.Delete();

cmb_Select(cmb);
frm.ShowModal();

// Обработчик события OnSelect
function cmb_Select(cmb)
{
  lsv.ViewStyle=eval(cmb.Items[cmb.ItemIndex]);
  lsv.SetFocus();
}

// Обработчик события OnSelectItem
function lsv_SelectItem(lsv,itm,sel)
{
  stb.SimpleText=" Выбран "+itm.Caption;
}
Совместимость
C++ Builder/Delphi
См. также
JS+Руководство пользователя
Адрес этой страницы: http://jsplus.ru/MANUAL/JSPlus/Component/TListView/TListItems.htm
© 2024,