ComboBox auswählen + Daten anzeigen

[Blackheart]

Vieleicht hilft dir das ein wenig auf die Sprünge.

Delphi-Quellcode:

procedure TForm1.ListBox1Click(Sender: TObject);
begin
  Showmessage(IntToStr(ListBox1.ItemIndex) +' - '+ ListBox1.Items.Strings[ListBox1.ItemIndex]);
end;