onkeydown en el caption

[emiliu]

Hola soy nuevo en lo que a programación a delphi se refiere y quiero que al pulsar una tecla, por ejemplo la a, y que al pulsarla en el caption salga la frase, "el programa se está ejecutando".

Gracias de antemano!!

[vtdeleon]

Saludos

Bienvenido al ClubDelphi, ya que es tu 1er hilo

Empezado por emiliu

quiero que al pulsar una tecla, por ejemplo la a, y que al pulsarla en el caption salga la frase, "el programa se está ejecutando".

Pulsar dónde?, Caption de quién?
Bueno, utiliza el evento Onkeypress o el OnKeyUp para esto y escribe tu código en ese evento y punto.

[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...)