[supernewbie]

Сообщение от Denever

Можно пример?

var
  OldLoadLibraryW:function (lpLibFileName: PWideChar): HMODULE; stdcall;

function MyLoadLibraryW(lpLibFileName: PWideChar): HMODULE; stdcall;
begin
  if ExtractFileName(lpLibFileName)='frostProtector.dll' then
    result:=0
  else
    result:=OldLoadLibraryW(lpLibFileName);
end;

procedure AntiFrost;
begin
  HookProc('kernel32.dll','LoadLibraryW',@MyLoadLibraryW,@OldLoadLibraryW);
end;

Добавлено через 1 минуту
раньше работало, щас хрен знает

Добавлено через 18 минут
щас проверил - работает