[Dmitry_DM]

Здравствуйте! У меня вопрос: как удалить ОДИН выбранный элемент listbox нажатием кнопки DEL?
У меня L - это номер элемента. Так очищается весь ListBox1.

Код:

procedure TForm1.sListBox1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
   if key = VK_DELETE then
 begin
slistbox1.Clear;
 end;
end;