В архиве лежит сам класс + небольшая обработка с тестом.
Получилось не совсем то что хотелось бы, но мож кому и пригодится :)))
Пример использования:
_СписокНаФорме = СоздатьОбъект("ИкончатыйСписок");
_СписокНаФорме.Инит(Контекст, "СписокНаФорме");
_СписокНаФорме.УстановитьКартинку("F:\Рабпапка\Кооператив\1SKOOP\1\ззз.bmp");
_СписокНаФорме.ЦветФона = 16777215;
_СписокНаФорме.ЦветФонаВыделения = 14871025;
_СписокНаФорме.ЦветШрифтаВыделения = 0;
_СписокНаФорме.ЦветРамкиВыделения = 16717824;
_СписокНаФорме.ДобавитьЗначение(1, "Первый элемент", 1);
_СписокНаФорме.ДобавитьЗначение(2, "Второй элемент", 2);
_СписокНаФорме.ДобавитьЗначение(3, "Третий элемент", 0);
_СписокНаФорме.ТекущееЗначение = 1;
З.Ы. Картинки использовал первое что под руку попалось, поэтому пускай "пометки" вас не смущают)))
