Как открыть MS Word из 1С поверх других окон (на переднем плане)

07 Oct
Published by Nicholas

В продолжение материала «Пример работы с MS Word из 1С:Предприятие 8» хотелось бы поделиться следующим опытом.

Иногда (особенно это актуально для пользователей, которые работают через терминальное подключение к серверу), окно Microsoft Word открывается, но оказывается либо минимизированным, либо свернутым, либо окно 1С перекрывает его. Соответственно пользователь окно Word не видит.

Ниже  приведу два способа, позволяющие «выгнать» окно Word на передний план.

1. У объекта Application есть свойство WindowState, которое возвращает или устанавливает состояние окна документа, которое может принимать три значения: Normal, Maximized и Minimized (в значениях 1С - это 0, 1 и 2 соответственно). Суть данного способа сводится к тому, чтобы свернуть и снова развернуть окно.

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

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

Оболочка = Новый COMОбъект("Shell.Application");
Оболочка.MinimizeAll();
ОбъектВорд.Visible = -1;
Окна = Документ.Windows;
Для Сч = 1 По Окна.Count Цикл
    Окно = Окна.Item(Сч);
    Окно.WindowState = 1;
КонецЦикла;
ОбъектВорд.Activate();

Тэги 

1С 8

Комментарии

Аватар пользователя Владимир

Спасибо. Помогло.

Аватар пользователя Даниил

Спасибо, работает

Аватар пользователя hcivorteP

Спасибо

Аватар пользователя Riky

Thanks!

Аватар пользователя Илья

Большие спасибо!

Аватар пользователя 1111

Спасибо, то что надо))

Аватар пользователя Nicholas

Пожалуйста)

Аватар пользователя Анна 19

Спасибо большое! Класс.

Аватар пользователя Лёня

Спасибо! Работает.
А то ...Application.Visible = Истина;
....Activate(); и прочее было безуспешно.

Аватар пользователя Евгений

Спасибо!

Аватар пользователя Благодарственный

Отлично! Помогла, раельно! Кучу форумов пересмотрел. А первый вариант сработал!

Аватар пользователя Игорь

Супер! Спасибо)

Добавить комментарий

Plain text

  • HTML-теги не обрабатываются и показываются как обычный текст
  • Строки и абзацы переносятся автоматически.
CAPTCHA
Вы человек или автоматическая спам-рассылка?
Target Image