javascript - 在 Delphi TWebBrowser 中静音 YouTube 声音

Question

我正在 Delphi 2010 中编写一个小型视频预览工具，但我想以编程方式将视频静音，因为正如我所说，它用于预览。

这段代码我试过好几个版本，但总是会导致脚本错误，最后还是不行。

WebBrowser1.ControlInterface.Document.QueryInterface(IHtmlDocument2, doc);
doc.parentWindow.execScript( 'document.getElementById("movie_player").mute()', 'javascript' );

也尝试过稍等一段时间让控件完成浏览，但还是没有。

Answer 1

尝试在 TWebBrowser 的 OnDocumentComplete 中调用您的代码事件。当里面的文档完全加载时会触发此事件，因此该对象(如果预期存在)已经下载并存在。如果不显示您的 JavaScript 代码，我无法告诉您更多信息。

但我会采用不同的方式。我会实现类似 this one 的代码直接进入您的导航网页。它可以立即在onYouTubePlayerReady中静音事件处理程序是什么意思，当 YouTube 播放器完全加载时立即。这比稍后调用该函数要好，因为它可能会由于 TWebBrowser 的导航完成和您的代码执行之间的一些延迟而产生短促的声音。