cambiar foco de un control a otro

[lmpadron]

Hola comunidad

Necesito saber como se puede lograr que cuando un usuario esta escribiendo algo en un Edit por ejemplo y presione ENTER cambie a otro edit para continuar. he tratado llamando la propiedad Edit1->Focused() pero no lo hace y no se si estoy haciendo algo mal o no.

gracias de antemano

[aposi]

NOMBRE_DEL_OBJETO.SetFocus;
en el evento onexit del primer objeto

[ecfisa]

Hola impadron.

Probá asignando este código a el evento OnKeyPress de los Edits en que desees ese comportamiento:

void __fastcall TForm1::EditKeyPress(TObject *Sender, char &Key)
{
  if(Key == 13){
    Key = 0;
    keybd_event(VK_TAB,0,0,0);
    keybd_event(VK_TAB,0,2,0);
  }
}

Saludos.

[[newtron]]

Hola.

Yo lo que hago es poner este código en el FormKeyDown del formulario, además de esto tienes que activar el KeyPreview del mismo a true. Con esto te servirá para todos los controles del formulario.

Código Delphi [-]
  case Key of

    VK_UP: begin
      SelectNext(ActiveControl, False, True);
      Key := 0;
    end;

    VK_DOWN: begin
      SelectNext(ActiveControl, True, True);
      Key := 0;
    end;

  end;

Saludos


Edito: Perdón perdón... no había visto que era de C++

[ecfisa]

Empezado por newtron

Edito: Perdón perdón... no había visto que era de C++

Pero... es que tu respuesta es totalmente correcta mi estimado newtron!

Así que traduciendo a C++ y tomando en cuenta que quiere verificar la tecla Enter sería:

void __fastcall TForm1::FormCreate(TObject *Sender)
{
  KeyPreview = true;  /* se puede asignar desde el Object Inspector */
}

void __fastcall TForm1::FormKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
TMsg *Msg;
   if(Key == VK_RETURN){
     PeekMessage(Msg, 0, WM_CHAR, WM_CHAR,PM_REMOVE); /* Quitar Beep */
     SelectNext(ActiveControl, true, true);
   }
}

Un saludo.

[[newtron]]

Empezado por ecfisa

Pero... es que tu respuesta es totalmente correcta mi estimado newtron!

Pues fíjate que hasta cuando me equivoco acierto.

[lmpadron]

Gracias amigos por su ayuda

como los objetos estan desorganizados utilize lo siguiente

NOMBRE_DEL_OBJETO->SetFocus;

y funciono perfectamente