Fórum Fechar Form com ESC #155416
16/04/2003
0
obrigado!
Fernandocneto
Curtir tópico
+ 0Posts
16/04/2003
Debora
No evento KeyPress do form digite o seguinte:
if key = chr(27) then
FrmCliente.Close;
chr(27) = códico ASCII da tecla ESC.
:wink:
Gostei + 0
16/04/2003
Aroldo Zanela
No evento OnKeyPress:
if key = chr(27) then Close;
Com BitBtn:
Mude a propriedade Cancel para true e no evento OnClick:
Close;
Gostei + 0
16/04/2003
Ma_cunhado
vc tambem pode ir no OnkeyDown e digitar assim;
If key=vk_escape then
close;
Pra ver os valores virtuais da teclas va na secao uses do seu form
(ou digite WINDOWS en qualquer lugar da sua unit) click na palavra Windows com a tecla control pressionada que ele abre a unit Windows.pas daí vc procura em Constantes vk_algumacoisa.
Thau Mermão...
Gostei + 0
16/04/2003
Eniorm
www.apocalipica.hpg.com.br/hackz/delphi/
lá vc encontra vários componenes para Delphi
inclusive um txt com um procedimento para acionar
o uso das teclas, tipo: esc fecha, enter como tab etc.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)