(UTC)
(Группа Модераторов: 1c++ moderator)
‹ Предыдущая Тема | Следующая Тема ›
Переключение на Главную Страницу Страницы: 1 ОтправитьПечать
Обычная тема ТП.Шрифт как изменять? (число прочтений - 1581 )
pvase
God Member
*****
Отсутствует



Сообщений: 923
Местоположение: Киев
Зарегистрирован: 19. Мая 2006
Пол: Мужской
ТП.Шрифт как изменять?
12. Мая 2008 :: 17:00
Печать  
Надо менять шрифт в зависимости от каких то параметров (жирный, курсив), можно ли это как то сделать (в документации указано что эти параметры только для чтения, но в чем тогда смысл этих парамтеров когда шрифт всега стандартный)?
  
Наверх
wwwSkype/VoIPICQ  
IP записан
 
PVR
God Member
*****
Отсутствует



Сообщений: 622
Зарегистрирован: 19. Ноября 2007
Пол: Мужской
Re: ТП.Шрифт как изменять?
Ответ #1 - 12. Мая 2008 :: 17:31
Печать  
Поиск рулит  Смех
  
Наверх
 
IP записан
 
pvase
God Member
*****
Отсутствует



Сообщений: 923
Местоположение: Киев
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: ТП.Шрифт как изменять?
Ответ #2 - 13. Мая 2008 :: 09:30
Печать  
Нашел, сенкс:
Код
Выбрать все
Процедура ТаблПолеПриВыводеСтроки(_ТП,ОС,ДС,ТипРегиона)
	Фабрика = СоздатьОбъект("ФабрикаОбъектов");
	Если ТипРегиона = 3 Тогда
		ЕдСтатьи = ДС.ЕдСтатьи;
		ШрифтЖирн = 0;
		ШрифтКурс = 0;
		ШрифтПодч = 0;

		Если ПустоеЗначение(ЕдСтатьи) = 0 Тогда
			ШрифтЖирн = ЕдСтатьи.ШрифтЖирн;
			ШрифтКурс = ЕдСтатьи.ШрифтКурс;
			ШрифтПодч = ЕдСтатьи.ШрифтПодч;
		КонецЕсли;
		ОС.Шрифт = Фабрика.Шрифт("MSSansSerif", 8, ШрифтЖирн, ШрифтКурс,ШрифтПодч);


	КонецЕсли;

КонецПроцедуры
  
Наверх
wwwSkype/VoIPICQ  
IP записан
 
Arta
1c++ power user
Отсутствует



Сообщений: 2537
Местоположение: Нижний Новгород
Зарегистрирован: 19. Мая 2006
Пол: Мужской
Re: ТП.Шрифт как изменять?
Ответ #3 - 13. Мая 2008 :: 09:55
Печать  
Только фабрику сделай переменной класса или модуля. А то на каждой строке будешь ее создавать.
  
Наверх
 
IP записан
 
Переключение на Главную Страницу Страницы: 1
ОтправитьПечать
‹ Предыдущая Тема | Следующая Тема ›
 
  « Главная ‹ Раздел Вверх  



Valid RSS Valid XHTML Valid CSS Powered by Perl Source Forge