Самоучитель КОМПАС-3D V9. Трехмерное проектирование (+ CD-ROM)

Это и есть пример действия функции обратного вызова. В нашей программе мы не будем реализовывать фильтр выбранных объектов, то есть при вставке модели колеса в документ нужно будет просто указать точку в трехмерном пространстве сборки. По этой причине функция обратного вызова будет чрезвычайно проста (листинг 6.19). Листинг 6.19. Функция обратного вызова function SelectCallBackProc(entity: ksEntity; rInfo: ksRequestInfo3D): integer; stdcall; Export; begin Result := 1; end; Чтобы КОМПАС мог вызывать эту функцию из библиотеки, ее обязательно следует объявить как экспортную (листинг 6.20). Листинг 6.20. Добавление функции обратного вызова в раздел exports exports LibraryName name LIBRARYNAME, LibraryId name LIBRARYID, LibraryEntry name LIBRARYENTRY, SelectCallBackProc name SELECTCALLBACKPROC; На этом все. Скомпилируйте проект и запустите библиотеку. Теперь КОМПАС будет создавать трехмерную модель в скрытом режиме. Сразу же после завершения построения трехмерная модель колеса появится в окне активной сборки в фантомном отображении, перемещаясь за указателем мыши (рис. 6.26). Рис. 6.26 ...»