Você não precisa "CRIAR" um componente.
Coloque um ApplicationEvents da aba Additional, no form q vc quer fazer a 
paradinha com o Enter ou #13.

Aí no Evento OnShortCut vc faz isso:

procedure TfrVendaBalcao.ApplicationEventsShortCut(var Msg: TWMKey;
var Handled: Boolean);
var
key : word;
begin
Key := MSG.CharCode;
case key of
VK_ENTER : ShowMessage('Enter');
end;
end;

Ali, onde eu botei o ShowMessage, vc coloca o código para saltar para o 
próximo componente do form, dentro do tab order.

Simples e doce.

Falou.

Artur.


Em 19/07/05, tiago_econtabil <[EMAIL PROTECTED]> escreveu:
> 
> Pessoal, é possível criar um componente para monitorar o
> pressionamento da tecla enter e pular o foco para o próximo componente
> no form (em tempo de execucao), com funcionamento semelhante aquele
> código que colocamos no evento OnKeyPress do form?
> Gostaria de saber de qual classe herdo ele.
> 
> Obrigado
> 
> Tiago
> 
> 
> 
> 
> --
> <<<<< 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
> 
> 
> 
> 
> 
> 
> 
> 


-- 
________________________

Artur Rodrigo Guerra
mail: [EMAIL PROTECTED]
skype: arturguerra
________________________


[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