Delphi 5 - tecla ESC
Como impedir que a tecla ESC feche o form em uso e saia da rotina que está sendo acesssada?
Obrigada!
Obrigada!
Anonymous
Curtidas 0
Respostas
Roa
03/02/2003
Tente o seguinte:
No evento Onkeypress do componente que estiver com o foco faça o seguinte:
if key=#27 then key:=0;
Agora, se a propriedade KeyPreview do Form estiver ´true´, coloque a rotina acima no evento OnKeyPress do Form.
Espero ter ajudado.
[]´s
No evento Onkeypress do componente que estiver com o foco faça o seguinte:
if key=#27 then key:=0;
Agora, se a propriedade KeyPreview do Form estiver ´true´, coloque a rotina acima no evento OnKeyPress do Form.
Espero ter ajudado.
[]´s
GOSTEI 0
Sandra
03/02/2003
Olá Tabatha!
Antes de testar o código do ROA, caso o seu formulário tenha algum button ou bitbtn, verifique se a propriedade Cancel encontra-se como TRUE e mude-a para FALSE. Já aconteceu isso uma vez comigo e, dessa maneira, o problema foi resolvido.
Espero ter ajudado.
Sandra
Antes de testar o código do ROA, caso o seu formulário tenha algum button ou bitbtn, verifique se a propriedade Cancel encontra-se como TRUE e mude-a para FALSE. Já aconteceu isso uma vez comigo e, dessa maneira, o problema foi resolvido.
Espero ter ajudado.
Sandra
GOSTEI 0
Anonymous
03/02/2003
Veja o link
http://clubedelphi.videomart.com.br/viewtopic.php?t=3191&highlight=keypreview
Tem uma ajudinha extra.
Enio, www.apocaliptica.hpg.com.br
http://clubedelphi.videomart.com.br/viewtopic.php?t=3191&highlight=keypreview
Tem uma ajudinha extra.
Enio, www.apocaliptica.hpg.com.br
GOSTEI 0