Имя: Пароль:
1C
 
Мой гений дарит Вам программу для закрытия навязчивых окон 1С.
🠗 (mishaPH 19.05.2020 15:42)
0 Гений 1С
 
гуру
15.05.20
17:33
1. Поставлю себе, очень полезная программа 75% (3)
2. Ставить непонятно что на комп? А пин-код не надо? 25% (1)
3. Хрень забавная но бесполезная 0% (0)
4. Бесполезная поделка. 0% (0)
Всего мнений: 4

Мопед не мой. Писал не я, а нанятый мною программист на Си.
Но использую на практике, поэтому делюсь с вами.
https://geniy1s.ru/developments-1s/adm-1s/zakrytie-navyazchivyh-okon-1s/
Надеюсь, не нарушаю никаких принципов 1С этой разработкой?
1 Cyberhawk
 
15.05.20
17:35
Расширение бы лучше сделал
2 Гений 1С
 
гуру
15.05.20
17:36
(1) Расширение надо в каждую базу вставлять, а так один раз вставил в автозапуск и забыл.
3 Cyberhawk
 
15.05.20
17:38
(2) Подключение расширения при желании можно сделать через выполнение команды в cmd, на худой конец - спец. обработку по установке расширения в пользовательском режиме сваять и опять-таки ее из cmd запускать
4 Cyberhawk
 
15.05.20
17:38
Ну и расширение-то кроссплатформенно, в отличие от сабжа
5 Cyberhawk
 
15.05.20
17:39
Да еще и секундная задержка. Мрак.
6 Гений 1С
 
гуру
15.05.20
17:39
(3) Можно, но сложно. Зачем, если можно просто?
7 Гений 1С
 
гуру
15.05.20
17:40
(5) Ну это лучше, чем закрывать руками с утра 100500 окон
8 Cyberhawk
 
15.05.20
17:40
(6) Путаешь простоту с кустарной работой
9 Гений 1С
 
гуру
15.05.20
17:44
(8) Возможно, но я не перфекционист. Работает и ладно. Лучше чтобы хорошо работало СЕЙЧАС, чем идеально НИКОГДА
10 Злопчинский
 
15.05.20
17:50
(9) тоже правильно!
11 VladZ
 
15.05.20
17:59
(0) Да, реально уже бесят. Но тут, на мой взгляд, нужно решать концептуально: написать в фирму 1с, чтобы эти окошки не вываливались при старте.

Хочешь узнать, нужно ли обновление - нажми, бл*дь, кнопку!
Хочешь узнать какие-то новости - нажми, бл*дь, кнопку!

А то получается не программа, а ёлка новогодняя.
12 Гений 1С
 
гуру
15.05.20
17:59
(11) надеюсь это надо воспринимать как "Спасибо"? ;-)
13 VladZ
 
15.05.20
18:03
(12) На работе такое не поставишь.
А на домашнем компе нужно видеть, что будет происходить на компе пользователя.

Это всё, конечно, хорошо. Но устанавливать это я не буду.
14 Cyberhawk
 
15.05.20
18:37
(11) Кнопку никто нажимать не будет. Но сделать эти алерты помягче - через тот же центр уведомлений - однозначно стоит
15 Гений 1С
 
гуру
15.05.20
18:56
(13) почему не поставишь?
16 Garykom
 
гуру
15.05.20
19:11
(0) Слабо тоже самое на https://oscript.io/ сделать?

там можно свои пакеты делать и в один exe собрать да.
17 Гений 1С
 
гуру
15.05.20
19:13
(16) не интересно
18 Garykom
 
гуру
15.05.20
19:18
(17) Ты понимаешь что твой exe готовый с хз что внутри никто вменяемый не запустит у себя?
А скомпилить код на c++ ню ню
19 Гений 1С
 
гуру
15.05.20
19:19
(18) На чистом си. Ггг. Ну я же Гений 1С, мне можно доверять. Но хотите - компилируйте, выкладывайте у себя на сайтах, если вам больше доверяют.
20 Garykom
 
гуру
15.05.20
19:20
(18)+ Точнее не ню ню а кто может скомпилить то такую хрень простейшую написать никаких проблем нет.
Вот если ты это же не только под Windows но и для Linux с macOS покажешь :)
21 impulse9
 
15.05.20
19:20
(0) если там нет майнера, то никакой ты не гений )
22 Garykom
 
гуру
15.05.20
19:22
(19) На чистом Си ? Да ну?
file.seekg(0, std::ios::beg);
23 Garykom
 
гуру
15.05.20
19:25
(21) Не обязательно майнер сразу засовывать, достаточно чтобы стучался в инет и качал оттуда куда для выполнения
24 Garykom
 
гуру
15.05.20
19:25
(23) *код для выполнения
25 Гений 1С
 
гуру
15.05.20
19:26
(22) ггг... Пардон: Компилятоh bcc из пакета Embarcadero RAD (Berlin)
26 Garykom
 
гуру
15.05.20
19:28
(25) Эээ нескромный вопрос. Почем брал?
http://store.embarcadero.ru/catalog/rubric/32
27 Гений 1С
 
гуру
15.05.20
19:35
(26) Не в курсе. Писал для меня чувак. ;-)
28 Гений 1С
 
гуру
15.05.20
19:37
Попробуй GCC https://gcc.gnu.org/
29 Garykom
 
гуру
15.05.20
19:38
(28) У меня нет проблем скомпилить и легко могу это на go переписать или на lazarus только нафуя?
30 Гений 1С
 
гуру
15.05.20
19:40
(29) ну как тебе сказать, чтобы не обидеть. Есть многое на свете друг Горацио, что и не видно с первого зырка!
31 Garykom
 
гуру
15.05.20
19:40
32 Гений 1С
 
гуру
15.05.20
19:41
(31) Это к чему?
33 Garykom
 
гуру
15.05.20
19:43
(32) Это к тому что Lazarus бесплатен, ide с компилятором занимают мало места и код тоже прост и компактен.
Скомпилировать легко и просто было бы для желающих скачав готовый проект и убедившись что там нет лишнего.

И есть инструменты лучше чем C++ для подобных задач.

Короче вот вроде бы ты и полезную штуку сделал но через одно место и не сам.
34 Гений 1С
 
гуру
15.05.20
19:48
(33) Перепиши. Тут такой момент. Кому надо - скачают моё ЕКЗЕ. Кому надо - улучшат и перепишут. Если не надо - останется как есть, то бишь буду пользоваться только я.
35 v77
 
15.05.20
22:01
Вот на лазарусе то же самое. Только без мютекса(и так сойдет)


program wc;
{$mode objfpc}{$H+}
uses
  SysUtils,
  Classes,
  Windows;
const
  FileName = 'kwnd';
  Err1 =
    'Не найден файл "kwnd". Список заголовков окон должен быть записан в файле "kwnd"';
  Err2 =
    'Файл "kwnd" пуст. Список заголовков окон должен быть записан в файле "kwnd"';

procedure DoExit(s: string);
  var
    W, T: WideString;
  begin
    W := Utf8Decode(s);
    T := Utf8Decode('Ошибка');
    MessageBoxW(0, PWideChar(W), PWideChar(T), MB_OK);
    ExitProcess(1);
  end;

var
  list: TStringList;
  Timer: integer;
  s: string;
  hWnd: THandle;
begin
  list := TStringList.Create;
  if not FileExists(FileName) then
    DoExit(Err1);
  list.LoadFromFile(FileName);
  if list.Count = 0 then
    DoExit(Err2);
  Timer := 1000;
  if ParamCount > 0 then
  begin
    if TryStrToInt(ParamStr(1), Timer) then
      Timer *= 1000;
  end;
  while True do
  begin
    for s in list do
    begin
      hWnd := FindWindow(nil, PChar(s));
      if (IsWindow(hWnd)) then
        SendMessage(hWnd, WM_SYSCOMMAND, SC_CLOSE, 0);
    end;
    Sleep(Timer);
  end;
  list.Free;
end.  
36 Gimalaj
 
15.05.20
22:31
(34) >> то бишь буду пользоваться только я
Ты не одинок. Я тоже буду :)
37 mikecool
 
15.05.20
22:50
(0) что-то, Серега, в последнее время мало ты нам даришь...
и впрямь - основной возраст для свершений и подвигов до 25, а потом только почивание на лаврах
38 Garykom
 
гуру
15.05.20
23:26
(35) Кстати идея то неплоха.

Сделать утилиту в трей по типу баннерезки.
Суть что появилось левое окно - тыкаем в трей, там список всех окон, выбираем которое резать и опс оно добавлено в файлик для закрытия в цикле.
39 Волшебник
 
модератор
16.05.20
00:01
(37) дык и этот мопед не его
40 Гений 1С
 
гуру
16.05.20
10:48
(39) мой не мой, какая разница. Важен результат
41 Гений 1С
 
гуру
16.05.20
10:51
(37) дарю сейчас больше себе. Здоровый эгоизм
42 v77
 
16.05.20
11:16
(38) Да мне как то фиолетово на это всё. Потратить за день пару кликов мышкой не так накладно. Раньше бесило, а шас как то привык на автомате закрывать сразу.
43 v77
 
16.05.20
12:37
Вот подшаманил немножко

Содержимое скопировать в файл wc.lpr
Скачать и установить FreePascal https://sourceforge.net/projects/freepascal/files/Win32/3.0.4/fpc-3.0.4.i386-win32.exe/download
Открыть консоль. Перейти в папку, где лежит wc.lpr. Выполнить fpc wc.lpr
wc.o можно удалить

program wc;
{$apptype gui}
{$mode objfpc}{$H+}
{$codepage UTF8}
uses
  SysUtils,
  Classes,
  Windows;

const
  FileName = 'kwnd';
  Err2: unicodestring =
    'Файл "kwnd" пуст. Список заголовков окон должен быть записан в файле "kwnd"';
  Err: unicodestring = 'Ошибка';

  procedure DoExit(s: UnicodeString);
  begin
    MessageBoxW(0, PWideChar(s), PWideChar(Err), MB_OK);
    ExitProcess(1);
  end;

var
  list: TStringList;
  ww: array of UnicodeString;
  Timer: integer;
  w: UnicodeString;
  hWnd: THandle;
begin
  list := TStringList.Create;
  if not FileExists(FileName) then
    begin
        list.Add('Информация - Бухгалтерия предприятия, редакция 3.0');
        list.Add('Рекомендуется обновить версию конфигурации');
        //list.Add('Запуск 1С:Предприятия');
        list.SaveToFile(FileName);
    end else
  list.LoadFromFile(FileName);
  if list.Count = 0 then
    DoExit(Err2);
  for w in list do
  begin
    setlength(ww, length(ww) + 1);
    ww[length(ww) - 1] := w;
  end;
  list.Free;
  Timer := 1000;
  if ParamCount > 0 then
  begin
    if TryStrToInt(ParamStr(1), Timer) then
      Timer *= 1000;
  end;
  while True do
  begin
    for w in ww do
    begin
      hWnd := FindWindowW(nil, PWideChar(w));
      if (IsWindow(hWnd)) then
        SendMessage(hWnd, WM_SYSCOMMAND, SC_CLOSE, 0);
    end;
    Sleep(Timer);
  end;
end.

44 Гений 1С
 
гуру
16.05.20
12:55
(43) Ого, Паскаль. Он еще жив? ;-) Дельфи-стайл, вау-вау. ;-)
(42) знаешь, как копейка бережет рубль, так и клик бережет час.
45 Злопчинский
 
16.05.20
13:05
а что там такое Лазарус и Киликс? это же что-то типа Делфей?
46 spectre1978
 
16.05.20
13:25
(45) кайликс это Дельфи и есть, только кросс-платформеная. Вернее была, потому что сейчас, кажется, этот проект переродился во что-то другое у эмбаркадеро. А лазарус это свободный софт по мотивам Дельфи, написанный с применением компилятора фрипаскаль и своей библиотеки визуальных компонентов, похожей на VCL.
47 Dmitry1c
 
16.05.20
13:30
(0) какие окна-то закрывает?

я тоже такую писал, моя закрывает оповещения, но новости закрыть не может
48 Garykom
 
гуру
16.05.20
13:31
(45) Это бесплатный кроссплатформенный дельфи https://www.lazarus-ide.org/
Даже под Android c iOS можно писать - но не нужно.
Для декстопных/консольных утилит подходит идеально.
49 Dmitry1c
 
16.05.20
13:32
namesToKill.push_back((LPCSTR)"Подключение Интернет-поддержки");
    namesToKill.push_back((LPCSTR)"Новые сообщения для расшифровки по 1С-Отчетности");
    //namesToKill.push_back((LPCSTR)"Напоминания");
    namesToKill.push_back((LPCSTR)"Рекомендуется обновить версию конфигурации");
    namesToKill.push_back((LPCSTR)"Обновление модуля документооборота с контролирующими органами");
    namesToKill.push_back((LPCSTR)"1C-Отчетность - отчетность прямо из 1С!");
    namesToKill.push_back((LPCSTR)"Проверка правомерности использования конфигурации");
    namesToKill.push_back((LPCSTR)"1С-Отчетность");

    vector<LPCSTR> namesToKillByName;
    namesToKillByName.push_back((LPCSTR)"V8ConfirmationWindowTaxi");
    namesToKillByName.push_back((LPCSTR)"V8NotificationWindow");
    namesToKillByName.push_back((LPCSTR)"V8StateDlg");

моя вот это умеет закрывать
50 spectre1978
 
16.05.20
13:32
(47) 1совские. Что есть обновление, информационный блок при начале работы, вот это вот все. В (0) по ссылке написано.
51 Garykom
 
гуру
16.05.20
13:33
(48)+ Кому интересно то есть отличный шаблон ВК на Lazarus
https://github.com/Zawullon/fpnativeapi
52 Dmitry1c
 
16.05.20
13:34
Я не понял, а зачем Г1С использовал мьютекс?
53 spectre1978
 
16.05.20
13:34
(48) ну с Дельфи у него общего как у опенофиса с мсофисом. т.е. местами имитирует, а местами различия очень даже заметные.
54 Dmitry1c
 
16.05.20
13:35
И где у Г1С определяется список того, что на может закрыть?
55 spectre1978
 
16.05.20
13:36
(52) шоб прогу дважды не запустили. Эта фишка бродила ещё по дельфийским фидошным конфам году в 1998
56 Dmitry1c
 
16.05.20
13:36
(55) синглтон чтоль?
57 Garykom
 
гуру
16.05.20
13:36
И да напишите кто нить (38) утилиту трей "с обучением" какие окна закрывать.
Чтобы как uBlock Origin или AdBlock работала.

Левые окна не только в 1С есть, многий софт (от adobe например) тоже всякие окошки обновления/рекламы показывает.
58 Dmitry1c
 
16.05.20
13:37
Ну моя программа занимает 200кб в оперативной памяти, даже не представляю что будет, если я два экземпляра её без мьютекса запущу :)
59 spectre1978
 
16.05.20
13:38
(56) типа того. Только не на уровне проги, как у банды четырех, а на уровне работающего экземпляра ОС.
60 Garykom
 
гуру
16.05.20
13:38
(57) А потом допилить ее до "Обновлятора 1С" ))
61 Garykom
 
гуру
16.05.20
13:39
(60)+ И разрешить из 1С через http соединяться с этой прогой в трее и управлять чем то.
А потом и "плагины" туды ))
62 Dmitry1c
 
16.05.20
13:41
(54) +по текстовому файлу. понял.

я тоже так думал сделать, но потом забил хрен.
63 spectre1978
 
16.05.20
13:47
(58) В какой-то момент несуществующему хэндлу окна сообщение пошлёте. Ну и проц будут два процесса больше жрать чем один.
64 Garykom
 
гуру
16.05.20
13:50
(58) Сделай свою прогу "полезным вирусом" который борется с тиранией 1С ))
65 spectre1978
 
16.05.20
13:50
(62) да. Там, кстати, коряво у него сделано - строки произвольной длины читаются из файла, а потом это копируется через strcpy в строку фиксированной длины 1024. Можно атаковать.
66 Гений 1С
 
гуру
16.05.20
15:18
(46) Назови мне хоть одну причину, почему нужно использовать Паскаль вместо Си? Убогий язык, как по мне...
(47) сходи в статью и почитай. Там картинки с примерами есть. Новости и сообщения о бэкапе не закрывает, да. Ибо это не окна. Вернее, окна, но без заголовка, а определенного класса. Их сложно идентифицировать.
(49) это замечательно, но где ее можно заюзать? И где ты был, когда я гуглил эту программу для закрытия окон? ;-) Зато теперь любой желающий может зайти на мой сайт и скачать полезный инструмент.
(52) мьютекс использовал не я, а программист. Задача была - не запускать дважды. В принципе, да, можно было при старте по списку процессов пробежаться. Но я не стал придираться.
(54) в файле kwnd без расширения.
(57) ну пока они напишут, будь хардкорным и пиши руками заголовки в kwnd. :-) используй Au3info или подобные.
(58) моя занимает 472 килобайта в ОЗУ.
(62) простота - признак мастерства. ггг..
(65) пользователь сам себя что ли атаковать будет? ;-)
67 acht
 
16.05.20
15:25
И где ты был, когда я гуглил? [x]
68 Garykom
 
гуру
16.05.20
15:49
(66) >Назови мне хоть одну причину, почему нужно использовать Паскаль вместо Си? Убогий язык, как по мне...
Язык 1С не менее убогий, дело не в ЯП а в его возможностях, платформе, фреймворках, библиотеках.

Delphi/Lazarus на данный момент до сих пор остается отличной штукой, хотя уже есть ничуть не хуже.
Вот как раз C++ это убогий - и даже этот убогий ты не смог осилить.
Как впрочем и я не смог на достаточном уровне. Ибо нахрена учить суахили когда есть эсперанто.
69 aka AMIGO
 
16.05.20
15:54
(68) ""Язык 1С не менее убогий"" - не подходит определение, сравнивать его с каким-либо другим - бессмысленно, это объектно-ориентированный язык, и, слава богу, не нужно знать языков других для составления специфических алгоритмов на нём. Менее универсален, существует только в одной среде - это - ДА, но говорить об убогости - неуместно.
70 v77
 
16.05.20
16:07
(66) Паскаль конечно убогий язык. Им ничего лизнуть нельзя.
71 Garykom
 
гуру
16.05.20
16:24
Хе прикольная штука 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);
    }
}
72 Garykom
 
гуру
16.05.20
16:25
(71) и да я Rust 20 минут назад впервые поставил и попробовал
73 v77
 
16.05.20
16:51
(72) Правильно. Go ты уже изучил. Можно приступать к Rust
74 ДенисЧ
 
16.05.20
16:54
(71) паскаль, жс и мфц в одной коробке?
75 Гений 1С
 
гуру
16.05.20
16:56
(68) я на первой работе работал на BC++ и VC++. И че? Но не стоит устраивать холивар. Си просто изящнее Паскаля, примерно как JSON изящнее XML
76 ДенисЧ
 
16.05.20
17:06
(75) "Си просто изящнее Паскаля"
Мда. Был бы тут twit - я бы его на тебя поставил...
77 Besogonskiy
 
16.05.20
17:11
Полезная на мой взгляд программа. Гений как всегда на высоте.
78 Garykom
 
гуру
16.05.20
17:28
(75) Извини но ты какую то хрень спорол.
Если ты "на первой работе работал на BC++ и VC++" то написать самому нечто вроде (0) полчаса максимум.
И неважно сколько лет прошло.
79 v77
 
16.05.20
18:05
(75) А в институте ты не учился случайно?
80 v77
 
16.05.20
18:11
(78) Такое может быть. У баб часто бывает. Институт закончила, замуж вышла и забыла всё нахер. Нет у человека интереса просто.
81 Garykom
 
гуру
16.05.20
18:18
(80) Значит в институте не сами учились а натягивали глобус на сову.
Это полнейшая тупость несколько лет потратить в никуда, ради диплома который фактически не нужен.
82 Garykom
 
гуру
16.05.20
18:21
(81)+ Возраст до 25 лет самый продуктивный для обучения и свершений.
Далее все становится сильно хуже и если не получить до 25 лет базу и не развить интеллект с памятью то дальше все. Только деградация с точки зрения физиология и вот такие "гении" которые лисапеды выдают как открытие.
83 NorthWind
 
16.05.20
18:22
(66) на мой взгляд, вариант с мьютексом как раз проще и изящнее, чем ковырять список процессов. Единственный недостаток мьютекса - то что это лишний объект который потребляет ресурсы системы - в нынешних условиях смешон.
84 NorthWind
 
16.05.20
18:25
+ (66) пользователь сам себя атаковать не будет, наверно. Но есть понятие - опасный и безопасный код. Когда вы можете в конфигурационные файлы или в поля ввода набить какой-нибудь херни и программа упадет или выполнит несанкционированное действие - это считается плохо
85 ДенисЧ
 
16.05.20
18:29
(82) Вот что ты совершил в 25? Я совершил самую большую глупость в жизни, например...
86 rphosts
 
16.05.20
18:30
(0) у кого-то на "острове разума" каждый поц может ставить любую хрень на комп/сервер?
87 rphosts
 
16.05.20
18:31
(85) пошёл в кодеры?
88 Garykom
 
гуру
16.05.20
18:32
(85) Догадался бросить универ когда понял что это хрень и трата времени.
89 ДенисЧ
 
16.05.20
18:32
(87) Не, это раньше. Лет на 15..
90 ДенисЧ
 
16.05.20
18:34
(88) В 25 лет бросить универ - это надо постараться... У меня в 23 уже диплом был...
91 rphosts
 
16.05.20
18:34
(89) c 10 лет кодил? Круто!!!
92 rphosts
 
16.05.20
18:34
(90) бросил аспирантуру? Женился?
93 Garykom
 
гуру
16.05.20
18:35
(90) В 3-й раз бросил )) К тому времени давно работал сисадмином и программистом
94 ДенисЧ
 
16.05.20
18:38
(93) Ну, у меня это был уже второй красный )))
(92) аспирантуру? У меня есть борода, но это не значит, что...
95 ДенисЧ
 
16.05.20
18:38
(93) Видели мы сисадминов в 25 лет....
96 Garykom
 
гуру
16.05.20
18:43
(95) В 23 года в одиночку (ну кроме помощи знакомых/друзей) с нуля поднимал сетку на 200 компов и админил с dc (понятно что винда) и прочими железками.
Параллельно изучая программирование.
97 Djelf
 
16.05.20
18:50
(96) Поддерживаю. Это сильно зависит от скорости обучения, от знания английского (сейчас это на порядок менее актуально), от количеств бухла и распределения времени.
В принципе сейчас можно сисадмином уже и в 15лет стать, я не говорю по топ-лэвел, где все очень сложно, но но 200 компов знаний может уже хватить.
98 Garykom
 
гуру
16.05.20
18:53
(97) Сейчас это даже проще ибо нет есть в помощь с кучей ресурсов.
А тогда была жопа в 2002-2003 ибо диалап (редко редко и очень дорого был adsl) и ресуров в инете почти не было.
Приходилось книжки бумажные искать и читать а так же методом тыка.
99 Garykom
 
гуру
16.05.20
18:55
(98)+ Вот это блин была как библия https://10.img.avito.st/1280x960/5722799310.jpg и подобные книги
100 Garykom
 
гуру
16.05.20
18:57
101 Гений 1С
 
гуру
16.05.20
20:59
Голосую, что полезная, потому что поставил себе и клиенту.
(78) ты знаешь, я в институте и вирусы писал на ASM. но программирование - это не велосипед. Если давно не писал, вспоминать долго и входить в курс. Зачем, если проще нанять спеца?
(77) спасибо, бро.
(79) случайно учился. БГУИР Минск
(84) возможно что и плохо, но ЛУЧШЕЕ - враг ХОРОШЕГО. Код открыт, перепиши, перекомпилируй, выложи у себя.
(85) я вот в 24 женился на ПЖ, бррррр....
(86) это больше для клиентского компа. Ну зачем каждый. Админ поставит, если надо.
(98) я последнее что по книжке изучал, было PHP+MYSQL. Ггг..

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

Поставлю себе, очень полезная программа
103 Комрад1
 
16.05.20
21:13
(102) Так на программу плевать всем, выкладчик программы (при том, он не её автор) фигура уж больно одиозная.
104 Dimma
 
16.05.20
21:22
(103) а... типа пообщаться с известным человеком, постебаться, а заодно и приобщиться к нетленному? :)
105 Комрад1
 
16.05.20
21:24
(104) Это  да, Сирожа этакая глыба, матерый человечище.
106 Garykom
 
гуру
16.05.20
21:26
(105) В свое время был вполне на уровне общем. А сейчас это слегка смешно выглядит на общем фоне.
Ну примерно как ливингстар если бы начал учить других и гордиться своей "гениальностью".
107 Комрад1
 
16.05.20
21:30
(106) Ну, у меня есть небольшая надежда, что всё это троллинг такой с его стороны. А если он всё это всерьёз, тогда печально всё с ним.
108 Garykom
 
гуру
16.05.20
21:35
(107) Я тоже думал что троллинг а потом по ответам не сходится.
И печально не с ним а с текущим состоянием на рынке ИТ, в т.ч. с зарплатами.
109 v77
 
16.05.20
21:37
(107) Может это старческий маразм. Человек Си++ забыл. Си++ учат лет 10 и до конца жизни забыть не могут, а этот взял и забыл.
Сел такой за клаву, вознес над ней руки "дай ка я щас напишу окнозакрывалку",  и Си++ забыл.
110 acht
 
16.05.20
21:42
(109) >  взял и забыл.
Захотел было начать с "int main(int argc, char *argv[], char *envp[]);", но пальцы предательски вывели "Для Каждого Элемент Из Массив Цикл" (:

Хотя нет. Не вывели.
111 Гений 1С
 
гуру
16.05.20
22:03
(109) помню я си, помню, но не использую на практике. О чем и пишу. Если ты 10 лет на 1с не попрограммируешь, чай написать программу за 5 минут не получится, да? Вот и я поэтому делегировал спецу
112 Garykom
 
гуру
16.05.20
22:07
(111) Я больше 10 лет не писал на Java - но потребовалось и легко наваял. Странно да?
113 Garykom
 
гуру
16.05.20
22:09
(112) Хотя плохой пример.

Вот лучше в (71) берется совершенно не знакомый язык (Rust) и вуаля через 20 минут готов набросок.
Если понадобится то еще полчаса-час и будет полный аналог проги на С++.
114 acht
 
16.05.20
22:16
(111) > чай написать программу за 5 минут
Да ты же на форуме больше трындишь, чем эти "5 минут". А потом "ой, не получилось"
115 dangerouscoder
 
16.05.20
23:02
(111) неужели в гугле вечный бан ?
Зачем закрывать окна если можно обраткой сделать настройку что бы они больше не открывались.?
116 rphosts
 
17.05.20
06:50
На работу не буду ставить (были-б исходники - тогда возможно), а дома... смысл, если у меня дома сервера нет.

Ставить непонятно что на комп? А пин-код не надо?
117 v77
 
17.05.20
06:55
(116) Нифига ты сказанул :)
118 rphosts
 
17.05.20
06:57
(117) что не так-то?
119 bolder
 
17.05.20
06:59
(118) А сходи по ссылке в (0).
120 v77
 
17.05.20
07:03
(118) По ссылке в (0) есть на исходники Си
В (43) исходники на паскале (это если на Си собрать не получится)
А про сервер я не знаю зачем ты написал.
121 Надо работать
 
17.05.20
07:08
(0) Подарил бы лучше программу для изменения заголовка окна на название ИБ
122 Надо работать
 
17.05.20
07:10
Я в принципе код подобной на AutoIT нашел, но она не всегда работает, а отлаживать там неудобно
123 rphosts
 
17.05.20
07:18
(120) исходники - это другое дело, если задача заинтересует - посмотрю, если будет время.
124 bolder
 
17.05.20
07:22
(121) В 8.3 это делается пользователем за минуту.
125 spectre1978
 
17.05.20
08:36
(115) на любых клиентских базах, которые могут быть новые каждый день?
126 Гений 1С
 
гуру
17.05.20
09:24
(115) Тут такое дело, бро. Пока нет идеального ТВОЕГО решение, используем хорошее МОЕ. ;-) Без обид.
(116) исходники по ссылке в (0), компилируй сколько душеньке угодно.
(122) на AutoIT не заработает, 1с игнорит команды АутоИТ и Аутохоткея на закрытие окон и посыл клавиши Esc.
(113) напомнило анекдот "Сосед говорит, что каждый месяц новую телку заваливает" "Ну так и вы говорите". Уверен, что твой случай не воспроизводится в основной массе, если не врешь.
127 Cyberhawk
 
17.05.20
10:49
(124) А конфигуратор?
128 Гений 1С
 
гуру
17.05.20
11:22
(124) у меня нет лишней минуты, прости
129 bolder
 
17.05.20
11:25
(127) В конфигураторе такой возможности нет,если не снимать с поддержки.Да и не особо надо, все таки работа не идёт над многими базами одновременно.А при обновлении это вообще не критично.
130 Гений 1С
 
гуру
17.05.20
11:27
(129) ну я заманался если честно. Я порой работаю над тремя проектами. Отойдешь на часик - уже все в окнах спама от 1С.
131 dangerouscoder
 
17.05.20
11:53
(125) ну для УП есть на клиенте на сколько помню ПолучитьОкна() - можно пробежаться в цикле и нужные закрыть средствами 1с
(126) объясни как у тебя прога из бесконечного цикла выходит - while (1) ?
132 NorthWind
 
17.05.20
12:37
(131) не выходит она, снимают диспетчером задач. Чтобы выходила - это надо долбилку окон в отдельном треде гонять, а в основном делать скрытое главное окно, иконку в таскбаре и меню.
133 NorthWind
 
17.05.20
12:38
собственно, я думал, что так ему и сделают, но это, видать, уже других денег стоит
134 Garykom
 
гуру
17.05.20
12:45
(133) Да на С++ это стоит отдельных денег в отличие от того же паскаля где просто пару компонент на форму кинуть
135 Garykom
 
гуру
17.05.20
12:47
(127) От это было бы полезно да окно конфигуратора переименовать
136 NorthWind
 
17.05.20
12:47
(134) и на паскале не кинешь. Нужно будет ручками от TThread унаследоваться, если мы про VCL. Не знаю как в Лазарусе, но думаю, примерно также.
137 Garykom
 
гуру
17.05.20
12:48
(136) Не надо просто TTimerThread на форму же у него простой код и взаимодействия нет с уи
138 Гений 1С
 
гуру
17.05.20
13:09
(137) (133) да, я заказал себе по средственную программу (по средствам). ;-)
Ну и с вами поделился заодно.
139 trdm
 
17.05.20
13:15
я такие хреньки сам пишу.
вещи полезные.
140 Гений 1С
 
гуру
17.05.20
13:17
(139) так ты не только пиши, но и делись. Толку то с того, что ты пишешь.
141 NorthWind
 
17.05.20
13:29
(137) TTimerThread - не помню такого, да и не гуглится. Наверно, имеется в виду TTimer. Можно и так, но насколько помню, использовать таймеры для подобных вещей считалось непрофессионально. Для бесконечных циклов всегда было принято делать отдельный тред, а внутри цикла для отдачи квантов времени системе либо использовать функции WaitFor...Object(s) - например если есть ввод-вывод, или использовать Sleep (), которая тоже отдает время простоя системе.
142 Cyberhawk
 
18.05.20
10:22
(135) (129) С конфигуратором проблема вообще не в необходимости переименовывать, а в том, что он, сука, словом "Конфигуратор" в начале всю плашку на панели задач занимает
143 Garykom
 
гуру
18.05.20
10:30
(141) Подразумевал что нет проблем создать свой TTimerThread унаследовавшись от TThread и перекрыв Execute со Sleep внутри.
Есть готовые компоненты которые этот функционал предоставляют вроде бы.
144 opus70
 
18.05.20
10:45
отличная вещь в копилку
дешево и сердито

Поставлю себе, очень полезная программа
145 Гений 1С
 
гуру
18.05.20
14:15
(144) В противовес "доступно и всерьез", ггг..
(142) я думаю надо курить в сторону ПО для создания нескольких десктопов, на каждом из которых размещается только 1С отдельного клиента.
Чтобы не путалось.
146 Надо работать
 
18.05.20
15:42
(142) вот-вот, иногда до десятка конфигураторов открыто, бывает такое )
147 Garykom
 
гуру
18.05.20
15:45
Проверьте кто нить кому ни в лом
https://qna.habr.com/q/188751

Если пашет с переименованием конфигуратора и глюков нет то наваяю прогу
148 trdm
 
18.05.20
16:24
(147) WinSpy64.exe нормально с этим справляется. Можно глянуть что да как.
149 dmt
 
18.05.20
18:26
150 dmt
 
18.05.20
18:28
(121) + под конкретную задачу есть http://catalog.mista.ru/public/462685/, но его не пробовал
151 Cyberhawk
 
19.05.20
15:38
(145) Как помогут несколько десктопов, если даже с одним конфигуратором не видно имя конфигурации?
152 trdm
 
18.06.20
12:31
А софтина то полезная.
вот только "закрытие" не всегда нужно, нужна настройка: закрывать или пищать.