Мопед не мой. Писал не я, а нанятый мною программист на Си.
Но использую на практике, поэтому делюсь с вами.
https://geniy1s.ru/developments-1s/adm-1s/zakrytie-navyazchivyh-okon-1s/
Надеюсь, не нарушаю никаких принципов 1С этой разработкой?

(48) ну с Дельфи у него общего как у опенофиса с мсофисом. т.е. местами имитирует, а местами различия очень даже заметные.

И где у Г1С определяется список того, что на может закрыть?

(52) шоб прогу дважды не запустили. Эта фишка бродила ещё по дельфийским фидошным конфам году в 1998

(55) синглтон чтоль?

И да напишите кто нить (38) утилиту трей "с обучением" какие окна закрывать.
Чтобы как uBlock Origin или AdBlock работала.

Левые окна не только в 1С есть, многий софт (от adobe например) тоже всякие окошки обновления/рекламы показывает.

Ну моя программа занимает 200кб в оперативной памяти, даже не представляю что будет, если я два экземпляра её без мьютекса запущу :)

(56) типа того. Только не на уровне проги, как у банды четырех, а на уровне работающего экземпляра ОС.

(57) А потом допилить ее до "Обновлятора 1С" ))

(60)+ И разрешить из 1С через http соединяться с этой прогой в трее и управлять чем то.
А потом и "плагины" туды ))

(54) +по текстовому файлу. понял.

я тоже так думал сделать, но потом забил хрен.

(58) В какой-то момент несуществующему хэндлу окна сообщение пошлёте. Ну и проц будут два процесса больше жрать чем один.

(58) Сделай свою прогу "полезным вирусом" который борется с тиранией 1С ))

(62) да. Там, кстати, коряво у него сделано - строки произвольной длины читаются из файла, а потом это копируется через strcpy в строку фиксированной длины 1024. Можно атаковать.

(46) Назови мне хоть одну причину, почему нужно использовать Паскаль вместо Си? Убогий язык, как по мне...
(47) сходи в статью и почитай. Там картинки с примерами есть. Новости и сообщения о бэкапе не закрывает, да. Ибо это не окна. Вернее, окна, но без заголовка, а определенного класса. Их сложно идентифицировать.
(49) это замечательно, но где ее можно заюзать? И где ты был, когда я гуглил эту программу для закрытия окон? ;-) Зато теперь любой желающий может зайти на мой сайт и скачать полезный инструмент.
(52) мьютекс использовал не я, а программист. Задача была - не запускать дважды. В принципе, да, можно было при старте по списку процессов пробежаться. Но я не стал придираться.
(54) в файле kwnd без расширения.
(57) ну пока они напишут, будь хардкорным и пиши руками заголовки в kwnd. :-) используй Au3info или подобные.
(58) моя занимает 472 килобайта в ОЗУ.
(62) простота - признак мастерства. ггг..
(65) пользователь сам себя что ли атаковать будет? ;-)

И где ты был, когда я гуглил? [x]

(66) >Назови мне хоть одну причину, почему нужно использовать Паскаль вместо Си? Убогий язык, как по мне...
Язык 1С не менее убогий, дело не в ЯП а в его возможностях, платформе, фреймворках, библиотеках.

Delphi/Lazarus на данный момент до сих пор остается отличной штукой, хотя уже есть ничуть не хуже.
Вот как раз C++ это убогий - и даже этот убогий ты не смог осилить.
Как впрочем и я не смог на достаточном уровне. Ибо нахрена учить суахили когда есть эсперанто.

(68) ""Язык 1С не менее убогий"" - не подходит определение, сравнивать его с каким-либо другим - бессмысленно, это объектно-ориентированный язык, и, слава богу, не нужно знать языков других для составления специфических алгоритмов на нём. Менее универсален, существует только в одной среде - это - ДА, но говорить об убогости - неуместно.

(66) Паскаль конечно убогий язык. Им ничего лизнуть нельзя.

Хе прикольная штука Rust

extern crate winapi;
extern crate user32;
use std::ffi::CString;

fn main() {
    println!("Hello, world!");
    let window_name = CString::new("hello-rust").unwrap();    
    unsafe {
        let h_wnd = user32::FindWindowA(std::ptr::null_mut(), window_name.as_ptr());
        user32::SendMessageA(h_wnd, winapi::WM_SYSCOMMAND, winapi::SC_CLOSE, 0);
    }
}

(71) и да я Rust 20 минут назад впервые поставил и попробовал

(72) Правильно. Go ты уже изучил. Можно приступать к Rust

(71) паскаль, жс и мфц в одной коробке?

(68) я на первой работе работал на BC++ и VC++. И че? Но не стоит устраивать холивар. Си просто изящнее Паскаля, примерно как JSON изящнее XML

(75) "Си просто изящнее Паскаля"
Мда. Был бы тут twit - я бы его на тебя поставил...

Полезная на мой взгляд программа. Гений как всегда на высоте.

(75) Извини но ты какую то хрень спорол.
Если ты "на первой работе работал на BC++ и VC++" то написать самому нечто вроде (0) полчаса максимум.
И неважно сколько лет прошло.

(75) А в институте ты не учился случайно?

(78) Такое может быть. У баб часто бывает. Институт закончила, замуж вышла и забыла всё нахер. Нет у человека интереса просто.

(80) Значит в институте не сами учились а натягивали глобус на сову.
Это полнейшая тупость несколько лет потратить в никуда, ради диплома который фактически не нужен.

(81)+ Возраст до 25 лет самый продуктивный для обучения и свершений.
Далее все становится сильно хуже и если не получить до 25 лет базу и не развить интеллект с памятью то дальше все. Только деградация с точки зрения физиология и вот такие "гении" которые лисапеды выдают как открытие.

(66) на мой взгляд, вариант с мьютексом как раз проще и изящнее, чем ковырять список процессов. Единственный недостаток мьютекса - то что это лишний объект который потребляет ресурсы системы - в нынешних условиях смешон.

+ (66) пользователь сам себя атаковать не будет, наверно. Но есть понятие - опасный и безопасный код. Когда вы можете в конфигурационные файлы или в поля ввода набить какой-нибудь херни и программа упадет или выполнит несанкционированное действие - это считается плохо

(82) Вот что ты совершил в 25? Я совершил самую большую глупость в жизни, например...

(0) у кого-то на "острове разума" каждый поц может ставить любую хрень на комп/сервер?

(85) пошёл в кодеры?

(85) Догадался бросить универ когда понял что это хрень и трата времени.

(87) Не, это раньше. Лет на 15..

(88) В 25 лет бросить универ - это надо постараться... У меня в 23 уже диплом был...

(89) c 10 лет кодил? Круто!!!

(90) бросил аспирантуру? Женился?

(90) В 3-й раз бросил )) К тому времени давно работал сисадмином и программистом

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

(93) Видели мы сисадминов в 25 лет....

(95) В 23 года в одиночку (ну кроме помощи знакомых/друзей) с нуля поднимал сетку на 200 компов и админил с dc (понятно что винда) и прочими железками.
Параллельно изучая программирование.

(96) Поддерживаю. Это сильно зависит от скорости обучения, от знания английского (сейчас это на порядок менее актуально), от количеств бухла и распределения времени.
В принципе сейчас можно сисадмином уже и в 15лет стать, я не говорю по топ-лэвел, где все очень сложно, но но 200 компов знаний может уже хватить.

(97) Сейчас это даже проще ибо нет есть в помощь с кучей ресурсов.
А тогда была жопа в 2002-2003 ибо диалап (редко редко и очень дорого был adsl) и ресуров в инете почти не было.
Приходилось книжки бумажные искать и читать а так же методом тыка.

(98)+ Вот это блин была как библия https://10.img.avito.st/1280x960/5722799310.jpg и подобные книги

(99)+ После нее это https://www.rulit.me/author/zaker-krejg/kompyuternye-seti-modernizaciya-poisk-neispravnostej-download-free-404059.html уже было фигней

Голосую, что полезная, потому что поставил себе и клиенту.
(78) ты знаешь, я в институте и вирусы писал на ASM. но программирование - это не велосипед. Если давно не писал, вспоминать долго и входить в курс. Зачем, если проще нанять спеца?
(77) спасибо, бро.
(79) случайно учился. БГУИР Минск
(84) возможно что и плохо, но ЛУЧШЕЕ - враг ХОРОШЕГО. Код открыт, перепиши, перекомпилируй, выложи у себя.
(85) я вот в 24 женился на ПЖ, бррррр....
(86) это больше для клиентского компа. Ну зачем каждый. Админ поставит, если надо.
(98) я последнее что по книжке изучал, было PHP+MYSQL. Ггг..

Странно. Человек сделал полезное дело, да еще и раздает нахаляву. А сразу столько хейтеров сбежалось. По мне - так не нравится программа - не ставь. В чем проблема то? А вот ко-то может быть о ней мечтал всю жизнь! Чтож, его тоже хейтить?

(102) Так на программу плевать всем, выкладчик программы (при том, он не её автор) фигура уж больно одиозная.

(103) а... типа пообщаться с известным человеком, постебаться, а заодно и приобщиться к нетленному? :)

(104) Это  да, Сирожа этакая глыба, матерый человечище.

(105) В свое время был вполне на уровне общем. А сейчас это слегка смешно выглядит на общем фоне.
Ну примерно как ливингстар если бы начал учить других и гордиться своей "гениальностью".

(106) Ну, у меня есть небольшая надежда, что всё это троллинг такой с его стороны. А если он всё это всерьёз, тогда печально всё с ним.

(107) Я тоже думал что троллинг а потом по ответам не сходится.
И печально не с ним а с текущим состоянием на рынке ИТ, в т.ч. с зарплатами.

(107) Может это старческий маразм. Человек Си++ забыл. Си++ учат лет 10 и до конца жизни забыть не могут, а этот взял и забыл.
Сел такой за клаву, вознес над ней руки "дай ка я щас напишу окнозакрывалку",  и Си++ забыл.

(109) >  взял и забыл.
Захотел было начать с "int main(int argc, char *argv[], char *envp[]);", но пальцы предательски вывели "Для Каждого Элемент Из Массив Цикл" (:

Хотя нет. Не вывели.

(109) помню я си, помню, но не использую на практике. О чем и пишу. Если ты 10 лет на 1с не попрограммируешь, чай написать программу за 5 минут не получится, да? Вот и я поэтому делегировал спецу

(111) Я больше 10 лет не писал на Java - но потребовалось и легко наваял. Странно да?

(112) Хотя плохой пример.

Вот лучше в (71) берется совершенно не знакомый язык (Rust) и вуаля через 20 минут готов набросок.
Если понадобится то еще полчаса-час и будет полный аналог проги на С++.

(111) > чай написать программу за 5 минут
Да ты же на форуме больше трындишь, чем эти "5 минут". А потом "ой, не получилось"

(111) неужели в гугле вечный бан ?
Зачем закрывать окна если можно обраткой сделать настройку что бы они больше не открывались.?

На работу не буду ставить (были-б исходники - тогда возможно), а дома... смысл, если у меня дома сервера нет.

(116) Нифига ты сказанул :)

(117) что не так-то?

(118) А сходи по ссылке в (0).

(118) По ссылке в (0) есть на исходники Си
В (43) исходники на паскале (это если на Си собрать не получится)
А про сервер я не знаю зачем ты написал.

(0) Подарил бы лучше программу для изменения заголовка окна на название ИБ

Я в принципе код подобной на AutoIT нашел, но она не всегда работает, а отлаживать там неудобно

(120) исходники - это другое дело, если задача заинтересует - посмотрю, если будет время.

(121) В 8.3 это делается пользователем за минуту.

(115) на любых клиентских базах, которые могут быть новые каждый день?

(115) Тут такое дело, бро. Пока нет идеального ТВОЕГО решение, используем хорошее МОЕ. ;-) Без обид.
(116) исходники по ссылке в (0), компилируй сколько душеньке угодно.
(122) на AutoIT не заработает, 1с игнорит команды АутоИТ и Аутохоткея на закрытие окон и посыл клавиши Esc.
(113) напомнило анекдот "Сосед говорит, что каждый месяц новую телку заваливает" "Ну так и вы говорите". Уверен, что твой случай не воспроизводится в основной массе, если не врешь.

(124) А конфигуратор?

(124) у меня нет лишней минуты, прости

(127) В конфигураторе такой возможности нет,если не снимать с поддержки.Да и не особо надо, все таки работа не идёт над многими базами одновременно.А при обновлении это вообще не критично.

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

(125) ну для УП есть на клиенте на сколько помню ПолучитьОкна() - можно пробежаться в цикле и нужные закрыть средствами 1с
(126) объясни как у тебя прога из бесконечного цикла выходит - while (1) ?

(131) не выходит она, снимают диспетчером задач. Чтобы выходила - это надо долбилку окон в отдельном треде гонять, а в основном делать скрытое главное окно, иконку в таскбаре и меню.

собственно, я думал, что так ему и сделают, но это, видать, уже других денег стоит

(133) Да на С++ это стоит отдельных денег в отличие от того же паскаля где просто пару компонент на форму кинуть

(127) От это было бы полезно да окно конфигуратора переименовать

(134) и на паскале не кинешь. Нужно будет ручками от TThread унаследоваться, если мы про VCL. Не знаю как в Лазарусе, но думаю, примерно также.

(136) Не надо просто TTimerThread на форму же у него простой код и взаимодействия нет с уи

(137) (133) да, я заказал себе по средственную программу (по средствам). ;-)
Ну и с вами поделился заодно.

я такие хреньки сам пишу.
вещи полезные.

(139) так ты не только пиши, но и делись. Толку то с того, что ты пишешь.

(137) TTimerThread - не помню такого, да и не гуглится. Наверно, имеется в виду TTimer. Можно и так, но насколько помню, использовать таймеры для подобных вещей считалось непрофессионально. Для бесконечных циклов всегда было принято делать отдельный тред, а внутри цикла для отдачи квантов времени системе либо использовать функции WaitFor...Object(s) - например если есть ввод-вывод, или использовать Sleep (), которая тоже отдает время простоя системе.

(135) (129) С конфигуратором проблема вообще не в необходимости переименовывать, а в том, что он, сука, словом "Конфигуратор" в начале всю плашку на панели задач занимает

(141) Подразумевал что нет проблем создать свой TTimerThread унаследовавшись от TThread и перекрыв Execute со Sleep внутри.
Есть готовые компоненты которые этот функционал предоставляют вроде бы.

отличная вещь в копилку
дешево и сердито

(144) В противовес "доступно и всерьез", ггг..
(142) я думаю надо курить в сторону ПО для создания нескольких десктопов, на каждом из которых размещается только 1С отдельного клиента.
Чтобы не путалось.

(142) вот-вот, иногда до десятка конфигураторов открыто, бывает такое )

Проверьте кто нить кому ни в лом
https://qna.habr.com/q/188751

Если пашет с переименованием конфигуратора и глюков нет то наваяю прогу

(147) WinSpy64.exe нормально с этим справляется. Можно глянуть что да как.

(121) faster
http://www.moolex.ru/main.php?page=Faster

(121) + под конкретную задачу есть http://catalog.mista.ru/public/462685/, но его не пробовал

(145) Как помогут несколько десктопов, если даже с одним конфигуратором не видно имя конфигурации?

А софтина то полезная.
вот только "закрытие" не всегда нужно, нужна настройка: закрывать или пищать.