home   |   А-Я   |   A-Z   |   меню


Листинг 6.19. Функция обратного вызова

function SelectCallBackProc(entity: ksEntity; rInfo: ksRequestInfo3D): integer;

stdcall; Export;

begin

Result := 1;

end;

Чтобы КОМПАС мог вызывать эту функцию из библиотеки, ее обязательно следует объявить как экспортную (листинг 6.20).


Листинг 6.18. Обнуление переменных | КОМПАС-3D V10 на 100 % | Листинг 6.20. Добавление функции обратного вызова в раздел exports