• Garrick
  • Восстановленный участник
  • На форуме с 30 мая 2005г.
  • Сообщений: 7
  • Спасибо: 0

Тема: Как сделать, чтоб проект запускался при открытии документа?

Нужно, чтобы моя программка запускалась при открытии файла (только одного конкретного). В offic'e я это делал так:
Private Sub Document_Open()
А как сделать в ACAD'e?

  • callisto
  • Восстановленный участник
  • На форуме с 17 июня 2004г.
  • Сообщений: 204
  • Спасибо: 0

Re: Как сделать, чтоб проект запускался при открытии документа?

"встроенный" в "конкретный" файл макрос
->ThisDrawing->Activate

  • Garrick
  • Восстановленный участник
  • На форуме с 30 мая 2005г.
  • Сообщений: 7
  • Спасибо: 0

Re: Как сделать, чтоб проект запускался при открытии документа?

Чего-то я не понял, как...
у меня есть макрос, записанный в project.dvb
Этот project.dvb подключен в исходный набор загружаемых приложений.
Как сделать, чтоб он автоматически запускался при открытии определенного файла?
Спасибо!

  • callisto
  • Восстановленный участник
  • На форуме с 17 июня 2004г.
  • Сообщений: 204
  • Спасибо: 0

Re: Как сделать, чтоб проект запускался при открытии документа?

тогда скажем по-другому...
есть два пути:
1. сделать проект (dvb) внедренным в "определенный файл", прописать обработчик события "Activate" у ThisDrawing, но при этом надо следить в обработчике за вызовами, т.к. "Activate" будет срабатывать при перемещении фокуса между документами;
2. прописать обработчик события "открытие документа" на AcadApplication.

  • Garrick
  • Восстановленный участник
  • На форуме с 30 мая 2005г.
  • Сообщений: 7
  • Спасибо: 0

Re: Как сделать, чтоб проект запускался при открытии документа?

Первый вариант не подойдет, т.к. документы макросом листаются неоднократно.
Как правильно "прописать обработчик события "открытие документа" на AcadApplication"? Что-то у меня не получается :(

  • callisto
  • Восстановленный участник
  • На форуме с 17 июня 2004г.
  • Сообщений: 204
  • Спасибо: 0

Re: Как сделать, чтоб проект запускался при открытии документа?

нужен свой класс "обертка" над акадом с переменной класса типа AcadApplication с "withevents" что-то типа того:
private withevents app as AcadApplication
в событии инициализации этого класса надо прописать:
set app = ThisDrawing.Application
тогда классу будут доступны все события AcadApplication.
но, естественно, сперва экземпляр этого класса должен быть создан... например при запуске какого-нибудь макроса...
и желательно прописать глобальную переменную типа "класса обертки", чтобы класс был всегда "активен"