• GRF
  • Восстановленный участник
  • На форуме с 14 октября 2003г.
  • Сообщений: 292
  • Спасибо: 0

Тема: Как запустить Delphi-приложение так, что закрыть доступ к AutoCAD

Может быть кто знает, как запустить Delphi-приложение и перекрыть тем самым доступ к AutoCAD. Ведь в этом случае, собственного говоря, и события отслеживать не особо нужно (я имею ввиду события закрытия документа, смена активного документа, запуск команд и прочее).
Я пишу следуюющее:

procedure TForm1.FormCreate(Sender: TObject);
begin
  SetWindowPos(Form1.Handle, HWND_TopMost, Left, Top, Width, Height, swp_ShowWindow);
end;

Окно действительно появляется поверх всего и его практически ничем не перекрыть (только окном, запущенном в том же режиме). Но доступ к AutoCAD все равно остается (пусть даже и не очень удобный). В результате можно хорошо напакостить, а для предотвращения этого нужно отслеживать море событий, с которыми у меня проблема (см. https://www.caduser.ru/forum/topic7509.html).

  • serg
  • Восстановленный участник
  • На форуме с 21 февраля 2002г.
  • Сообщений: 67
  • Спасибо: 0

Re: Как запустить Delphi-приложение так, что закрыть доступ к AutoCAD

Не знаю, насколько правильно такое решение, но все же. Если средствами Windows Api попытаться скрыть окно Autocad? Конечно, для этого нужно найти это окно в системе, но если открытых окон немного, то можно и полным перебором по идентификатору класса.