delphi - Delphi TWebBrowser.GoBack:如何处理重定向

Question

关于TWebBrowser方法，我在GoBack上遇到问题。以下是显示问题的导航历史记录：

[1] htt#://www.google.com/
[2] htt#://news.google.com/nwshp?hl=en&tab=wn
[3] htt#://news.google.com/news/url?sr=1&ct2=us%2F0_0_s_3_1_a&sa=t&usg=AFQjCNGgo-FdxdVP4AVI_HZEV7gS66cjDA&cid=43982236066804&url=http%3A%2F%2Fnews.cnet.com%2F8301-10805_3-57613303-75%2Fmicrosoft-provides-doctors-note-for-sick-xbox-one-gamers%2F&ei=ORaOUvjjJciMgQeGwAE&rt=HOMEPAGE&vm=STANDARD&bvm=section&did=2559730436932654466&ssid=tc
[4] htt#://news.cnet.com/8301-10805_3-57613303-75/microsoft-provides-doctors-note-for-sick-xbox-one-gamers/

到达＃4后，我执行 GoBack过程。这是发生问题的时间。 GoBack从历史记录列表中删除[4]，然后转到[3]，不幸的是重新加载[4]，这实际上取消了 GoBack请求。

我想要的是允许[3]启动[4]，但阻止其自身保留在堆栈上，以便堆栈看起来像这样：

[1] htt#://www.google.com/
[2] htt#://news.google.com/nwshp?hl=en&tab=wn
[3] htt#://news.cnet.com/8301-10805_3-57613303-75/microsoft-provides-doctors-note-for-sick-xbox-one-gamers/

我该怎么办？

Answer 1

检查twebbrowser.onbeforenavigate2事件。在浏览器加载新资源之前调用它。您可以使用它来取消或重定向请求。