使用网络浏览器时,后退按钮不起作用

时间:2014-04-30 19:04:10

标签: delphi firemonkey delphi-xe5 delphi-xe6

我已下载xe6的试用版并使用名为webbrowser的示例进行播放.. 我想用后退按钮关闭应用程序..

这是我在样本中插入的内容

procedure TWebBrowserForm.FormKeyUp(Sender: TObject; var Key: Word;
  var KeyChar: Char; Shift: TShiftState);
begin
  if Key = vkHardwareBack then
  begin
    SharedActivity.Finish;
  end;

这可以使用并关闭应用程序。但是当我点击浏览器内的链接然后按后退按钮时应用程序就不会关闭..

我也试过这个http://www.fmxexpress.com/virtual-keyboard-with-twebbrowser-on-android-in-delphi-xe5-firemonkey/

2 个答案:

答案 0 :(得分:0)

请写下onKeyDown事件

  if Key = vkHardwareBack then
  begin
    SharedActivity.Finish;
  end;

答案 1 :(得分:0)

在Android上,您可以改用TMS Web浏览器。该组件具有一个OnHardwareButtonClicked事件,该事件检测“硬件后退”按钮的单击。这就是我处理此问题的方式。单击URL内的URL时,此组件非常友好。