Имя: Пароль:
1C
1С v8
Как программно заменить шрифт в макете?
0 syava
 
09.09.11
15:00
Не получается изменить шрифт в макете программно. Делаю так:

ЗачеркнутыйШрифт = Новый Шрифт (,,,,,Истина);
ЗачеркнутаяОбласть = Макет.ПолучитьОбласть("Строка");
ЗачеркнутаяОбласть.ТекущаяОбласть.Шрифт = ЗачеркнутыйШрифт;
ТабДокумент.Вывести(ЗачеркнутаяОбласть);

Не работает
1 bcel
 
09.09.11
15:08
Попробуй так
2 bcel
 
09.09.11
15:09
ЗачеркнутыйШрифт = Новый Шрифт (,,,,,Истина);
ЗачеркнутаяОбласть = Макет.ПолучитьОбласть("Строка");
ЗачеркнутаяОбласть.Область("ТекущаяОбласть").Шрифт = ЗачеркнутыйШрифт;
ТабДокумент.Вывести(ЗачеркнутаяОбласть);
3 syava
 
09.09.11
15:09
(1) Как?
4 syava
 
09.09.11
15:09
ага, пробую
5 syava
 
09.09.11
15:24
(2) Нихрена

ЗачеркнутаяОбласть.Область("ТекущаяОбласть").Шрифт = ЗачеркнутыйШрифт;
по причине:
Область не найдена: ТекущаяОбласть
6 Челмедведосвин
 
09.09.11
15:31
А если
ЗачеркнутаяОбласть.Шрифт = ЗачеркнутыйШрифт;
7 Челмедведосвин
 
09.09.11
15:32
А если надо ячейку, так и область на ячейку делай
8 NorthWoman
 
09.09.11
15:43
ЗачеркнутаяОбласть.Области.Область1.Шрифт = ЗачеркнутыйШрифт;
где область1 - это ячейки.
9 syava
 
09.09.11
16:00
Спасибо всем, получилось. Всего делов то оказывается:

ЗачеркнутыйШрифт = Новый Шрифт (,,,,,Истина);
ОбластьСтроки.Область().Шрифт = ЗачеркнутыйШрифт;
Есть два вида языков, одни постоянно ругают, а вторыми никто не пользуется.