ENTER no RadioGroup ou DBRadioGroup

Delphi

13/04/2004

Boa Noite....

Necessito de ajuda no seguinte....

ESTOU COM O FOCO EM UM COMPONENTE RADIOGROUP, SELECIONO O ITEM (VIA TECLADO) E GOSTARIA QUE AO PRESSIONAR O ENTER ELE FOSSE PARA O PROXIMO CAMPO......

O COMPONENTE FAZ ISSO COM O TAB, POREM GOSTARIA QUE FOSSE COM O ENTER, JA QUE MEU SISTEMA TRABALHA COM O ENTER PARA IR MUDANDO DE CAMPO....

Agradeço desde já a ajuda....

Ana Lucia :?: :?: :?: :?: :?: :shock: :shock: :shock:


Luzinha

Luzinha

Curtidas 0

Respostas

Bruno Ribeiro

Bruno Ribeiro

13/04/2004

Eu tambem estou com o mesmo problema
acho q vamos ter q usar outro vcomponente ou modificar este

GOSTEI 0
Rafael Pimenta

Rafael Pimenta

13/04/2004

1. Passa a propriedade KeyPreview do Form correspondente para True
2. Coloque no evento KeyPress do Form a seguinte instrução:

  if Key = #13 then

    Perform(Wm_NextDlgCtl,0,0);



Veja se resolve..
GOSTEI 0
Rafael Pimenta

Rafael Pimenta

13/04/2004

1. Passa a propriedade KeyPreview do Form correspondente para True
2. Coloque no evento KeyPress do Form a seguinte instrução:

  if Key = #13 then

    Perform(Wm_NextDlgCtl,0,0);



Veja se resolve..



Corrigindo o código acima:

 if Key = #13 then 
begin
  Key := #0;
  Perform(WM_NEXTDLGCTL, 1, 0);
end;


Ficou faltando zerar a variável key.


Não esqueça que a tecla ENTER (no Windows) tem seu papel, que é normalmente confirmar uma ação(botão). Se não tomar cuidado poderá confundir o usuário, em vez de ajudá-lo.
GOSTEI 0
José

José

13/04/2004

Este tópico esta sendo fechado por inatividade. Se necessário, sinalizar para que seja reaberto ou abrir um novo.
GOSTEI 0
POSTAR