H
hyjjml
Unregistered / Unconfirmed
GUEST, unregistred user!
我用DSPack循环播放一段内存流,但每次重复播放时都会弹出新的播放窗口播放
初步认为是我对这段内存流的内容进行更新后造成的,不知有没有人遇到过类似的情况
我使用的方式 :
procedure TFormPlayWin.Button1Click(Sender: TObject);
var
ms: IMediaSeeking;
StopPosition, CurrentPosition: int64;
begin
FilterGraph.Stop;
if Succeeded(FilterGraph.QueryInterface(IID_IMediaSeeking, ms)) then
begin
ms.GetStopPosition(StopPosition);
CurrentPosition := 0
ms.SetPositions(CurrentPosition, AM_SEEKING_AbsolutePositioning,
StopPosition, AM_SEEKING_NoPositioning);
end;
FilterGraph.Play;
end;
这种方式如果是循环播放一个文件是没问题的
初步认为是我对这段内存流的内容进行更新后造成的,不知有没有人遇到过类似的情况
我使用的方式 :
procedure TFormPlayWin.Button1Click(Sender: TObject);
var
ms: IMediaSeeking;
StopPosition, CurrentPosition: int64;
begin
FilterGraph.Stop;
if Succeeded(FilterGraph.QueryInterface(IID_IMediaSeeking, ms)) then
begin
ms.GetStopPosition(StopPosition);
CurrentPosition := 0
ms.SetPositions(CurrentPosition, AM_SEEKING_AbsolutePositioning,
StopPosition, AM_SEEKING_NoPositioning);
end;
FilterGraph.Play;
end;
这种方式如果是循环播放一个文件是没问题的