DSPack [D7, WinXP]
eXe 171 © (2008-03-07 11:51:00)
Помогите кто сможет: пишу плеер, используя 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:00) [1]
Не знаю что уж там в примере, но если подчеркивает, то это
означает только одно - в uses не указан юнит, в котором определены
подчеркнутые идентификаторы.
Наверх 
ЧАТ |
Орешник |
|
