Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.02.26;
Скачать: CL | DM;

Вниз

Отслеживание открытия/закрытия чертежей AutoCAD   Найти похожие ветки 

 
Asail   (2006-02-09 12:08) [0]

Здрасте!!!
Можно-ли отследить события по откр./закр. чертежей (документов)? Пока, единственное, что смог придумать, это по таймеру обращатся через COM к акаду и смотреть, какие документы открыты, и какой из них активный.
В принципе, работает, но сильно грузит CPU, причем, не моим приложением, а акадом. Есть ли у кого более умные варианты?
Прилагаю свой код обработчика таймера (Interval=500):
List использую исключительно в целях отладки...

// подключаемся к акаду
try
 AcadAppl:=GetActiveOLEObject("AutoCAD.Application");
except
 Edit1.Text:="Acad not running...";
 Exit
end;
// проверяем активный документ
try
 AcadDoc:=AcadAppl.ActiveDocument;
 Edit1.Text:=AcadDoc.Name;
except
 Edit1.Text:="No open drawing...";
 Exit
end;
// находим список всех открытых документов
List.Clear;
try
 Count:=AcadAppl.Documents.Count;
 for i:=0 to Count-1
 do begin
   List.Items.Add(AcadAppl.Documents.Item(i).Name);
 end;
except end;


Спасибо!!


 
EvS   (2006-02-09 12:43) [1]

>(Interval=500)

Там, что каждые полсекунды кто-то открывает(закрывает) документы?


 
Asail   (2006-02-09 13:51) [2]

Нет, но мне надо отследить момент открытия/закрытия документа. С точностью до секунды, хотя бы.


 
k2 ©   (2006-02-09 15:11) [3]

написать *.аrх - специального вида длл-ку, пущай загружается при старте автокада, ловит события открытия/закрытия/активации, пишет в лог


 
umbra ©   (2006-02-09 15:22) [4]

посмотрите в sdk или msdn о функциях ReadDirectoryChangesW или FindFirstChangeNotification. Похоже, это то, что вам надо



Страницы: 1 вся ветка

Текущий архив: 2006.02.26;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.044 c
6-1132116706
SANEK_10289
2005-11-16 07:51
2006.02.26
Данные о погоде из Интернета


3-1135786059
Juice
2005-12-28 19:07
2006.02.26
Запрос условию с мат. операциями


1-1138198956
MegaVolt
2006-01-25 17:22
2006.02.26
Как бы сделать псевдо множественное наследование?


6-1132064989
Kullibin
2005-11-15 17:29
2006.02.26
Работа с компонентами FastNet


8-1127481102
Sergey_R
2005-09-23 17:11
2006.02.26
Глючный MPEGAudio