9
Ёпрст
22.11.11
✎
12:28
|
Для формекса, вот пример:
Процедура ЛегкоеСообщение ( Текст )//©blindvic
СпЗн = СоздатьОбъект("СписокЗначений");
СпЗн.ДобавитьЗначение(" ", " ");
СпЗн.ДобавитьЗначение(1, " " + СокрЛП(Текст) + " ");
СпЗн.ДобавитьЗначение(" ", " ");
ПараметрыРаскраски = СоздатьОбъект("СписокЗначений");
ПараметрыРаскраски.Установить("ЦветФонаВыделения", 16764159);
ПараметрыРаскраски.Установить("ЦветШрифтаВыделения", 0);
ПараметрыРаскраски.Установить("ЦветРамкиВыделения", 16764159);
ПараметрыРаскраски.Установить("ЦветФона", 16764159);
ПараметрыРаскраски.Установить("ЦветШрифта", 0);
Сервис.ВыбратьЗначение(СпЗн, СпЗн, , , 2, , ПараметрыРаскраски);
КонецПроцедуры
|
|