Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / 1С [игнор отключен] [закрыт для гостей] / Сделать окно активным / 2 сообщений из 2, страница 1 из 1
15.06.2017, 18:03
    #39472587
Paganel677
Paganel677
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сделать окно активным
Создал процедуру выгрузки кое-чего в Word. Работает. Файл сохраняет. После окончания выгрузки из 1С этот новый файл открывается, всё отлично.

Но только вот сам Word на заднем плане, активно по-прежнему окно 1С. Как сделать активным окно Word?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.06.2017, 20:02
    #39476965
Владимир Лазурко
Владимир Лазурко
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сделать окно активным
http://mikuslas.ru/word_state 1. У объекта Application есть свойство WindowState, которое возвращает или устанавливает состояние окна документа, которое может принимать три значения: Normal, Maximized и Minimized (в значениях 1С - это 0, 1 и 2 соответственно). Суть данного способа сводится к тому, чтобы свернуть и снова развернуть окно.

Код: sql
1.
2.
3.
ОбъектВорд.Application.Visible = Истина;
ОбъектВорд.Application.WindowState = 2;
ОбъектВорд.Application.WindowState = 1;



2. Второй способ является продолжением первого, но в этом случае мы сворачиваем все активные окна и разворачиваем все имеющиеся окна MS Word.

Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
Оболочка = Новый COMОбъект("Shell.Application");
Оболочка.MinimizeAll();
ОбъектВорд.Visible = -1;
Окна = Документ.Windows;
Для Сч = 1 По Окна.Count Цикл
    Окно = Окна.Item(Сч);
    Окно.WindowState = 1;
КонецЦикла;
ОбъектВорд.Activate();
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / 1С [игнор отключен] [закрыт для гостей] / Сделать окно активным / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]