Problem mit Combobox Select und ItemIndex

DiamondDog · Beiträge: 460

Hallo Leute,
also ich hab da folgendes und zwar wird bei meiner Combobox ein Ereigniss bei Select ausgelöst. Jetzt würde ich es aber gerne so machen das ich mit einem Button in der Combo den nächsten Eintrag selectiere. Leider funktioniert das ganze nicht mit ItemIndex. Gibt es da vll eine andere Lösung?

So hab ich es versucht:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

procedure TForm1.ComboBox1Select(Sender: TObject);
begin
  ShowMessage('Select');
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ComboBox1.ItemIndex := 2;
end;

Danke schon mal für eure Hilfe.

Mfg Dog

Michael Stenzel · Beiträge: 133 D3 Prof, D7 PE

Hallo DiamondDog.

Die Ereignisprozeduren werden, laut Delphi Hilfe, nur bei Benutzereingaben aufgerufen. Wenn du also die Ereignisprozedur im Programmcode aufrufen möchtes, muß diese direkt aufgerufen werden.

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

procedure TForm1.ComboBox1Select(Sender: TObject);
begin
  ShowMessage('Select');
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ComboBox1.ItemIndex := 2;
  ComboBox1Select(Sender);    // <---
end;

Gruß
Michael.

DiamondDog · Beiträge: 460

Ok funktioniert super.
Besten Dank fürs Helfen, hatte noch nie mit Sender gearbeitet aber werds mir merken.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme