Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**Pfoto**

Hi!

ich würde es so machen:

Delphi-Quellcode:

			var

  i: integer;

begin

  i:= 0;

  repeat

    If Listbox1.Selected[i] then

      Listbox1.Items.Delete(i) else

      inc(i);

  until (i = Listbox1.items.count);

Gruß
Pfoto

Pfoto Registriert seit: 26. Aug 2005 Ort: Daun 541 Beiträge Turbo Delphi für Win32	#3 Re: Mehrere Listbox Einträge löschen 5. Mär 2007, 13:11 Hi! ich würde es so machen: markieren Delphi-Quellcode: var i: integer; begin i:= 0; repeat If Listbox1.Selected[i] then Listbox1.Items.Delete(i) else inc(i); until (i = Listbox1.items.count); Gruß Pfoto Jürgen Höfs
	Zitat

Einzelnen Beitrag anzeigen

Re: Mehrere Listbox Einträge löschen