|
0
Uragan_a
25.07.12
✎
16:33
|
Таб = Новый ТабличныйДокумент;
Таб.ИмяПараметровПечати = "ПАРАМЕТРЫ_ПЕЧАТИ_Этикетка"+СокрЛП(ИмяКомпьютера());
Макет = ПолучитьОбщийМакет("Этикетка");
ЭтикеткаОбласть = Макет.ПолучитьОбласть(1,1,4,4);
ОбластьНоменклатура = ЭтикеткаОбласть.Области.Номенклатура;
ОбластьШтрихкод = ЭтикеткаОбласть.Области.ОбластьШтрихкод;
РисунокШтрихкод = ЭтикеткаОбласть.Рисунки.Штрихкод;
ОбластьЦена = ЭтикеткаОбласть.Области.Цена;
ОбластьТест = ЭтикеткаОбласть.Области.Тест; //
Таб.Вывести(ОбластьТест); //
ОбластьНоменклатура.ВысотаСтроки = ВысотаЭтикетки * 2.65 * 0.3;
ОбластьШтрихкод.ВысотаСтроки = ВысотаЭтикетки * 2.65 * 0.5;
РисунокШтрихкод.Расположить(ОбластьШтрихкод);
ОбластьЦена.ВысотаСтроки = ВысотаЭтикетки * 2.65 * 0.2;
|
|