怎样知道按下的键是delete键。在线等待

Question

如题。

Answer 1

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if Key = 46 then
    ShowMessage('DEL');
end;

Answer 2

key = 46 或 key = vk_delete
在windows单元里17952行有详细注释

Answer 3

声明
procedure KeyDown(var Msg:TWMKEYDOWN);message WM_KEYDOWN;实现procedure TForm1.KeyDown(var Msg: TWMKEYDOWN);
begin
   if Msg.CharCode=VK_DELETE then
     //进行相应的处理 
end;

Answer 4

KeyDown事件写
key = 46 或 key = vk_delete