OnChange en TListBox

[fedecm]

Hola a todos, escribo de nuevo para saber cómo puedo añadirle un evento OnChange al componente TListBox, sé que tendré que crear un componente nuevo pero no sé exactamente como debo de añadirle el evento para que cuando cambie la selección del elemento salte el evento.

Un saludo, y muchas gracias.

[roman]

Puedes intentar usar el evento OnClick, sólo que tendrás que guardar en una variable el índice del último item seleccionado para determinar si realmente cambió:

Código Delphi [-]
procedure ListBox1Click(Sender: TObject);
begin
  if ListBox1.ItemIndex <> ItemIndex then
  begin
    ItemIndex := ListBox1.ItemIndex;
    {
      Aquí lo que tengas que hacer cuando cambie la selección
    }
  end;
end;

// Saludos