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;
как-то так, но имхо лучше интерфейсы