ComboBox Problem

[markus5766h]

. . . dann sollte's doch so gehen

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if not Form2.Visible then Form2.Show;
  if ComboBox1.ItemIndex > -1 then Form2.Label9.Caption := ComboBox1.Items[ComboBox1.ItemIndex];
end;

oder

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if not Form2.Visible then Form2.Show;
  Form2.Label9.Caption := ComboBox1.Text;
end;