como a PageControl e a TabSheet n�o tem esse evento, automaticamente ela anula
o do Form, coloque essa rotina nos componentes das TabSheets...
----- 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]
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
