[dxaritonov]

Доброго времени суток. Заранее хочу извиниться за нубский вопрос.

Мне необходимо в программе, написанной на Delphi, перехватить событие из автокада. Связь делфи и автокада через COM-сервер.

Как я могу перехватить делфой событие в автокаде. В частности мне надо перехватить событие выделения примитива (полилинии).

Заранее благодарю

[Александр Ривилис]

AutoCAD 20XX Developer Help->ActiveX and VBA Reference->Events
В объектной модели (через COM) нет события выделения примитива - только через ObjectARX (т.е. только C++/C#/VB.NET внутри AutoCAD)
Если опишите задачу более подробно, то возможно найдется другой путь решения.

[dxaritonov]

Сообщение от Александр Ривилис AutoCAD 20XX Developer Help->ActiveX and VBA Reference->Events

В справке описаны примеры для VBA. Мне же нужно события автокада (object-level или document-level) перехватить делфой

Например, если нет события выделения примитива, то можно можно ловить событие OnEndCommand с проверкой, что команда была "Select" (или "Выбрать", это уже дело техники), во встроенной в автокад среде VBA мне удалось перехватить это событие, а вот как это сделать в делфи я не знаю

Может быть, вы сможете мне подсказать, какую литературу для этого надо почитать?
И еще такой вопрос: можно ли перехватывать события поздним связыванием, т.е. без импорта tlb-файла?

[Александр Ривилис]

Сообщение от dxaritonov то можно можно ловить событие OnEndCommand с проверкой, что команда была "Select" (или "Выбрать", это уже дело техники)

А еще куча команд AutoCAD'а позволяет выбирать примитивы (_COPY, _MOVE,...)

Сообщение от dxaritonov а вот как это сделать в делфи я не знаю

Я тоже, т.к. на нем не пишу.

P.S.: Посмотри здесь (ну и рядом)

[Дима_]

Терзают меня смутные сомнения что перехват событий это мякго говоря не есть предназначение com server'а. Я пока, даже, особо механизм себе не могу представить что должен делать com метод дабы "отреагировать" на событие - другому com'у что-то послать? com - он же "языконезависимый", а у каждого диалекта - свой метод обработки - реакторы, события, исключения и пр. Если только через определенный интервал какое-либо свойство сканировать на предмет вкл\выкл - но на сколько я знаю - если проверка нужна частая - то это мозго....ство, т.к. надо свободные дескрипторы освобождать, регулярно память подчищать - да и вообще стабильной работы (по крайней мере в "текущих" версиях винды) добиться вряд ли удастся. Так-что могу только предложить подумать о написании "обратного" вызова com сервера на дельфи в случае происхождения событий - благо Автокад свои реакторы обрабатывать умеет.
з.ы. про events я знаю - но это несколько из другой оперы - если событие не предусмотренно - кердык.

[Александр Ривилис]

Сообщение от Дима_ Терзают меня смутные сомнения что перехват событий это мякго говоря не есть предназначение com server'а. Я пока, даже, особо механизм себе не могу представить что должен делать com метод дабы "отреагировать" на событие - другому com'у что-то послать?

В данном случае COM-сервер - это AutoCAD. А событие он посылает "клиенту" (приложение на Delphi), который "подписался" на это событие. Внутри AutoCAD (ObjectARX или на крайний случай VisualLisp) сделать аналогичные вещи на порядок проще и надежней.

[Дима_]

Я в общем про это и пишу.
Имелось в виду что если не предусмотрен events - перехватить/узнать о работе какого-либо метода - вещь весьма затруднительная (без поддержки из самого автокада).

[maximiliam]

может вам это чем-то поможет

http://delphivs.ucoz.ru/publ/autocad/sobytija/4-1-0-5

[dxaritonov]

Разобрался.
В общем, для тех, кому будет интересно:
1. Импортируем библиотеку типов автокада
2. Добавляем ссылку на импортированный модуль в разделе uses
3. Создаем переменную acadDoc: TAcadDocument;
4. Присваиваем ей ActiveDocument автокада
5. Привязываемся к событиям след. образом:

Код:

[Выделить все]

acadDoc.OnEndCommand := EndCommand;

Собсна все, если я непонятно описал, обращайтесь crucified@list.ru

Теперь прыгаем дальше, как избавиться от импорта библиотеки типов, чтобы можно было события любого автокада перехватывать?
Может есть умельцы? У меня пока засада

[ShaggyDoc]

Теперь прыгаем дальше, как избавиться от импорта библиотеки типов, чтобы можно было события любого автокада перехватывать?

Разумеется, в серьезных проектах не надо импортировать библиотеку типов и не надо кидать на форму никакие "компоненты". Надо использовать позднее связывание.

Для этого в run-time необходимо программно выяснять, к какому именно из возможно имеющихся Автокадов надо соединяться. Для этого, как минимум, знать имеющиеся acad.exe, анализировать реестр и находить строку соединения.

Как именно это делается - здесь не место разъяснять. Читаем книги по Delphi и книгу "САПР на базе AutoCAD - как это делается". Там всё есть.