Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Обычная тема Раскраска ТЗ - модальная форма. (число прочтений - 2343 )
AlexeyMK
YaBB Newbies
*
Отсутствует


I Love YaBB 2!

Сообщений: 2
Зарегистрирован: 20. Октября 2007
Раскраска ТЗ - модальная форма.
20. Октября 2007 :: 09:17
Печать  
Доброго всем дня. Объясните пожалуйста, может неправильно что делаю. Есть необходимость раскрашивать таблицу значений на форме. Выполняю следующий код:

Код
Выбрать все
Функция ПолучитьЦвет(Красный = 0,Зеленый = 0,Синий = 0) Экспорт
	Возврат Макс(0,Синий)*65536+Макс(0,Зеленый)*256+Макс(0,Красный);
КонецФункции

Процедура ПерерисоватьСтроки()
	ТабСН.ВыбратьСтроки();
	Пока ТабСН.ВыбратьСтроку() = 1 Цикл
		ТабСН.Раскраска = "FONT["+ПолучитьЦвет(0,0,0)+"] BRUSH["+ПолучитьЦвет(204,255,204)+"]";
	КонецЦикла;
КонецПроцедуры

//*******************************************
Процедура Сформировать()
	ПерерисоватьСтроки()
КонецПроцедуры

Процедура ПриОткрытии()
	ТабСН.НоваяКолонка("Раскраска");
	ТабСН.ВидимостьКолонки("Раскраска", 0);
	ТабСН.НоваяКолонка("Тест","Строка");

	СчетчикЦикла = 0;
	Для СчетчикЦикла = 1 По 10 Цикл
		ТабСН.НоваяСтрока();
		ТабСН.Тест = СчетчикЦикла;
	КонецЦикла;

КонецПроцедуры
 


При нажатии на кнопку сформировать выскакивает модальное окно, окно как видно служебное самого FormEx. Как от этого избавиться, может есть еще какие варианты раскраски таблиц? Потому как формулу вставить в колонку создающуюся на лету не представляется возможным.
Спасибо....
  
Наверх
 
IP записан
 
AlexeyMK
YaBB Newbies
*
Отсутствует


I Love YaBB 2!

Сообщений: 2
Зарегистрирован: 20. Октября 2007
Re: Раскраска ТЗ - модальная форма.
Ответ #1 - 20. Октября 2007 :: 11:31
Печать  
Упс... Прошу прощения. Разобрался. Ошибка в коде.
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать