Esqueci de dizer, o key preview já esta true. -----Mensagem original----- De: Eolos (Yahoo) [mailto:[EMAIL PROTECTED] Enviada em: sexta-feira, 28 de janeiro de 2005 11:02 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Usar a tecla ESC para sair
Coloque KeyPreview = True procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin Case Key Of VK_ESCAPE : Close; end; end; Abraço ----- Original Message ----- From: Eduardo Silva ® To: [EMAIL PROTECTED] Sent: Friday, January 28, 2005 10:54 AM Subject: [delphi-br] Usar a tecla ESC para sair Galera tenho um form com 1 Page Control e dentro deste 2 TabSheet. Estou usando o código abaixo no evento onKeyDown do form para fechar o mesmo com a tecla ESC, mas não esta funcionando. Alguém pode me dar uma mão ? if Key = 27 then begin Tabela.Cancel; Close; end; _ ___________________________________ _ / )| |( \ / / | Eduardo de Almeida Silva | \ \ _( (_ | _ [EMAIL PROTECTED] _ | _) )_ (((\ \)|_/ )___________________________( \_|(/ /))) (\\\\ \_/ / \ \_/ ////) \ / \ / \ _/ \_ / / / \ \ -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: -------------------------------------------------------------------------- ---- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: São Paulo Rio de Janeiro Curitiba Porto Alegre Belo Horizonte Brasília ---------------------------------------------------------------------------- -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html