DSPack

← →
eXe 171 © (2008-03-07 11:51) [0]

Помогите кто сможет: пишу плеер, используя 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;

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

← →
Сергей М. © (2008-03-07 12:20) [1]

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

DSPack Найти похожие ветки