Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.01.2009, 16:11   #1
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию Как получать данные из чертежа CAD системы Компас V7?

В общем есть задача: Получить данные штампов чертежа в открытом в компасе документе (пишу PDM).
Есть в его АПИ метод GеtStamp, так вот я никак не могу добраться до того интерфейса в котором он определен.

ДЕлаю примерно так:
Код:
//****************************************************
k:=(GetActiveOleObject('KOMPAS.Application.7'));
doc:=(k.ActiveDocument);
Это я получил Активный документ но как дальше никак понять не могу.

Вот еще так пробовал:
Код:
TRY KOMPAS:=GetActiveOleObject('KOMPAS.Application.7') as IApplicationDisp;
 KOMPAS.Visible:=TRUE;
EXCEPT
 KOMPAS:=nil;
end;
TRY
 ksDocs:=IDocumentsDisp(KOMPAS.Documents);
 ksDoc:=IKompasDocumentDisp(ksDocs.Add(1, TRUE) );
 
EXCEPT
 ksDocs:=nil; ksDoc:=nil;
END;
Но тоже безрезультатно, никак не могу перейти от Doc к нужному интерфейсу.

Кто сталкивался с подобным или слышал - видел просьба откликнуться.

P.S. Вариант написать плагин rtw к Компасу не подходит.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Сохранение чертежа ACAD Patriot1 Общие вопросы Delphi 0 14.01.2009 14:18
Компас 10 kommunist Фриланс 2 27.06.2008 22:32
Получать пришедшие файлы N!ckeL Работа с сетью в Delphi 1 06.04.2008 09:49
Junk E-Mail Reporting Program, Как получать от нее инфу? timax PHP 3 16.10.2007 14:49