callapi.dpr

Cracker终结者——提供最优秀的软件保护技术

program CallApi;
{$APPTYPE CONSOLE}
{$HINTS OFF}

uses Windows, ApiHooks, PrcWorks;

var
  PID : LongWord;

begin
  WinExec('Target.exe', SW_SHOWNORMAL);
  GetDefaultRCInfo.RCFlags := RC_FL_TERMINATE; 
  Sleep(2000);
  PID := ProcessName2PID('Target.exe');
  MessageBox(0, 'You will have ~8 seconds to press OK'#10'in Target''s ''Inside CS'' message box.'#10'After this time will be remote thread terminated'#10'and CS status undefined -> Target''s behaviour undefined (in NT)', 'CallApi', MB_OK);
  LoadAndCall(nil, 'Target.exe', PID, 8000, 0, 'ProtMB', 0, nil);
end.