ComboBox Item-Zahl

[Micha]

Ich hab mal wieder eine kurze Frage:

Ich habe eine ComboBox mit über 100 Einträgen.
Jetzt will ich die Nummer des Eintrages in einem EditFeld ausgeben.

Nachdem es ja über 100 Einträge sind, wird mir der untenstehende Quellcode zu lang.
Das geht doch bestimmt auch einfach oder?

Delphi-Quellcode:

  begin
   if ComboBox1.ItemIndex = 0 then
  begin
   Edit1.Text := '1';
  end;
  if ComboBox1.ItemIndex = 1 then
  begin
   Edit1.Text := '2';
  end;
  ...

[JoelH]

Edit1.Text := IntToStr(combobox1.itemIndex);

[Micha]

Optimal.

DANKE.