Текущий архив: 2002.12.02;
Скачать: CL | DM;

Вниз

Опять про нажатие клавиш................   Найти похожие ветки 

← →
Whippi ©   (2002-11-22 09:35) [0]

Есть FileListBox1 в нем нужну по нажатии клавиши Del удалить подсвеченный файл а принажатии F6 переместить файл с вызовом диалога перемещения файлов, но дальше вот этого:

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

дело не идет. Как определить подсвеченный файл и произвести над ним требуеые действия?

---

← →
Whippi ©   (2002-11-22 10:15) [1]

Может быть вот так надо:
procedure TForm1.FileListBox1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key = VK_DELETE then
FileListBox1.Items.Delete(-1);
end;
??

---

Страницы: 1 вся ветка

Текущий архив: 2002.12.02;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.019 c