如何使用Tapplicationevent组件获取＆＃34;输入＆＃34;键

Question

我希望在＆＃34;输入＆＃34;键后输入＆＃34;输入＆＃34;键消息。我尝试使用Tapplicationevent组件。代码是

procedure TForm6.ApplicationEvents1Message(var Msg: tagMSG;
  var Handled: Boolean);
begin
    if   Msg.message=WM_KeyDown   then
      if   msg.wParam=Windows.VK_RETURN   then
      begin
          Button1.Click();
          handled:=True;
      end;
end;

但它无法改进？如何改进？感谢