onkeydown en el caption

[jmariano]

A lo dicho por vtdeleon, comentar que el evento lo has de implementar en el mismo formulario y poner la propiedad 'KeyPreview' del formulario a "True" (esta propiedad hace que todas las pulsaciones del teclado sean procesadas antes por el formulario, con esto evitamos tener que codificar el evento por cada control).

Código Delphi [-]
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
  Form1.Caption := 'La aplicación se está ejecutando';  
  Key := #0; // Elimina cualquier tecla pulsada del bufer
end;

Saludos!

[roman]

Un ejemplo un tanto cuanto drástico jmariano. Acabas de inhabilitar cualquier pulsación.

// Saludos

[jmariano]

Pos sip, tienes razón!, lógicamente, la sentencia anterior, tendría que ir dentro de alguna condición que detectara cuando la aplicación se "cargó" para que vuelva a procesar las teclas
(supongo que el objetivo será que el usuario no pueda hacer nada hasta que se termine de realizar alguna operación durante el inicio de la aplicación...)