Как свернуть все активные окна (все открытые формы документов, журналов, обработок и.т.д)?
Помните добрый Windows внизу у кнопки пуска замечательная кнопка "Свернуть все окна"
Кажется есть стандартное меню Окна - но там только Закрыть, Закрыть все... , а вот свернуть нет.

Зачем : просто интересно решение данного вопроса.

Тема - не вопрос, а обсуждение, какой способ вы предложили ?

в УФ проще, там есть коллекция "Открытые окна", можно обойти все и минимизировать)

открытые формы

(1) + ПолучитьОкна();

(1)Знаю. поэтому и выделил в теме (обычное приложение)

просто на днях увидел ситуацию
- одно подающее надежды дарование
в каждую !!! форму вставлял свой код
чтобы при открытии добавить в массив
и потом если нужно это дело перебрать
(парнишка неделю этим бредил)

есть решение - более оптимальное :-)

>>в каждую !!! форму вставлял свой код
есть более оптимальное, вставить это в общий модуль работа с диалогами, в типовых туда всегда при открытии ходит

таже УстановитьЗаголовокДокумента

(5,6) еще проще есть решение :-)

+(7) не меняю конфигурацию !

(8) какое

есть, ЗавершитьработуСистемы() :)

(9) будет сотка напишу (просто реально интересно мнение и обсуждение)
если вам поставили бы такую задачу
что бы вы сделали.
Вот хочет босс - одним нажатием кнопки свернуть все окна не закрывая 1С

"Автоматически прятать"?

Set Shell = CreateObject("Shell.Application")
Shell.MinimizeAll
Set Shell = Nothing

(13) без использования скриптов и сторонних ВК

(12) кого ? все формы ?

(14) Тож самое в 1С можно сделать. COM-объект.

(16) чего сделать ? поясни мысль

Процедура КнопкаВыполнитьНажатие(Кнопка)
   Shell = Новый COMОбъект("Shell.Application");
   Shell.MinimizeAll ();
КонецПроцедуры

(11) Ладно, у тебя пиписька самая длинная - вот и померялись, теперь выкладывай свой вариант

почетные 23 см.

(18) это классно !!!, но через чур :-)
окно то 1С сворачивать не нужно
(19) Это и не оспаривалось.
Выложу чуть попозже. Как интерес угаснет

я понимаю что сейчас обед, но все же
варианты еще будут ?

(22) да всем пох на тараканов твоего босса и твое неудовлетворенное ЧСВ...

:)

(23) Я тебе уже сказал когда то что о тебе думаю. Оклиматизовался что ли ?
(если читать научился, постарайся теперь понять о чем пишут и кто пишет)

интереса к ветке нет 12 минут. так что выкладывай)

(26)я тебе в аську послал

обед закончился - свежие идеи есть ?

Подсмотрел картинку здесь: http://infostart.ru/public/122835/
И подумал, что можно сделать форму с галочкой "Режим рабочего стола" и запускать её при начале работы системы или что-то типа того. Правда, это не совсем сворачивание окон, т.к., если посмотреть свойство "СпособОтображенияОкна" у какой-нибудь несвернутой формы (перекрытой), то оно будет показывать Нормальное или Максимизированное.

Архив 13 кб.
http://narod.ru/disk/44551140001.6f2b89b3bd83767bc34530fecea65fb4/noallwindow.zip.html

в нем две обработки
СвернутьВсеОкна (8.2).epf
СвернутьВсеОкна (8.1).epf

Несуществующая страница

Страница, которую вы читаете, не существует.

(31) тоже самое

зеркало для (30)
http://zalil.ru/32968360

(33) Я угадал ))

(34) да - молодец. По картинке это видно.

А теперь о смешном:
Задача не моя и клиент не мой
но ТЗ звучало так : сделать кнопку что сворачивало великое множество окон
Бюджет : 3000 руб. Срок : 3 дня
Проект: закрыт.

//через день позвонил представитель заказчика
и спросил сколько вы хотите получить за ОТКРЫТЫЙ КОД
- ???
- ну у вас же поставка без искодного кода, а интересно бы посмотреть

(31) офф. чё-то вдумался в смысд фразы
"Страница, которую вы читаете, не существует."

как может не существовать страницы, если я её вот прямо сейчас читаю? может, меня тоже не существует?


яндекс жжОт

(35) Впиши в ПередОткрытием()
ЭтаФорма.РежимРабочегоСтола = Истина;
И продавай код )

(37)  )))) - нет, это страшная коммерческая тайна, разглашению не подлежит - хранить вечно.

Осторожнее со своими желаниями (с)

(37) Хотя, не, так не получится, в модуле приложения это свойство формы придется устанавливать.
А это уже конфигурация. Выходит, еще дороже...

(35) что ответил представителю?

(40) -> (37)

Оно же не сворачивает никакие окна. + не закрывается

(42) Не выспался ?
смотри название темы - Как программно "свернуть все" окна
(кавычки тебе не о чем не говорят ?)
Закрывается - правой кнопкой по экрану - появится меню - Закрыть

а кто цену поставил за решение и как эта цена определялась

решение конечно интересное, но более интересен вопрос с заказчиком

не понял насчёт УФ, там же SDI

(44)ГБ с 20 летним стажем - хозяйка одной конторы
(46) где написано про УФ

Ждем темы от автора, где он "удаление" файлов будет производить, рисуя белый квадрат поверх имени и выдавать это за решение

(47) (1) (4)

(48) зачёт

(47) ну ежели ГБ ставил, то порядок
и что, скажешь, что кода нет или отдашь решение своего протеже

(48)И тебе привет ! Ну что за манеры прочитать два последних поста и вставить свою непонятку ? Перезагрузись, уже утро !
где я что выдавал за решение ?
Тема соверщенно не об этом ?

(51)мне всегда был интересен неординарный подход к решению задачи
а не по шаблону (как в учебнике, как в типовой)?
Понятно что когда увидел готовый ответ, посмотрел как реализовано - 72% скажут да так и дурак сможет.

(52) Я прочитал всю тему. Мои манеры давай оставим в покое.

"где я что выдавал за решение"
см (7)

"Тема соверщенно не об этом"
Внезапно! А о чем?

(53) при чем здесь неординарный подход? Это тупо на$6алово ГБ, которое вынесли с помпой на обозрение.

(54) почему на$6алово
ГБ же сама цену выставили, с помпой своего 20-го стажа
типа я знаю сама какую цену надо ставить

тут просто риск большой, если ГБ поймёт, что облажалась, то начнёт стрематься по каждому ТЗ типа кодеры скрывают правду йоперный театр

(55) Ну я сгустил краски, ок. Для ГБ может это и то что нужно (не вижу окон - значит их нет). Но здесь программистам предложили решить задачу. С точки зрения программиста - это не решение. Не более чем шутка.

кстати, насчёт удаления файлов
винда так и делает, сшибает вхлам заголовок файла на диске
а пользователь по привычке думает, что байты файла обнулены

автор, скажи, ты ГБ знаешь, мы нет
ГБ, когда узнает, будет смеяться вместе с вами или покраснее, взъерошится и пойдёт искать другого подрядчика

(54) Тема о том , что любую задачу - можно решить великим множеством вариантов.
одно будет - по учебнику
другое - как учили
другое - как знаю
другое - как в типовой
другое - что новое
одно будет быстро работать, другое медленнее

Обсуждать (на понтах) каждый горазд
как бы ты решил поставленную задачу ?

(57) Да , именно так. То же самое что и фокус (иллюзия) вроде красиво, захватывает, а сами понимаем , что так не бывает

(57) почему не решение. винда же тоже перериросывает окна, она же их физически не сворачивает
так что автор сделал всё правильно, он просто перериросовал область

(48) В данном случае пользователю нужно по нажатию на кнопку увидеть чистый рабочий стол и не важно, как это будет происходить, будут окна реально сворачиваются или нет. Цель, в общем-то достигнута. И достигнута с минимальными трудозатратами.
Лично мне решение нравится ) Неординарностью подхода в том числе. Мне бы вот такое в голову не пришло, поставь передо мной кто-то такую задачу ) ВК наваял бы...

+5 к карме автора

А я смогу сделать ВК, которая в толстом клиенте реально свернет все окна :)
А в Конфигураторе со снегопатом 1.1.7.1 это уже сейчас реально сделать простым скриптом.

(62) Спасибо. Ты все правильно написал и только один предложил альтернативное решение.
http://forum.infostart.ru/forum24/topic57254/message635006/#message635006

Научить клиента нажать Альт-О-С

(64) о, ну ты вообще бог

(64)Несомневаюсь. Но как говорят в Одессе, это немного другие затраты по времени
(66)Проходи мимо (или сам попробуй это нажать) - нам не нужно Закрыть все окна - нам нужно их только "свернуть"

+(64)
Вот код для Конфигуратора для сворачивания всех окон:

function macrosСвернутьВсе()
{
   var views = windows.mdiView.enumChilds()
   for(var k = 0; k < views.count; k++)
       views.item(k).sendCommand("{c9d3c390-1eb4-11d5-bf52-0050bae2bc79}", 6)
}

Правда, даже на последней версии снегопата валит Конфигуратор, зато я нашел небольшую ошибку и в следующей версии - это будет работать.

(68)Научить пользователя.
Alt + Space, Затем С.

(70) Научись читать и понимать:
нужно программно свернуть все окна внутри одного приложения 1С
(твой вариант сворачивание основное окно приложения)

ОК.))) Это я для затравки. Однако в (4) ты хвастался, что есть оптимальное решение. Заинтриговал, но так и не сообщил аудитории.

(72) Сначала ещё раз внимательно и не спеша (71)
потом в (33)

(73)Спасибо за пояснения. У меня вопросов нет.