Bei wählen eines Listboxitem eine Aktion?

[marabu]

Hallo,

es ist völlig egal, ob das Item über Maus oder Tastatur ausgewählt wird - es wird immer das Ereignis OnClick() ausgelöst:

Delphi-Quellcode:

procedure TDemoForm.ListBoxClick(Sender: TObject);
begin
  with Sender as TListBox do
    ShowMessage(IntToStr(ItemIndex));
end;

Grüße vom marabu