tecla esc para fechar o form?
11/05/2003
0
gostaria de saber como faço para apertar a tecla esc e fechar o form?
Se alguem poder me ajuda eu agradeço.
Feliz dia das mães a todas as mães. :P
Felipesans
Post mais votado
11/05/2003
Não se esqueça de mudar a pripriedadade [b:48cdedcc0d]KeyPreview[/b:48cdedcc0d] do Form para True, assim o formulário será fechado assim que o [Esc] for pressionado, não importanto em qual componente estiver o foco.
Obubiba
Mais Posts
11/05/2003
Glecio
Bom existem várias maneiras para se fechar um form ao pressionar a tecla ESC. Aqui vai algumas:
1- Você pode utilizar o ActionList(>=Delphi5) na paleta standard:
Coloque este componente no form e dê 2 clicks nele, adcione um action(ou vários, depende de quantas hotkey queira utilizar), selecione o action q vc adcionou e vá ao object inspector e mude a propriedade SHORTCUT para a tecla que deseja utilizar, no caso o ESC. Se quiser mude o nome e o caption para ESC. No evento onExecute do Action que está selecionado mande fechar o form(form1.close ou close).
obs.: Se vc já tiver algum procedimento que fecha o form no código, pode utilizá-lo no OnExecute do Action.
Outra Maneira(+Prática)
2-No Evento OnKeyPress do Form Digite o Seguinte:
If Key = #27 Then
Close;
É só.
Falou Cara. Espero ter te ajudado.
11/05/2003
Toshio Bruno
no OnKeyDown você digita:
begin
if key=(VK_Escape) then
close;
end;
não se esqueça também de alterar o KeyPreview para True;
11/05/2003
Glaubergs
Clique aqui para fazer login e interagir na Comunidade :)