Einzelnen Beitrag anzeigen

DelphiNoob1.0

Registriert seit: 23. Okt 2012
Ort: Berlin
13 Beiträge
 
Delphi 6 Personal
 
#3

AW: ListBox-Items "kontrolliert" löschen

  Alt 23. Okt 2012, 21:23
Danke für die schnelle Antwort! Also ich habe das jetzt mit else angefügt aber wenn ich auf mein minus button drücke löscht er alle einträge..

Delphi-Quellcode:
procedure TForm1.BtMinusClick(Sender: TObject);
var
name :integer;
begin
 for name:= ListBox.Items.Count - 1 downto 0 do
    if ListBox.Selected[name] then
      ListBox.Items.Delete(name)
    else
      ListBox.Items.Delete(ListBox.Items.Count-1);
end;
(Ich bin neu auf dem Gebiet Delphi [nur wegen Informatik in der Schule])

Geändert von DelphiNoob1.0 (23. Okt 2012 um 21:27 Uhr)
  Mit Zitat antworten Zitat