egal welcher index ausgewählt wird es soll immer das passieren:

markieren

Delphi-Quellcode:

case ComboBox1.ItemIndex of
 0: begin// diese Aktion soll bei 0 und jedem anderen Case ausgelöst werden
Nr := ComboBox1.ItemIndex;
Panel1.Caption := x.Strings[Nr];
Panel2.Caption := y.Strings[Nr];
end;

Dann kannst du ja auf das Case-Konstrukt komplett verzichten

Guten Morgen.

Ich würde nur den Sonderfall behandeln:

markieren

Delphi-Quellcode:

begin
  // ...
  with ComboBox1 do
  if ItemIndex >= 0 then
  begin
    Panel1.Caption := x[ItemIndex];
    Panel2.Caption := y[ItemIndex];
  end;
  // ...
end;

Grüße vom marabu