
11.09.2012, 20:17
|
 |
Профессионал
|
|
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
|
|
Цитата:
Сообщение от 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);
|