[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;

[poli-smen]

Сообщение от 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;

Код:

  slistbox1.Items.Delete(L);

[Bargest]

TListBox.Items.Delete(L) (c) КЭП

[Dmitry_DM]

Сообщение от poli-smen

Код:

  slistbox1.Items.Delete(L);

Ну почти так был сделал. Но не так. Спасибо!