Im Bezug auf
den Thread:
Letztes Item einer Lisbox löschen:
Delphi-Quellcode:
//Redundanz!
for i:=lbfilter.items.Count-1 downto 1
do begin
if lbfilter.Items.Strings[i] = lbfilter.Items.Strings[i-1]
then begin
showmessage('Redundanz Problem');
edfilter.SetFocus;
lbfilter.selected[i-1] := True;
lbfilter.DeleteSelected;
//Zeile markieren
end;
lbfilter.Selected[i];
ich setz die daten von einem Tedit in eine Tlistbox.
die prüfung funktioniert einwandfrei, bis aber eine zahl in das Tedit geschrieben wird,
die in der tlistbox an letzter stelle steht. da gibts einen crash.
wie kann ich den umgehen zumal ja der rest auch geht?