Ver Mensaje Individual
  #2  
Antiguo 05-10-2004
senpiterno senpiterno is offline
Miembro
 
Registrado: abr 2004
Posts: 112
Reputación: 21
senpiterno Va por buen camino
Tu pregunta no es muy aclaratoria, pero si lo que quieres es capturar cada tecla que se precione en el formulario, lo primero que debes hacer es asignar la propiedad KeyPreview:=True en el formulario, para que todos los eventos de teclado realizados sean capturados primero por el formulario y despues por los demas controles, a menos que quieras capturar dichos eventos en un determinado control del form....
Ya aclarado esto, los eventos que puedes utilizar para capturar las teclas precionadas pueden ser

Código Delphi [-]
   
procedure TForm.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 
  //codigo.....
 
end;
o
Código Delphi [-]
   
procedure TForm.FormKeyPress(Sender: TObject; var Key: Char);
begin
 
  //codigo.....
 
end;
o
Código Delphi [-]
   
procedure TForm.FormKeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
 
  //codigo.....
 
end;
Donde la variable Key para KeyDown y KeyUp representa el codigo virtual de la tecla precionada o soltada. Ejem:

enter=13, F1=112, etc

En el evento KeyPress Key devuelve el caracter precionado.

Espero sirva a tus propositos.

Saludos
Responder Con Cita