|
#1
|
|||
|
|||
Проблема с DLL
Помогите пожалуйста разобраться )
Я подключаю Dll динамически..загружается нормально, но функцию описаную в Dll не находит Функция описанная в Dll: Код:
function CreateFilter:MYAPI2;stdcall; begin Result:= PictureFilter.Create; end; exports CreateFilter; Та часть кода где вызываю dll, и пытаюсь функцию вызвать: Код:
Type TCreateFilter = function: MYAPI2; procedure TForm1.LoadData; var p:Tbitmap; hPlugIn: THandle; CreateFilter: TCreateFilter; Filter: MYAPI2; begin hPlugIn := LoadLibrary('plugin.dll'); CreateFilter := GetProcAddress(hPlugIn,'CreateFilter'); if Assigned(CreateFilter) then// не выполняется, CreateFilter = nil begin ....... end; Последний раз редактировалось Abracadabra, 11.01.2011 в 17:43. |