求救：在DELPHI中如何截获键盘上[Delete]键的键码？（在线等）

Question

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

Answer 1

是46，在onkeydown中可以看到。

Answer 2

我在TEDIT控件的ONKEYPRESS事件中的KEY却扑捉不到.即按了DELETE却没有触发ONKEYPRESS事件,应该是这样的吗?

Answer 3

按了DELETE只触发ONKEYDOWN事件,不触发ONKEYPRESS事件，只有字符键才触发ONKEYPRESS事件。

Answer 4

不能使用onkeypress截获，DELELTE/INSERT/UP/DOWN/LEFT/RIGHT/HOME/END等只能使用keydown截获，key值vk_delete,在windows中有