Capturar tecla Tab en OnKeyPress,OnkeyUp...

[NEG1414]

Buenas...

Dos preguntas:


Tengo un formularion con un edit y un Listbox en el que tengo una serie de elementos.
Querria que al pulsar la Tecla Tab en el Edit el foco saltara al ListBox (lo hace) pero que me marque el primer elemento del ListBox como selecionado (fondo Azul, me lo muestra con el fondo blanco)

Como puedo capturar la tecla TAB al ser pulsada en el Edit, me da igual el evento que sea : OnKeyPress,OnKeyDown..

Gracias.

[TOPX]

Buenas,

1. En el evento OnEnter del ListBox:

ListBox1->Selected[0] = True;

2. Con lo poco que sé, haría:

En un ActionList, poner un Action que tenga su propiedad Shortcut = Tab, y en su evento OnExecute:

  if (ActiveControl = Edit1) {
    // hacer algo cuando detecte:
    Label1->Caption = FormatDateTime("hhnnsszzz", Now());

    // si aplica, dejar pasar al otro control:
    ListBox1->SetFocus();
  }

O también, lo mismo en el evento OnMessage del TApplication, pero validando antes que el mensaje sea WM_KEYDOWN y su wParam = VK_TAB.

[NEG1414]

Gracias.. Selecciona el item perfectamente.