Vc tem que colocar If key = #27

Ok

----- Original Message -----
From: Eduardo Silva ® <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Friday, January 28, 2005 11: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]
 
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

 



Responder a