Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Добавить кнопки на общую форму "ПечатьДокументов"

Помощь - Поиск - Пользователи - Календарь

Полная версия этой страницы: Добавить кнопки на общую форму "ПечатьДокументов"

Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.2 > Программирование обычных форм 1С 8.2 и не интерфейсной логики

Constantus

15.11.17, 9:33

Приветствую, форумчане!
"Управление торговлей 10.3", (Моби-С 5.5). "ABBYY Ukraine", 2003-2014 (2.3.20.1)

На общей форме "Печать документов" имеются кнопки: "Отправить по электронной почте" и "Сохранить как..."

Как можно добавить на эту форму кнопки "Печать", "Параметры страницы" и "Предварительный просмотр"?

salton

15.11.17, 10:22

Constantus @ Сегодня, 9:33 необходимо зарегистрироваться для просмотра ссылки ,
Очень просто. В конфигураторе, раздел ОбщиеФормы ищем "ПечатьДокументов". Выбираем кнопку (к примеру "Сохранить"), комбинация ctrl+c - ctrl+v добавляет нам рядом с кнопкой сохранить еще одну кнопку, устанавливаем ей нужную картинку а в модуле соответсвенно пишем необходимую процедуру вызываемую новой кнопкой

Constantus

15.11.17, 10:25

salton @ Сегодня, 13:22 необходимо зарегистрироваться для просмотра ссылки ,

Просто добавить кнопку можно... Нужен код, который позволит вывести на принтер, сделать предварительный просмотр и код для настройки печати (Параметры страницы)

Petre

15.11.17, 11:07

Constantus @ Сегодня, 11:25 необходимо зарегистрироваться для просмотра ссылки ,
Печать:

ТабличныйДокумент.Напечатать()

Constantus

15.11.17, 11:14

Petre @ Сегодня, 14:07 необходимо зарегистрироваться для просмотра ссылки ,

Понятно, спасибо... А как в общей форме "ПечатьДокументов" добавить кнопку "Параметры страницы"?

Код

ПечатныйДокумент.Напечатать();

Выводит на печать сразу.

Или какой код выводит на печать с возможностью выбора принтера?

Petre

15.11.17, 11:16

Constantus @ Сегодня, 12:14 необходимо зарегистрироваться для просмотра ссылки ,
Вы в СП заглянуть не хотите ли?

Цитата

ТабличныйДокумент (SpreadsheetDocument)
Напечатать (Print)
Синтаксис:

Напечатать(<ДиалогПечати>)
Параметры:

<ДиалогПечати> (необязательный)

Тип: РежимИспользованияДиалогаПечати.
Определяет необходимость показа диалога печати перед печатью.
Значение по умолчанию: НеИспользовать.

Constantus

15.11.17, 12:02

Petre @ Сегодня, 14:16 необходимо зарегистрироваться для просмотра ссылки ,

Да, спасибо, получилось...

А что на счет настроек Параметров страницы?

Petre

15.11.17, 12:32

Constantus @ Сегодня, 13:02 необходимо зарегистрироваться для просмотра ссылки ,
Стандартных средств нет. Только через

путем использования sendkeys например...

Constantus

15.11.17, 12:44

Petre @ Сегодня, 15:32 необходимо зарегистрироваться для просмотра ссылки ,

Да, сейчас копаю в этом направлении. Вроде сработал, но нужно автоматом как-то переводить на русскую раскладку...

Wrapper = Новый COMОбъект("DynamicWrapper");
Wrapper.Register("USER32.DLL", "ActivateKeyboardLayout", "i=ll", "f=s", "r=l");
Wrapper.Register("USER32.DLL", "LoadKeyboardLayout", "i=sl", "f=s", "r=l");
rus = Wrapper.LoadKeyboardLayout("00000419", 0);
Wrapper.ActivateKeyboardLayout(rus, 0);

wsh=Новый COMОбъект("WScript.Shell");
wsh.SendKeys("%фр");

Выдает ошибку

Цитата

{ОбщаяФорма.ПечатьДокументов.Форма(81)}: Ошибка при вызове конструктора (COMОбъект)
Wrapper = Новый COMОбъект("DynamicWrapper");
по причине:
-2147221005(0x800401F3): Недопустимая строка с указанием класса

Petre

15.11.17, 13:46

Constantus @ Сегодня, 13:44 необходимо зарегистрироваться для просмотра ссылки ,

WHSShell = Новый COMОбъект("WScript.Shell");
WHSShell.SendKeys("%");
WHSShell.SendKeys("~");
WHSShell.SendKeys("{DOWN 10}");
WHSShell.SendKeys("~");

Constantus

15.11.17, 15:35

Petre @ Сегодня, 16:46 необходимо зарегистрироваться для просмотра ссылки ,

А можно расшифровать этот код? Что за что отвечает?

Petre

15.11.17, 15:39

Constantus @ Сегодня, 16:35 необходимо зарегистрироваться для просмотра ссылки ,
Альт, ентер, стрелка вниз (10 раз), ентер.

Constantus

15.11.17, 15:44

Цитата(Petre @ 15.11.17, 18:39) необходимо зарегистрироваться для просмотра ссылки

Альт, ентер, стрелка вниз (10 раз), ентер.

Мда...

Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.