ПодэлементСпискаЭлементов.Метка (ListViewSubItem.Tag) Свойство

Использование

Только чтение.

Значение

Тип: Коллекция (Collection).

Возвращает объект, содержащий дополнительные данные.

Примечание

Свойство Метка (Tag) позволяет расширить возможности объекта с помощью дополнительных данных с различными типами значений.

Пример

Коллекция11 = ПодэлементСпискаЭлементов1.Метка;
Коллекция11.Добавить(ПодэлементСпискаЭлементов1, "Объект");
Коллекция11.Добавить("ПодэлементСпискаЭлементов1", "Имя");
Коллекция11.Добавить(Истина, "Булево");
Коллекция11.Добавить(156.35, "Число");
Коллекция11.Добавить(Дата(1984,03,26,06,24,21), "Дата");

Сообщить("Объект = " + ПодэлементСпискаЭлементов1.Метка.Элемент("Объект"));
Сообщить("Имя = " + ПодэлементСпискаЭлементов1.Метка.Элемент("Имя"));
Сообщить("Булево = " + ПодэлементСпискаЭлементов1.Метка.Элемент("Булево"));
Сообщить("Число = " + ПодэлементСпискаЭлементов1.Метка.Элемент("Число") / 2);
Сообщить("Дата = " + ПодэлементСпискаЭлементов1.Метка.Элемент("Дата"));
Полный пример кода 

Копировать     Выделить всё


ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Ширина = 750;
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

СписокЭлементов1 = Форма1.ЭлементыУправления.Добавить(Ф.СписокЭлементов());
СписокЭлементов1.Стыковка = Ф.СтильСтыковки.Заполнение;
СписокЭлементов1.РежимОтображения = Ф.РежимОтображения.Подробно;
СписокЭлементов1.МножественныйВыбор = Истина;

Колонки = СписокЭлементов1.Колонки;
Колонка1 = Колонки.Добавить(Ф.Колонка("Платоновы тела", 120, Ф.ГоризонтальноеВыравнивание.Лево));
Колонка2 = Колонки.Добавить(Ф.Колонка("Число ребер при вершине", 190, Ф.ГоризонтальноеВыравнивание.Лево));
Колонка3 = Колонки.Добавить(Ф.Колонка("Число сторон грани", 150, Ф.ГоризонтальноеВыравнивание.Лево));
Колонка4 = Колонки.Добавить(Ф.Колонка("Число граней", 115, Ф.ГоризонтальноеВыравнивание.Лево));
Колонка5 = Колонки.Добавить(Ф.Колонка("Число ребер", 100, Ф.ГоризонтальноеВыравнивание.Лево));
Колонка5 = Колонки.Добавить(Ф.Колонка("Число вершин", 115, Ф.ГоризонтальноеВыравнивание.Лево));
Элементы = СписокЭлементов1.Элементы;
Тетраэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Тетраэдр"));
Куб = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Куб"));
Октаэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Октаэдр"));
Додекаэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Додекаэдр"));
Икосаэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Икосаэдр"));

ПодэлементыТетраэдр = Тетраэдр.Подэлементы;
ПодэлементСпискаЭлементов1 = Ф.ПодэлементСпискаЭлементов("3");

Коллекция11 = ПодэлементСпискаЭлементов1.Метка;
Коллекция11.Добавить(ПодэлементСпискаЭлементов1, "Объект");
Коллекция11.Добавить("ПодэлементСпискаЭлементов1", "Имя");
Коллекция11.Добавить(Истина, "Булево");
Коллекция11.Добавить(156.35, "Число");
Коллекция11.Добавить(Дата(1984,03,26,06,24,21), "Дата");

Сообщить("Объект = " + ПодэлементСпискаЭлементов1.Метка.Элемент("Объект"));
Сообщить("Имя = " + ПодэлементСпискаЭлементов1.Метка.Элемент("Имя"));
Сообщить("Булево = " + ПодэлементСпискаЭлементов1.Метка.Элемент("Булево"));
Сообщить("Число = " + ПодэлементСпискаЭлементов1.Метка.Элемент("Число") / 2);
Сообщить("Дата = " + ПодэлементСпискаЭлементов1.Метка.Элемент("Дата"));

ПодэлементыТетраэдр.Добавить(ПодэлементСпискаЭлементов1);
ПодэлементыТетраэдр.Добавить(Ф.ПодэлементСпискаЭлементов("3"));
ПодэлементыТетраэдр.Добавить(Ф.ПодэлементСпискаЭлементов("4"));
ПодэлементыТетраэдр.Добавить(Ф.ПодэлементСпискаЭлементов("6"));
ПодэлементыТетраэдр.Добавить(Ф.ПодэлементСпискаЭлементов("4"));

ПодэлементыКуб = Куб.Подэлементы;
ПодэлементыКуб.Добавить(Ф.ПодэлементСпискаЭлементов("3"));
ПодэлементыКуб.Добавить(Ф.ПодэлементСпискаЭлементов("4"));
ПодэлементыКуб.Добавить(Ф.ПодэлементСпискаЭлементов("6"));
ПодэлементыКуб.Добавить(Ф.ПодэлементСпискаЭлементов("12"));
ПодэлементыКуб.Добавить(Ф.ПодэлементСпискаЭлементов("8"));

ПодэлементыОктаэдр = Октаэдр.Подэлементы;
ПодэлементыОктаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("4"));
ПодэлементыОктаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("3"));
ПодэлементыОктаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("8"));
ПодэлементыОктаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("12"));
ПодэлементыОктаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("6"));

ПодэлементыДодекаэдр = Додекаэдр.Подэлементы;
ПодэлементыДодекаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("3"));
ПодэлементыДодекаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("5"));
ПодэлементыДодекаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("12"));
ПодэлементыДодекаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("30"));
ПодэлементыДодекаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("20"));

ПодэлементыИкосаэдр = Икосаэдр.Подэлементы;
ПодэлементыИкосаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("5"));
ПодэлементыИкосаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("3"));
ПодэлементыИкосаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("20"));
ПодэлементыИкосаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("30"));
ПодэлементыИкосаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("12"));

Ф.ЗапуститьОбработкуСобытий();

Тестовый код 

Копировать     Выделить всё


ПодключитьВнешнююКомпоненту("C:\444\111\OneScriptForms\OneScriptForms\bin\Debug\OneScriptForms.dll");
Ф = Новый ФормыДляОдноСкрипта();
Форма1 = Ф.Форма();
Форма1.Ширина = 750;
Форма1.Отображать = Истина;
Форма1.Показать();
Форма1.Активизировать();

СписокЭлементов1 = Форма1.ЭлементыУправления.Добавить(Ф.СписокЭлементов());
СписокЭлементов1.Стыковка = Ф.СтильСтыковки.Заполнение;
СписокЭлементов1.РежимОтображения = Ф.РежимОтображения.Подробно;
СписокЭлементов1.МножественныйВыбор = Истина;

Колонки = СписокЭлементов1.Колонки;
Колонка1 = Колонки.Добавить(Ф.Колонка("Платоновы тела", 120, Ф.ГоризонтальноеВыравнивание.Лево));
Колонка2 = Колонки.Добавить(Ф.Колонка("Число ребер при вершине", 190, Ф.ГоризонтальноеВыравнивание.Лево));
Колонка3 = Колонки.Добавить(Ф.Колонка("Число сторон грани", 150, Ф.ГоризонтальноеВыравнивание.Лево));
Колонка4 = Колонки.Добавить(Ф.Колонка("Число граней", 115, Ф.ГоризонтальноеВыравнивание.Лево));
Колонка5 = Колонки.Добавить(Ф.Колонка("Число ребер", 100, Ф.ГоризонтальноеВыравнивание.Лево));
Колонка5 = Колонки.Добавить(Ф.Колонка("Число вершин", 115, Ф.ГоризонтальноеВыравнивание.Лево));
Элементы = СписокЭлементов1.Элементы;
Тетраэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Тетраэдр"));
Куб = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Куб"));
Октаэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Октаэдр"));
Додекаэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Додекаэдр"));
Икосаэдр = Элементы.Добавить(Ф.ЭлементСпискаЭлементов("Икосаэдр"));

ПодэлементыТетраэдр = Тетраэдр.Подэлементы;
ПодэлементСпискаЭлементов1 = Ф.ПодэлементСпискаЭлементов("3");

Коллекция11 = ПодэлементСпискаЭлементов1.Метка;
Коллекция11.Добавить(ПодэлементСпискаЭлементов1, "Объект");
Коллекция11.Добавить("Подэлемент1", "Имя");
Коллекция11.Добавить(Истина, "Булево");
Коллекция11.Добавить(156.35, "Число");
Коллекция11.Добавить(Дата(1984,03,26,06,24,21), "Дата");

ПодэлементыТетраэдр.Добавить(ПодэлементСпискаЭлементов1);
ПодэлементыТетраэдр.Добавить(Ф.ПодэлементСпискаЭлементов("3"));
ПодэлементыТетраэдр.Добавить(Ф.ПодэлементСпискаЭлементов("4"));
ПодэлементыТетраэдр.Добавить(Ф.ПодэлементСпискаЭлементов("6"));
ПодэлементыТетраэдр.Добавить(Ф.ПодэлементСпискаЭлементов("4"));

ПодэлементыКуб = Куб.Подэлементы;
ПодэлементыКуб.Добавить(Ф.ПодэлементСпискаЭлементов("3"));
ПодэлементыКуб.Добавить(Ф.ПодэлементСпискаЭлементов("4"));
ПодэлементыКуб.Добавить(Ф.ПодэлементСпискаЭлементов("6"));
ПодэлементыКуб.Добавить(Ф.ПодэлементСпискаЭлементов("12"));
ПодэлементыКуб.Добавить(Ф.ПодэлементСпискаЭлементов("8"));

ПодэлементыОктаэдр = Октаэдр.Подэлементы;
ПодэлементыОктаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("4"));
ПодэлементыОктаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("3"));
ПодэлементыОктаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("8"));
ПодэлементыОктаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("12"));
ПодэлементыОктаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("6"));

ПодэлементыДодекаэдр = Додекаэдр.Подэлементы;
ПодэлементыДодекаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("3"));
ПодэлементыДодекаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("5"));
ПодэлементыДодекаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("12"));
ПодэлементыДодекаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("30"));
ПодэлементыДодекаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("20"));

ПодэлементыИкосаэдр = Икосаэдр.Подэлементы;
ПодэлементыИкосаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("5"));
ПодэлементыИкосаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("3"));
ПодэлементыИкосаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("20"));
ПодэлементыИкосаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("30"));
ПодэлементыИкосаэдр.Добавить(Ф.ПодэлементСпискаЭлементов("12"));

Сообщить(?(
ПодэлементСпискаЭлементов1 = ПодэлементСпискаЭлементов1.Метка.Элемент("Объект") и
"Подэлемент1" = ПодэлементСпискаЭлементов1.Метка.Элемент("Имя") и
ПодэлементСпискаЭлементов1.Метка.Элемент("Булево") и
(156.35 = ПодэлементСпискаЭлементов1.Метка.Элемент("Число")) и
Дата(1984,03,26,06,24,21) = ПодэлементСпискаЭлементов1.Метка.Элемент("Дата")
, "", "!!! ") + "ПодэлементСпискаЭлементов.Метка (ListViewSubItem.Tag) Свойство" + " " + ТекущаяДата());

Смотрите также

ПодэлементСпискаЭлементов (ListViewSubItem) Класс | Библиотека OneScriptForms