Entwickler-Ecke

Sonstiges (Delphi) - Problem mit Combobox Select und ItemIndex


DiamondDog - Fr 01.05.09 13:17
Titel: Problem mit Combobox Select und ItemIndex
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:

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 - Fr 01.05.09 14:12

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.



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 - Fr 01.05.09 14:24

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