O keypreview do form está em True?

se está em false, não funcionará.

T+

Rodrigo


--- Levi Ribeiro de Freitas <[EMAIL PROTECTED]>
escreveu:


---------------------------------
Pessoal,
 
Estou usando um aplicationevents para com o enter
passar para o próximo
campo mas não está funcionando.
 
Por quê?
 
Vejam o código e digam o que está errado:
procedure TfrmMenu.ApplicationEvents1Message(var Msg:
tagMSG;
  var Handled: Boolean);
begin
//Enter para passar para o próximo campo
if (ActiveControl is TDBEdit) or (ActiveControl is
TDBComboBox) or
(ActiveControl is TDBLookupComboBox) or (ActiveControl
is TCustomEdit) then
     begin
     if Msg.message=WM_KEYDOWN then
         if Msg.wParam=VK_RETURN then
            Keybd_event(VK_TAB,0,0,0);
     end;
 
end;
 
Atenciosamente,
 
Levi Ribeiro de Freitas
Programador de Computadores
Tel.: 55 12 3644-2119 / 9724-8804
Email:  <mailto:[EMAIL PROTECTED]> [EMAIL PROTECTED]


[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:                    PUBLICIDADE
var lrec_target="_blank";var lrec_URL=new
Array();lrec_URL[1]="http://br.rd.yahoo.com/SIG=12fdgrd7t/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126014320/A=2950750/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/";var
lrec_flashfile="http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0901_lrec_cinema_calendario.swf?clickTAG=javascript:LRECopenWindow(1)";var
lrec_altURL="http://br.rd.yahoo.com/SIG=12fdgrd7t/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1126014320/A=2950750/R=1/id=altimg/SIG=10tift5qr/*http://br.movies.yahoo.com/";var
lrec_altimg="http://br.i1.yimg.com/br.yimg.com/i/br/ads6/0829_lrec_cinema_calendario.gif";var
lrec_width=300;var lrec_height=250;                   
  
  
---------------------------------
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 Termos do Serviço do Yahoo!.



\.\.~.~././
                            (@.@)
      ======oOOo=(_)=oOOo======|
      |                        |
      |   Rodrigo Feraboli     |
      |   Bento Gonçalves/RS   |
      |                        |
      =================Oooo====|
                  ooo0                 (    )
                 (      )              )   /
                  \    (              (__ /
                   \ __)-----------------------

__________________________________________________
Converse com seus amigos em tempo real com o Yahoo! Messenger 
http://br.download.yahoo.com/messenger/ 


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