请问在FilterGraph的onGraphComplete事件有关问题

请教在FilterGraph的onGraphComplete事件问题
我在学习用dspack控件制作播放器，想让播放器连续播放的时候，用了在FilterGraph的onGraphComplete事件，可是一点运行就出现错误，说IBaseFilter没声明，无法编译，这要怎么解决？代码如下：
一个是按钮事件：
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
filtergraph1.ClearGraph;
filtergraph1.RenderFile('1.dat');
filtergraph1.Play;
end;

当加上FilterGraph的onGraphComplete事件后就出现问题了：
procedure TForm1.FilterGraph1GraphComplete(sender: TObject;
  Result: HRESULT; Renderer: IBaseFilter);
begin
 filtergraph1.ClearGraph;
filtergraph1.RenderFile('2.dat');
filtergraph1.Play;
end;

问题就出现在
type
  TForm1 = class(TForm)
  FilterGraph1: TFilterGraph;
  VideoWindow1: TVideoWindow;
  BitBtn1: TBitBtn;
  procedure BitBtn1Click(Sender: TObject);
  procedure FilterGraph1GraphComplete(sender: TObject; Result: HRESULT;
  Renderer: IBaseFilter);（就这一行）
错误提示是：
[Error]Unit1.pas(16):Undeclared identifier:"IBaseFilter"

请朋友帮我看看怎么解决，谢谢。




[解决办法]
缺少IBaseFilter所在的单元文件，将单元名加入到 uses 中即可
[解决办法]

Delphi(Pascal) code

unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls,shlobj, ExtCtrls,FlatBars, FlatBtns, FlatUtils, FlatPanel;
[解决办法]
探讨

引用:
把IBaseFilter所在的单元加入uses中

晕，我只有一个单元，还要加？