Pasando información a la ventana activa

[SaraTorres]

Chicos
El código de abajo sirve para detectar cuando presionamos el "clic derecho" en la barra de título
o el caption del formulario (en este caso es: TForm1) en Delphi.

Pregunta:
¿Cómo puedo hacer para que detecte el clic derecho de cualquier ventana y no sólo del formulario (TForm1) de Delphi?

- Digamos, transformar TForm1 en la ventana activa. Muchas gracias desde ya.

Código Delphi [-]
 
   private
  procedure WMNCRBUTTONDOWN(var msg: TMessage); message WM_NCRBUTTONDOWN;
end;

implementation

procedure TForm1.WMNCRBUTTONDOWN(var msg: TMessage);
begin
  if msg.wParam = HTCAPTION then Caption := 'Clic derecho';inherited;
end;