delphi - 如何显示视频进度的进度条？

Question

我正在使用德尔福 5。

我可以使用 .avi 显示 .avi 或任何其他视频剪辑TFilterGraph，但我需要显示视频完成的进度，那么我该如何使用TFilterGraph.

我需要立即播放下一个视频，所以我怎么能这样做。

Answer 1

您应该从图形对象请求 IMediaSeeking 接口，然后调用其 GetPositions 方法来了解播放中的当前位置。

您也可以从同一个图形对象请求 IMediaEvent 接口，然后在主循环中获取图形事件。播放结束时您将收到 EC_COMPLETE 事件。