ich möchte DAU Fehler abfrangen,
- wenn in einer TListView keine Einträge vorhanden sind
- oder kein Eintrag ausgewählt wurde
der Nutzer aber trozdem Elemente löscht mit:
Code: Alles auswählen
procedure TForm1.BtnDeleteDataClick(Sender: TObject);
begin
ListView1.selected.Delete;
end;
Diesen möchte ich abfangen und dem User darauf hinweisen, das er einen EIntrag auswählen soll oder keine Einträge vorhanden sind.
Code: Alles auswählen
try
begin
ListView1.selected.Delete; // zu prüfende Anweisungen
end;
except // Fehlerbehandlung
begin
ShowMessage('Sie haben kein Item ausgewählt!');
end;
end;
oder den Button auf enabled := false setzen. Wenn es keine Einträge gibt.
Ich scheitere allerdings an der Umsetzung. Könnt ihr mir helfen?