Eintrag in einer Listbox löschen

[smart]

Ich möchte einen selectierten Eintrag in einer ListBox löschen. Ich benutze dafür diesen Code und bekomme aber immer eine Fehlermeldung. Warum?

Delphi-Quellcode:

ListBox1.Items.Delete(ListBox1.ItemIndex);

[xaromz]

Hallo,

klassische Frage: Welche Fehlermeldung?

Gruß
xaromz

[smart]

Fehlermeldung: Der Index der Liste überschreitet das Maximum (-1)

[Orbmu2k]

Warum nicht so ?

Delphi-Quellcode:

  Listbox1.DeleteSelected;

[Sharky]

Zitat:

Zitat von smart

Fehlermeldung: Der Index der Liste überschreitet das Maximum (-1)

Wo löschst Du denn den Eintrag? In einer Schleife?

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ListBox1.Items.Delete(ListBox1.ItemIndex);
end;

Das geht beim mir ohne Probleme.

[smart]

@Orbmu2k, ganz einfach, weil ich dann die Fehlermeldung "unbekannter Bezeichner" bekomme.

@Sharky, nein, keine Schleife sondern "OnClick" bei einem Button.

[Phistev]

Überprüfst du auch, ob etwas markiert ist, und ob etwas in der Liste ist?

[Orbmu2k]

Zitat:

Zitat von smart

@Orbmu2k, ganz einfach, weil ich dann die Fehlermeldung "unbekannter Bezeichner" bekomme.

Mhhh dann gabs das im D5 wohl noch nicht ... sorry

aber ItemIndex dürfte eigentlich nicht -1 sein wenn ein Eintrag wirklich markiert ist :shock:

[Sharky]

versuche es mal so:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if (ListBox1.ItemIndex <> -1) then
  begin
    ListBox1.Items.Delete(ListBox1.ItemIndex);
  end;
end;

Bist Du sicher das der Fehler beim löschen kommt und nicht an einer anderen Stelle?

[smart]

Kommt die gleiche Fehlermeldung. Ich bin da vor einiger Zeit schon einmal drüber gestolpert. Leider habe ich die Lösung vergessen.

[DP-Maintenance]

Dieses Thema wurde von "Sharky" von "Sonstige Fragen zu Delphi" nach "VCL / WinForms / Controls" verschoben.
Ist ja ein VCL-Objekt. Und dafür gibt es diese Sparte ;-)

[Sharky]

Zitat:

Zitat von smart

Kommt die gleiche Fehlermeldung....

Verstehe ich nicht. Das kann eigentlich überhaupt nicht sein. Hast Du mal bei der IF-Abfrage einen Breakpoint gesetzt und bist das ganz einzeln durchgegangen?

[smart]

Ich verstehe es ja auch nicht. Wenn es nicht anders geht, fange ich einfach die Fehlermeldung ab.

[LoL]

Zeig doch einfach mal den ganzen Code den du jetzt da hast und sag mal was da so alles in der Listbox drin steht, bzw was du da reinschreibst

[smart]

Vielen Dank für Eure Mühe. Habe den Fehler schon gefunden. Hatte in einer ganz andern Stelle nochmal auf den gelöschten Eintag zugegriffen. Daher der Fehler.