Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > hook


Автор: Гость_guest 28.9.2004, 14:31
Собственно делаю хук на MessageBoxA, функция-подстава вызывается, но вот родная не стартует никак ?????
Код

function MyMessageBox(hWnd: HWND; lpText, lpCaption: PChar; uType: UINT): Integer;
begin
 Result := MessageBoxA(hWnd, 'intercept', 'intercept', uType);
end;

Автор: p0s0l 28.9.2004, 15:07
По этому коду ничего не скажешь... Может ты подправил код MessageBoxA ? Или изменил в импорте её адрес на свой...
Попробуй вызови MessageBoxW...
Или покажи полный код...

PS: ты забыл указать stdcall в заголовке своей функции...

Автор: Гость_guest 29.9.2004, 08:17
Точно точно stdcall
Пасиб

Автор: Pathfider 2.10.2004, 20:15
А как можно сделать hook на открытие файлов, каталогов и дисков?

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)