СписокЭлементов.СписокБольшихИзображений (ListView.LargeImageList) Свойство

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

Чтение и запись.

Значение

Тип: СписокИзображений (ImageList).

Возвращает или задает СписокИзображений (ImageList), используемый при отображении элементов как большие значки.

Примечание

Пример

СписокИзображений1 = Ф.СписокИзображений();
СписокЭлементов1.СписокБольшихИзображений = СписокИзображений1;
Полный пример кода 

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


Функция РазобратьСтроку(Строка, Разделитель)
	Стр = СтрЗаменить(Строка,Разделитель,символы.ПС);
	М = Новый Массив;
	Если ПустаяСтрока(Стр) Тогда
		Возврат М;
	КонецЕсли;
	Для Ч = 1 По СтрЧислоСтрок(Стр) Цикл
		М.Добавить(СтрПолучитьСтроку(Стр,Ч));
	КонецЦикла;
	Возврат М;
КонецФункции

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

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

// подготовим крупные значки
СписокИзображений1 = Ф.СписокИзображений();
СписокИзображений1.РазмерИзображения = Ф.Размер(48, 48);
СписокЭлементов1.СписокБольшихИзображений = СписокИзображений1;

СтрКартинка1 = "AAABAAEAMDAAAAEAIACoJQAAFgAAACgAAAAwAAAAYAAAAAEAIAAAAAAAgCUAAAAAAAAAAAAAAAAAAAAAAACZ////mf///5n///";
Для А = 1 По 767 Цикл
	СтрКартинка1 = СтрКартинка1 + "+Z////mf///5n///";
КонецЦикла;
СтрКартинка1 = СтрКартинка1 + "8";
Для А = 1 По 520 Цикл
	СтрКартинка1 = СтрКартинка1 + "A";
КонецЦикла;
СтрКартинка1 = СтрКартинка1 + "=";

СписокЭлементов1.ПриостановитьРазмещение();
Элементы1 = СписокЭлементов1.Элементы;
М3 = РазобратьСтроку(Ф.СвойстваОбъекта(Ф.Цвет()), Символы.ПС);
Для А = 0 По 20 Цикл
	Картинка1 = Ф.Картинка(СтрКартинка1);
	М4 = РазобратьСтроку(М3[А], " ");
	ИмяЦвета = М4[0];
	Попытка
		Цв = Ф.Цвет(ИмяЦвета);
	Исключение
		Продолжить;
	КонецПопытки;
	
	АтрибутыКартинки1 = Картинка1.Блокировать();
	М1 = Картинка1.ПолучитьБайты(АтрибутыКартинки1);
	
	Если Картинка1.ФорматПикселей = Ф.ФорматПикселей.Бит32АКЗС Тогда
		А5 = 0;
		Пока А5 < М1.Количество Цикл
			М1.Установить(А5 + 0, Цв.ЗначениеСиний);
			М1.Установить(А5 + 1, Цв.ЗначениеЗеленый);
			М1.Установить(А5 + 2, Цв.ЗначениеКрасный);
			М1.Установить(А5 + 3, Цв.ЗначениеАльфа);
			А5 = А5 + 4;
		КонецЦикла;
	КонецЕсли;
	Картинка1.УстановитьБайты(АтрибутыКартинки1, М1);
	Картинка1.Разблокировать(АтрибутыКартинки1);
	СписокИзображений1.Изображения.Добавить(Картинка1);
	
	Элементы1.Добавить(Ф.ЭлементСпискаЭлементов(ИмяЦвета, (СписокИзображений1.Изображения.Количество - 1)));
КонецЦикла;
СписокЭлементов1.ВозобновитьРазмещение();

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

Тестовый код 

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


Функция РазобратьСтроку(Строка, Разделитель)
	Стр = СтрЗаменить(Строка,Разделитель,символы.ПС);
	М = Новый Массив;
	Если ПустаяСтрока(Стр) Тогда
		Возврат М;
	КонецЕсли;
	Для Ч = 1 По СтрЧислоСтрок(Стр) Цикл
		М.Добавить(СтрПолучитьСтроку(Стр,Ч));
	КонецЦикла;
	Возврат М;
КонецФункции

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

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

// подготовим крупные значки
СписокИзображений1 = Ф.СписокИзображений();
СписокИзображений1.РазмерИзображения = Ф.Размер(48, 48);
СписокЭлементов1.СписокБольшихИзображений = СписокИзображений1;

СтрКартинка1 = "AAABAAEAMDAAAAEAIACoJQAAFgAAACgAAAAwAAAAYAAAAAEAIAAAAAAAgCUAAAAAAAAAAAAAAAAAAAAAAACZ////mf///5n///";
Для А = 1 По 767 Цикл
	СтрКартинка1 = СтрКартинка1 + "+Z////mf///5n///";
КонецЦикла;
СтрКартинка1 = СтрКартинка1 + "8";
Для А = 1 По 520 Цикл
	СтрКартинка1 = СтрКартинка1 + "A";
КонецЦикла;
СтрКартинка1 = СтрКартинка1 + "=";

СписокЭлементов1.ПриостановитьРазмещение();
Элементы1 = СписокЭлементов1.Элементы;
М3 = РазобратьСтроку(Ф.СвойстваОбъекта(Ф.Цвет()), Символы.ПС);
Для А = 0 По 20 Цикл
	Картинка1 = Ф.Картинка(СтрКартинка1);
	М4 = РазобратьСтроку(М3[А], " ");
	ИмяЦвета = М4[0];
	Попытка
		Цв = Ф.Цвет(ИмяЦвета);
	Исключение
		Продолжить;
	КонецПопытки;
	
	АтрибутыКартинки1 = Картинка1.Блокировать();
	М1 = Картинка1.ПолучитьБайты(АтрибутыКартинки1);
	
	Если Картинка1.ФорматПикселей = Ф.ФорматПикселей.Бит32АКЗС Тогда
		А5 = 0;
		Пока А5 < М1.Количество Цикл
			М1.Установить(А5 + 0, Цв.ЗначениеСиний);
			М1.Установить(А5 + 1, Цв.ЗначениеЗеленый);
			М1.Установить(А5 + 2, Цв.ЗначениеКрасный);
			М1.Установить(А5 + 3, Цв.ЗначениеАльфа);
			А5 = А5 + 4;
		КонецЦикла;
	КонецЕсли;
	Картинка1.УстановитьБайты(АтрибутыКартинки1, М1);
	Картинка1.Разблокировать(АтрибутыКартинки1);
	СписокИзображений1.Изображения.Добавить(Картинка1);
	
	Элементы1.Добавить(Ф.ЭлементСпискаЭлементов(ИмяЦвета, (СписокИзображений1.Изображения.Количество - 1)));
КонецЦикла;
СписокЭлементов1.ВозобновитьРазмещение();

Сообщить(?(
СписокЭлементов1.СписокБольшихИзображений = СписокИзображений1
, "", "!!! ") + "СписокЭлементов.СписокБольшихИзображений (ListView.LargeImageList) Свойство" + " " + ТекущаяДата());

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

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