Usando a Tecla ASCII no Lazarus

Delphi

01/11/2017

Bom dia, meus caros amigos estou tendo dificuldades em usar as teclas em meu sistema, pois uso o Delphi e Lazarus, o mesmo código que uso no Delphi não esta servindo para o Lazarus e gostaria da força dos amigos programadores. Veja abaixo o código que uso no Delphi mais que não serve para o Lazarus.

EVENTO

onkeyDown

If Key=Vk_Escape Then
Close;

Propriedade do Form

KeyPreview coloco como " True "
Helton Garrido

Helton Garrido

Curtidas 0

Melhor post

Mateus

Mateus

01/11/2017

Tenta:
If Key=#27 then Close;


Dá uma olhada nesse post:

https://www.devmedia.com.br/forum/keypress-lista-dos-codigos-ex-13-enter-27-esc/357198
GOSTEI 1

Mais Respostas

Helton Garrido

Helton Garrido

01/11/2017

Obrigado meu amigo, deu certo \\o/
GOSTEI 0
Mateus

Mateus

01/11/2017

Beleza Helton!
Abraço.
GOSTEI 0
POSTAR