Текущий архив: 2007.12.02;
Скачать: CL | DM;
Вниз
отловить клавишу Delete Найти похожие ветки
← →
Dmitry_177 (2007-11-09 21:56) [0]В ListBox-е имеются строки, нужно по нажатию клавишы Delete удалять текущую строку, делаю так:
if Key = #16 then
Button3.Click;
в Button3Click и есть весь код удаления(по нажатию кнопки тоже удаляется). Так вот нажатие клавиши не отлавливается и из-за этого никакого удаления не происходит..
← →
Kolan © (2007-11-09 21:58) [1]Сделайте Action, в нем удаление, назначте его кнопке, и задайте еме ShortCut «Del».
← →
DVM © (2007-11-09 22:00) [2]
procedure TForm1.ListBox1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_DELETE then windows.Beep(500,50);
end;
← →
Dmitry_177 (2007-11-09 22:05) [3]спасибо :)
Страницы: 1 вся ветка
Текущий архив: 2007.12.02;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.022 c
