Checklistbox: Unselektierte Items löschen

[Larsi]

Hi,

mit folgendem Code kann man die selektieren Items in einer Checklistbox löschen:

Checklistbox1.DeleteSelected;
Aber wie kann man die Unselektierten Items löschen?


MFG Lars Wiltfang

[DeddyH]

Geh doch in einer Schleife rückwärts durch die Items und lösche die nicht selektierten einzeln.

[mkinzler]

Iteriere über die Items (rückwärts) und überprüfe, ob diese selektiert sind und lösche diese wenn nicht.

[Larsi]

Zitat von DeddyH:

Geh doch in einer Schleife rückwärts durch die Items und lösche die nicht selektierten einzeln.

Und wie geht das?

[mkinzler]

Du wirst doch wohl wissen, wie man eine Schleife programmiert?

[haentschman]

Hallo Larsi...

Schuß aus der Hüfte:

- alle Listboxeinträge durchlaufen
- Überprüfung Checked
- entfernen ja/nein

nach dem Entfernen eines Listboxeintrages ist logischerweise die Anzahl um 1 weniger und der aktuelle Index ist eventuell auch anders.

roter Kasten...Laßt älteren die länger zum Schreiben brauchen auch eine Chance ...aber trotzdem

[DeddyH]

Pseudo-Code:

Delphi-Quellcode:

for i := CheckListBox.Items.Count - 1 downto 0 do
  if not Item.Selected(i) then
    Items.Delete(i);

[Larsi]

@Mkinzler: Hab ich noch nie gemacht.

[Die Muhkuh]

Du hast noch nie eine Schleife programmiert?

Dann wäre es an der Zeit, Grundlagen nachzuholen.

[mkinzler]

Du bist seit über einem Jahr hier Mitglied und hast noch nie eine Schleife programmiert?