usando o evento OnKeyPress

Quando usamos o evento onKeyPress, este evento ocorre quando você pressiona um [ENTER], ou quando estamos pressionando qualquer teclado do nosso teclado, agora vamos pressionar qualquer tecla para visualizamos, conforme imagem abaixo.


Exemplo :

Então vamos para o código.

Para conseguimos este resultado, clica no button e vai no "Object Inspector" do Delphi, e encontre a aba eventos OnKeyPress, agora vamos colocar este código abaixo.


CÓDIGO:

Procedure TForm1.Button1KeyPress(Sender : TObject; var key: Char);
begin
   MessageDLG('A tecla [' + key + '] foi pressionada', mtInformation, [mbok], 0 );
end;

exemplo foi bem simples apenas para intendimento de como podemos recuperar as teclado pressionando durante a digitação e um caso.

Espero que Goste, até o próximo post!!!