我正在使用Firemonkey开发Win64视频应用程序。
我使用TMediaPlayer和TMediaPlayerControl以全屏模式播放视频文件。
我希望在播放视频时,播放时间,进度信息和几个播放控制按钮会叠加在播放屏幕上。
但是我发现TMediaPlayerControl中添加的这些组件无法正常显示。我检查了与TMediaPlayer相关的源代码,发现视频播放窗口将始终显示在顶层,从而完全覆盖了TMediaPlayerControl上方的组件。
有什么办法解决这个问题?
您可以通过在TMediaPlayerControl
所在的表单的顶部(以z顺序)添加透明的覆盖表单来做到这一点。您可以通过设置Transparency = True
使表格透明。要使其停留在您的主窗体顶部,请设置FormStyle = StayOnTop