tem um componente Jedi que faz isso.

> Ola, tenho um procedimento:  MenuPrincipal.EnterTab;
>
> procedure TMenuPrincipal.EnterTab(Sender: TObject; var Key: Char);
> begin
>   if Key = #13 then
>   begin
>     Key := #0;
>     Perform(CM_DialogKey, VK_TAB, 0);
>   end;
> end;
>
> Que está no form principal da aplicação e gostaria de chamá-lo no 
> onkey press dos forms:
>
> procedure TCnsCliente5.FormKeyPress(Sender: TObject; var Key: Char);
> begin
>   inherited;
>   MenuPrincipal.EnterTab;
> end;
>
> porem ao tentar usar ele, dá erro de:  Not Enough actual parameters
>
> O que eu preciso acrescentar na chamada do procedimento?
> A intenção é trocar o tab pelo enter.
>
> Se alguém puder ajudar, de já agradeço!
>
> []´s
> Paulo
>
>
>
>
>   

----------------------------------------------------------------------------
Aviso de confidencialidade 

Esta  mensagem da Empresa  Brasileira  de Pesquisa  Agropecuária  (Embrapa),
empresa pública federal  regida pelo disposto  na Lei Federal no. 5.851,  de
7 de dezembro de 1972,  é  enviada exclusivamente  a seu destinatário e pode
conter informações  confidenciais, protegidas  por sigilo profissional.  Sua
utilização desautorizada  é ilegal e  sujeita o infrator às penas da lei. Se
você  a recebeu indevidamente, queira, por gentileza, reenviá-la ao emitente,
esclarecendo o equivoco.

Confidentiality note

This message from Empresa  Brasileira de Pesquisa  Agropecuária  (Embrapa) a
government company  established under  Brazilian law  (5.851/72), is directed 
exclusively to  its addressee  and may contain  confidential data,  protected
under  professional secrecy  rules. Its unauthorized  use is illegal and may
subject the transgressor to the law's penalties. If you're not the addressee,
please send it back, elucidating the failure.

Responder a