Показать сообщение отдельно
  #2  
Старый 11.09.2012, 20:17
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 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);
Ответить с цитированием