Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Неназначенных незавершенных заказов: 4
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )

> Добавить кнопки на общую форму "ПечатьДокументов"          
Constantus Подменю пользователя
сообщение 15.11.17, 9:33
Сообщение #1

Почти ветеран
******
Группа: Пользователи
Сообщений: 557
Спасибо сказали: 2 раз
Рейтинг: 2

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

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

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

salton Подменю пользователя
сообщение 15.11.17, 10:22
Сообщение #2

Говорящий
***
Группа: Пользователи
Сообщений: 92
Из: Полтава
Спасибо сказали: 24 раз
Рейтинг: 24

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

Constantus Подменю пользователя
сообщение 15.11.17, 10:25
Сообщение #3

Почти ветеран
******
Группа: Пользователи
Сообщений: 557
Спасибо сказали: 2 раз
Рейтинг: 2

salton @ Сегодня, 13:22 * ,

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

Petre Подменю пользователя
сообщение 15.11.17, 11:07
Сообщение #4

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2196
Из: Київ, Україна
Спасибо сказали: 517 раз
Рейтинг: 483

Constantus @ Сегодня, 11:25 * ,
Печать:
ТабличныйДокумент.Напечатать()


Signature
Допрацьовую:
- "Бухгалтерія для України 1.2";
- "Бухгалтерія для України 2.0";
- "Альфа-Авто: Автосалон+Автосервіс+Автозапчастини, українська версія".

Constantus Подменю пользователя
сообщение 15.11.17, 11:14
Сообщение #5

Почти ветеран
******
Группа: Пользователи
Сообщений: 557
Спасибо сказали: 2 раз
Рейтинг: 2

Petre @ Сегодня, 14:07 * ,

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

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


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

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


Petre Подменю пользователя
сообщение 15.11.17, 11:16
Сообщение #6

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2196
Из: Київ, Україна
Спасибо сказали: 517 раз
Рейтинг: 483

Constantus @ Сегодня, 12:14 * ,
Вы в СП заглянуть не хотите ли?
Цитата
ТабличныйДокумент (SpreadsheetDocument)
Напечатать (Print)
Синтаксис:

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

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

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


Signature
Допрацьовую:
- "Бухгалтерія для України 1.2";
- "Бухгалтерія для України 2.0";
- "Альфа-Авто: Автосалон+Автосервіс+Автозапчастини, українська версія".

Constantus Подменю пользователя
сообщение 15.11.17, 12:02
Сообщение #7

Почти ветеран
******
Группа: Пользователи
Сообщений: 557
Спасибо сказали: 2 раз
Рейтинг: 2

Petre @ Сегодня, 14:16 * ,

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

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

Petre Подменю пользователя
сообщение 15.11.17, 12:32
Сообщение #8

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2196
Из: Київ, Україна
Спасибо сказали: 517 раз
Рейтинг: 483

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


Signature
Допрацьовую:
- "Бухгалтерія для України 1.2";
- "Бухгалтерія для України 2.0";
- "Альфа-Авто: Автосалон+Автосервіс+Автозапчастини, українська версія".

Constantus Подменю пользователя
сообщение 15.11.17, 12:44
Сообщение #9

Почти ветеран
******
Группа: Пользователи
Сообщений: 557
Спасибо сказали: 2 раз
Рейтинг: 2

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
Сообщение #10

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2196
Из: Київ, Україна
Спасибо сказали: 517 раз
Рейтинг: 483

Constantus @ Сегодня, 13:44 * ,
WHSShell = Новый COMОбъект("WScript.Shell");
WHSShell.SendKeys("%");
WHSShell.SendKeys("~");
WHSShell.SendKeys("{DOWN 10}");
WHSShell.SendKeys("~");


Signature
Допрацьовую:
- "Бухгалтерія для України 1.2";
- "Бухгалтерія для України 2.0";
- "Альфа-Авто: Автосалон+Автосервіс+Автозапчастини, українська версія".

Спасибо сказали: Constantus,

Constantus Подменю пользователя
сообщение 15.11.17, 15:35
Сообщение #11

Почти ветеран
******
Группа: Пользователи
Сообщений: 557
Спасибо сказали: 2 раз
Рейтинг: 2

Petre @ Сегодня, 16:46 * ,

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

Petre Подменю пользователя
сообщение 15.11.17, 15:39
Сообщение #12

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2196
Из: Київ, Україна
Спасибо сказали: 517 раз
Рейтинг: 483

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


Signature
Допрацьовую:
- "Бухгалтерія для України 1.2";
- "Бухгалтерія для України 2.0";
- "Альфа-Авто: Автосалон+Автосервіс+Автозапчастини, українська версія".

Constantus Подменю пользователя
сообщение 15.11.17, 15:44
Сообщение #13

Почти ветеран
******
Группа: Пользователи
Сообщений: 557
Спасибо сказали: 2 раз
Рейтинг: 2

Цитата(Petre @ 15.11.17, 18:39) *
Альт, ентер, стрелка вниз (10 раз), ентер.


Мда... icon_beer17.gif 32541510.gif

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 20.01.18, 11:34
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!

Курсы валют: доллар США к гривне Курсы валют: евро к гривне Курсы валют: российский рубль к гривне