Einzelnen Beitrag anzeigen

taktaky
(Gast)

n/a Beiträge
 
#1

Delete strings in ListBox

  Alt 13. Nov 2007, 13:23
Hallo,

ich habe eine List in ListBox1 und wollte alle letze 2 Strings löschen
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var i, j : Integer;
begin
for i := ListBox1.Items.Count-1 downto ListBox1.Items.Count-2 do
Delete(ListBox1.Items[i]);
end;

// ich möchte also nicht die Zeilen löschen sondern die letzte 2 Strings in jede Zeile in ListBox löschen

Ich muss also auch in jede Zeile suchen