Hallo,
Ich bins mal wieder.
Also meie Frage steht schon in der Überschrift:
Ich möchte, dass wen jemanden einen bestimmt wert in combobox1 auswählt (z.b.: iPod) items in combobox2 einfügt?
Mein code bis jetzt:

zusammenfalten · markieren

Delphi-Quellcode:

procedure TForm2.Button1Click(Sender: TObject);
begin
combobox1.Items.Add('Windows: iPod');
combobox1.Items.Add('Windows: iPhone');
combobox1.Items.Add('Windows: iPad');
combobox1.Items.Add('Windows: Apple TV')
end;

procedure TForm2.Button2Click(Sender: TObject);
begin
combobox1.Items.Add('Mac: iPod');
combobox1.Items.Add('Mac: iPhone');
combobox1.Items.Add('Mac: iPad');
combobox1.Items.Add('Mac: Apple TV')
end;

procedure TForm2.Button3Click(Sender: TObject);
begin
combobox1.Items.Add('Linux: iPod');
combobox1.Items.Add('Linux: iPhone');
combobox1.Items.Add('Linux: iPad');
combobox1.Items.Add('Linux: Apple TV')
end;

procedure TForm2.ComboBox1Change(Sender: TObject);
begin

end;

end.

Ich hoffe ihr könnt mir weiterhelfen :O
Ich steh leider an.

Liebe Grüße,
TheKleini666

markieren

Delphi-Quellcode:

procedure TForm2.ComboBox1Change(Sender: TObject);
begin
  if ComboBox1.ItemIndex > -1 then
    ComboBox2.Items.Add(ComboBox1.Items[ComboBox1.ItemIndex]);
end;

HTH

Zitat von wicht:

markieren

Delphi-Quellcode:

procedure TForm2.ComboBox1Change(Sender: TObject);
begin
  if ComboBox1.ItemIndex > -1 then
    ComboBox2.Items.Add(ComboBox1.Items[ComboBox1.ItemIndex]);
end;

HTH

Danke
Auf dass wär ich wirklich nie gekommen.
Danke vielmals

Ich hab jetzt jedoch ein Problem:

markieren

Delphi-Quellcode:

procedure TForm3.ComboBox2Change(Sender: TObject);
begin
  if ComboBox1.ItemIndex > -1 then
    form4.Show;
  if Combobox1.Itemindex > -2 then
      form5.Show
end;

doch es öffnen sich immer autmatisch form4 und form5 egal ob ich auf das erste oder auf das zweite klicke.
Warum?

ItemIndex sagt, welcher Eintrag ausgewählt ist. -1 heißt, dass nichts ausgewählt ist, darum prüfe ich da gerne vorher drauf wie in meinem Beispiel.
Wenn du jetzt wissen möchtest, ob der erste Eintrag ausgewählt ist, kannst du es so machen:

markieren

Delphi-Quellcode:

if ComboBox1.ItemIndex = 0 then
  Form4.Show;

Für den zweiten Eintrag wäre der ItemIndex dann 1, für den danach 2, und so weiter. Wenn du natürlich sagst > -1, dann heißt das "immer wenn etwas ausgewählt ist, zeige die Form" - und > -2 ist immer "wahr", weil das Minimum von ItemIndex -1 ist.

ok danke