Помогите кто сможет: пишу плеер, используя DSPack. Хочу, чтобы отображалась длина видео. Делаю, как в примере (который в комплекте). MediaSeeking и GetCurrentPosition(CurrPos) Delphi подчёркивает. Код ниже:

procedure TfrmMain.DSTrackBar1Timer(sender: TObject; CurrentPos,
 StopPos: Cardinal);
var
 CurrPos : Int64;
 Value, H, M, S : Integer;
 MediaSeeking: IMediaSeeking;
begin
 FilterGraph1.QueryInterface(IMediaSeeking, MediaSeeking);
 with MediaSeeking do
 Begin
   GetCurrentPosition(CurrPos);
   Value := Trunc(CurrPos / 10000000);
   H := value div 3600;
   M := (value mod 3600) div 60;
   S := (value mod 3600) mod 60;
   Panel2.Caption := Format('%d:%2.2d:%2.2d', [H, M, S]);
 End;
 If OsdChanged then
 Begin
   DSVideoWindowEx1.ClearBack;
   OsdChanged := False;
 End;
end;

Почему и как это исправить? (Я новичок, поэтому напишите подробно)

Не знаю что уж там в примере, но если подчеркивает, то это означает только одно - в uses не указан юнит, в котором определены подчеркнутые идентификаторы.