Caro Eduardo,

Voc� leu TODA a resposta do nosso amigo Eolos?

Voc� n�o pode usar Key = 27. Use:
Case Key Of
      VK_ESCAPE : Close;

Conforme resposta que j� foi dada.
E olha, n�o me leve � mal, mas a sua resposta mostra claramente como voc�
mal pensa, mal tenta fazer algo e j� pede socorro � lista.
At� a� pra mim, tudo bem o que acontece � que cada dia eu leio menos a
lista. Mas o pior � que voc� manda as mesmas mensagens para v�rias listas,
ent�o no meu outlook, onde tenho regras de mensagens, as suas mensagens que
n�o s�o enviadas especificamente para [email protected], caem na
minha caixa de entrada. Fico t�o chateado que na maioria das vezes
simplesmente as seleciono e deleto.
Ent�o pe�o � voc� e � todos que realizam esta pr�tica o seguinte:
_Pesquisem antes de recorrer � lista.
_Quando recorrer, envie a d�vida � uma lista por vez e n�o nas '10' listas
em que est�o cadastrados.

N�o me levem � mal, acho que desta forma todos aproveitaremos mais este
recurso.

[]

Rog�rio Ricardo Fernandes
----- Original Message ----- 
From: "Eduardo Silva �" <[EMAIL PROTECTED]>
To: <[email protected]>
Sent: Friday, January 28, 2005 11:06 AM
Subject: RES: [delphi-br] Usar a tecla ESC para sair



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: [email protected]
  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












-- 
<<<<< 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