Extraño comportamiento de un ComboBox

[r1d2m3]

Hola amigos, estoy teniendo un extraño comportamiento con un componente combobox, el tema es así, debo realizar una serie de cosas dentro del evento OnChange, y luego, a elección del operador y usando un botón, limpio la selección que hay en el combobox realizando lo siguiente:

cbbClientes.ItemIndex:=-1;

hasta aqui todo bien, solo que cuando quiero volver a usar y seleccionar el mismo elemento que tenía en el combobox previo a la limpieza, el evento OnChange no se dispara, debo forsozamente seleccionar otro elemento distinto del último seleccionado y ahí si se dispara el evento. La verdad es que así no me sirve porque a veces el operador debe volver a realizar nuevamente la misma selección y, tal como les comenté, no puedo atrapar el OnChange posterior a la limpieza mediante cbbClientes.ItemIndex:=-1;

Bueno, espero haber sido claro presentando el problema, quedo a la espera de alguna ayudita, saludos a todos.

[ecfisa]

Hola r1d2m3.

cuando quiero volver a usar y seleccionar el mismo elemento que tenía en el combobox previo a la limpieza, el evento OnChange no se dispara

Si lo queres seleccionar asignando el índice a la propiedad ItemIndex no tiene nada de extraño, es el comportamiento esperado.
En la ayuda de Delphi, TComboBox -> Events -> OnChange dice:

Occurs when the user changes the text displayed in the edit region

(Ocurre cuando el usuario cambia el texto que aparece en el área de edición)

Y como el usuario en ningún momento cambia el texto en el área de edición, el evento no se dispara.

Basta con hacer una simple prueba para verificar que en ningún caso el cambio del valor de ItemIndex dispara el evento OnChange:

Código Delphi [-]
...

procedure TForm1.btnLimpiaClick(Sender: TObject);
begin
  ComboBox1.ItemIndex:= -1;  // no dispara OnChange
end;

procedure TForm1.btnSeleccionaClick(Sender: TObject);
begin
  Randomize;
  ComboBox1.ItemIndex:= Random(9); //(1/10 items al azar), no dispara OnChange
end;

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
  ShowMessage('OnChange');
end;
...

Saludos.

[r1d2m3]

Hola, gracias por la respuesta y perdón por demorar la mia. Gracias a tu comentario, pude resolver la cuestión que tenía pendiente.

Nuevamente gracias y saludos.