怎样使按键盘上的某个键对应着某个事件？

Question

是这样的：
比如我按键盘上的DELETE键，怎样使这个键对应着某个删除事件？？

Answer 1

MainForm 的KeyPreview 为True
在MainForm 的 OnKeyDown中写
if key=VK_DELETE then
  //DoSomething

Answer 2

在form的事件：onkeypress事件
写入
if key=键值 then
begin
button1。click；
end；

Answer 3

补充一下楼上的
procedure TForm1.Button1Click(Sender: TObject);
begin
  ListView1.Selected.Delete; 
end;procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
    if Ord(key) = 40 then
   Button1.OnClick(Sender);
end;