Delphi 使用TWebBrowser组件在HTML表单中输入不起作用的键

我用简单的文本形式创建了一个php网页，并尝试使用TWebBrowser组件在Delphi中使用应用程序浏览该网页。问题是我不能在这个表单中点击回车键来获得换行符。我可以输入，鼠标工作正常，但回车键不工作。在任何其他浏览器中都可以正常工作。 也许这可能与TWebBrowser的Onener事件处理程序有关？我真的不知道怎么解决这个问题

procedure TForm1.FormKeyPress(Sender: TObject;var Key: Char);
begin 
  //Don't forget to set the Keypreview property 
  //of the form to true!
  if (Key=#13) then begin 
    Key := #0; 
    Keybd_Event(VK_LCONTROL, 0, 0, 0); //Ctrl key down 
    Keybd_Event(Ord('M'), MapVirtualKey(Ord('M'), 0),0, 0); // 'M' key down 
    Keybd_Event(Ord('M'), MapVirtualKey(Ord('M'), 0), KEYEVENTF_KEYUP, 0); // 'M' Key up 
    Keybd_Event(VK_LCONTROL, 0, KEYEVENTF_KEYUP,  0); // Ctrl key up 
    Keybd_Event(VK_CANCEL, 0, 0, 0);
  end; 
end;

//资料来源：

---

//Keypreview change true

您能否制作一个复制此错误的小型静态网页？我想我可能有一个解决方案。下面是测试它的原始php脚本：