ListBox seleccionado sin tener el foco

[dec]

Hola,

Pues no lo entiendo. En Delphi 7 todo parece ir bien. Si selecciono un elemento del "ListBox" puedo luego dar el foco a otro control (escribiendo en un "TEdit", por ejemplo) sin que el "ListBox" pierda la selección del elemento: pierde el foco (como tiene que ser), pero no la selección del elemento.

Eso si selecciono un elemento con el ratón. Pero, si lo hago programáticamente también va como se espera. Pongo un "ListBox", un "Edit" y un "Button" en el formulario. Y en el evento "OnClick" del botón codifico lo siguiente para seleccionar un elemento del "ListBox":

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
  ListBox1.SetFocus;
  ListBox1.ItemIndex := StrToInt(Edit1.Text);
end;

Y, justo a continuación, me pongo a escribir algo en el "TEdit"... y ocurre lo que se espera: el "ListBox" pierde el foco, pero no la selección del elemento... ¿Qué puede estar pasando? ¿Porqué no inicias un nuevo proyecto en Delphi y haces pruebas? Es posible que alguna propiedad del "ListBox" estuviera influyendo en algo: yo no he tocado ninguna, utilizo un "ListBox" recién añadido al formulario de un nuevo proyecto.