Чтобы вывести отладочную информацию в окно "Event Log" среды  Delphi используйте функции из модуля Windows:

procedure OutputDebugString; external kernel32 name 'OutputDebugStringA';
procedure OutputDebugStringA; external kernel32 name 'OutputDebugStringA';
procedure OutputDebugStringW; external kernel32 name 'OutputDebugStringW';

Например:

  OutputDebugString(' ------------ Активировали --------------');

  OutputDebugString('---------------  Деактивировали -----------');