In vielen Komponenten gibt es nicht nur
"ausgewählt" "markiert" (selektiert), sondern auch noch "ausgewählt" (fokusiert).
Und Diese müssen nicht den selben Eintrag meinen.
Jetzt kommt es darauf an, was du davon zum Löschen benutzt.
TListBox.ItemIndex (Focused)
TListBox.Selected
Und wenn du ganz sicher gehn willst, dann eben eine TCheckListBox, wo es zusätzlich auch noch das
TCheckListBox.Checked gibt.
Oder eben
TCheckBox.OnMouseDown oder OnMouseUp und schauen, ob die Klickposition wirklich auf einem Item liegt.