Hallo,

ich habe da ein Problem mit einer Combobox.

Also ich habe eine Combobox auf einem Tabsheet.

Beim Betreten des Tabsheets wird die Combobox mit Daten aus einer Datenbank gefüllt und damit sie immer auf dem neuesten Stand ist soll beim erneuten Betreten neu gefüllt werden, wobei die Anzahl der Einträge unterschiedlich sein kann.

Bevor ich sie neu fülle, muss sie allerdings erst einmal geleert werden, was ich mit folgender Schleife probiert habe:

markieren

Delphi-Quellcode:

for a:=1 to strtoint(edit169.Text) do
                combobox1.Items.Delete(a);

Verzichte ich auf das Leeren, so gibt es doppelte Einträge. In edit169.text steht übrigens stets die aktuelle Anzahl an Einträgen.

Das Problem bei der Schleife ist, das sie nicht korrekt arbeitet. Wenn ich z.B. 4 Einträge habe, so werden nur die Einträge 2 und 3 gelöscht, die anderen bleiben komischerweise drin.

Übrigens wenn ich die Schleife von 0 beginnen lasse, wird der 1. und der 3. Wert gelöscht.

Ich hoffe es kann mir jemand bei dem Problem helfen.

Vielen Dank schon mal im Voraus sagt

Fran

Probiers mal so:

markieren

Delphi-Quellcode:

for a:=strtoint(edit169.Text) downto 0 do
                combobox1.Items.Delete(a);

Weiß jetzt echt nicht obs klappt aber versuchs mal so...

markieren

Delphi-Quellcode:

...
begin
ComboBox1.Clear;
end;
...

Danke nochmal.

Beide Lösungen funktionieren bestens, auch wenn ich nicht verstehe warum die Schleife rückwärts geht und vorwärts nicht, aber egal Hauptsache es geht.

Fran

Zitat:

auch wenn ich nicht verstehe warum die Schleife rückwärts geht und vorwärts nicht,

Ganz einfach: Weil beim Löschen am Anfang der Liste die hinteren Einträge "nachrutschen".