Показать сообщение отдельно
  #4  
Старый 22.03.2012, 20:00
Аватар для cotseec
cotseec cotseec вне форума
Активный
 
Регистрация: 16.07.2008
Сообщения: 353
Версия Delphi: D7,TDE06,RAD09
Репутация: 1443
По умолчанию

DLL экспортирует функцию, одним из параметров которой является необходимая CallBack функция
Код:
type
    TSomeCallBack=function (SomeParam:byte):BOOL;stdcall;
.......
function SomeFunction (SomeParam:byte;CallBack:TSomeFunction):BOOL;
begin
   Result:=(SomeParam=$FF);
   if Result then
      CallBack(SomeParam);
end;
........
export
   SomeFunction; 

как-то так, но имхо лучше интерфейсы
Ответить с цитированием