Pessoal tenho uma rotina para fazer a tecla <ENTER> funcionar igual a <TAB> que 
é a seguinte:

   If Key = #13 Then
   Begin
      SelectNext(Sender as tWinControl, True, True );
      Key := #0;
   end;

tenho uma unit funcoes onde coloco todos os chamados a programas, 
procedures,formulários e tudo mais para facilicar a manutenção delas.
o que preciso é saber o que preciso fazer para que a procedure acima funcione 
para todos os formulários quando colocada na unit funcoes pois agora necessito 
efetuar uma alteração nela e o que torna complicado esse procedimento em um 
programa razoavelmente grande.

[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

 



Responder a