Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Media";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Вниз

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 не указан юнит, в котором определены подчеркнутые идентификаторы.



Страницы: 1 вся ветка

Форум: "Media";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.065 c
15-1267567565
Delphi5.01
2010-03-03 01:06
2010.08.27
Редакт. настр. прокси для Firefox и Opera (решение оплачивается)


11-1221313480
DJ Vusal
2008-09-13 17:44
2010.08.27
Проблема OLE обращений из Delphi в Excel


15-1274874008
aka
2010-05-26 15:40
2010.08.27
видео с сайтов


2-1267776768
Константин
2010-03-05 11:12
2010.08.27
Сортировака с помощью TObjectList


6-1218021112
StranNik
2008-08-06 15:11
2010.08.27
Вопрос по IdHTTPProxyServer





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский