Чтение и запись.
Тип: СписокИзображений (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.РазмерИзображения = Ф.Размер(16, 16); СписокЭлементов1.СписокМаленькихИзображений = СписокИзображений1; СтрКартинка1 = "AAABAAEAEBAAAAEAIABoBAAAFgAAACgAAAAQAAAAIAAAAAEAIAAAAAAAQAQAAAAAAAAAAAAAAAAAAAAAAAD"; Для А = 1 По 1365 Цикл СтрКартинка1 = СтрКартинка1 + "/"; КонецЦикла; СтрКартинка1 = СтрКартинка1 + "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=="; Картинка1 = Ф.Картинка(СтрКартинка1); СписокЭлементов1.ПриостановитьРазмещение(); Элементы1 = СписокЭлементов1.Элементы; М3 = РазобратьСтроку(Ф.СвойстваОбъекта(Ф.Цвет()), Символы.ПС); // Для А = 0 По М3.ВГраница() Цикл Для А = 0 По 20 Цикл М4 = РазобратьСтроку(М3[А], " "); ИмяЦвета = М4[0]; Попытка Цв = Ф.Цвет(ИмяЦвета); Исключение Продолжить; КонецПопытки; Для А1 = 0 По Картинка1.Ширина - 1 Цикл Для А2 = 0 По Картинка1.Высота - 1 Цикл Картинка1.УстановитьПиксель(А1, А2, Ф.Цвет(ИмяЦвета)); КонецЦикла; КонецЦикла; СписокИзображений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.РазмерИзображения = Ф.Размер(16, 16); СписокЭлементов1.СписокМаленькихИзображений = СписокИзображений1; СтрКартинка1 = "AAABAAEAEBAAAAEAIABoBAAAFgAAACgAAAAQAAAAIAAAAAEAIAAAAAAAQAQAAAAAAAAAAAAAAAAAAAAAAAD"; Для А = 1 По 1365 Цикл СтрКартинка1 = СтрКартинка1 + "/"; КонецЦикла; СтрКартинка1 = СтрКартинка1 + "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA=="; Картинка1 = Ф.Картинка(СтрКартинка1); СписокЭлементов1.ПриостановитьРазмещение(); Элементы1 = СписокЭлементов1.Элементы; М3 = РазобратьСтроку(Ф.СвойстваОбъекта(Ф.Цвет()), Символы.ПС); // Для А = 0 По М3.ВГраница() Цикл Для А = 0 По 20 Цикл М4 = РазобратьСтроку(М3[А], " "); ИмяЦвета = М4[0]; Попытка Цв = Ф.Цвет(ИмяЦвета); Исключение Продолжить; КонецПопытки; Для А1 = 0 По Картинка1.Ширина - 1 Цикл Для А2 = 0 По Картинка1.Высота - 1 Цикл Картинка1.УстановитьПиксель(А1, А2, Ф.Цвет(ИмяЦвета)); КонецЦикла; КонецЦикла; СписокИзображений1.Изображения.Добавить(Картинка1); Элементы1.Добавить(Ф.ЭлементСпискаЭлементов(ИмяЦвета, (СписокИзображений1.Изображения.Количество - 1))); КонецЦикла; СписокЭлементов1.ВозобновитьРазмещение(); Сообщить(?( СписокЭлементов1.СписокМаленькихИзображений = СписокИзображений1 , "", "!!! ") + "СписокЭлементов.СписокМаленькихИзображений (ListView.SmallImageList) Свойство" + " " + ТекущаяДата());
СписокЭлементов (ListView) Класс | Библиотека OneScriptForms