Текущий архив: 2002.09.16;
Скачать: CL | DM;
Вниз
Связь c DLL Найти похожие ветки
← →
Gayrus © (2002-09-06 04:31) [0]Я делаю связь между приложением и DLL: передаю DLL"ке адрес процедуры, но похоже не работает :(, вот код
type
TMesSend=Procedure(const Wnd:hWnd;Mess:Cardinal;wParam,LParam:Integer);
PMesSend=^TMesSend;
...
var toProc:PMesSend;
...
procedure RunHook(SendTo:PMesSend;Mess:Cardinal);export;stdcall;
ToProc:=SendTo; // параметр передаваемый в DLL - @HookForProg
...
toProc^(hwnd,message,wParam,LParam);
Основная программа:
Procedure HookForProg(const Wnd:hWnd;Mess:Cardinal;wParam,LParam:Integer);
begin
...
end;
...
RunHook(@HookForProg,WH_GETMESSAGE);
Скажите где ошибка или дайте пример со ссылкой на процеду через память.
← →
Dimk (2002-09-06 09:22) [1]Помоему ты с указателями перемудрил.
TMesSend - процедурный тип который и так уже указатель на процедуру. Таким образом вызов ToProc^ как мне кажется конечно соответствует типу формального параметра - но на деле
@HookForProg не является PMesSend а является TMesSend.
Поэтому если я не ошибаюсь - надо сделать
toProс(hwnd,message,wParam,LParam);
Страницы: 1 вся ветка
Текущий архив: 2002.09.16;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.022 c
