Dazu kannst Du das OnClick-Ereigniss der ListBox nehmen:
Delphi-Quellcode:
procedure TMyForm.MyListBoxClick(Sender: TObject);
begin
case MyListBox.ItemIndex of
0: DoListBoxItem0(...);
1: DoListBoxItem1(...);
end;
end;
Windows Vista - Eine neue Erfahrung in Fehlern.