Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.01.07;
Скачать: CL | DM;

Вниз

Быстрая перемотка DVD   Найти похожие ветки 

 
Белый Орёл   (2006-05-18 12:23) [0]

Приветствую, мастера! Меня очень интересует, как можно средствами DSPack или какими-нибудь другими сделать перемотку DVD также быстро, как это реализовано в WinDVD. И кто-нибудь знает, как можно DVD перемотать на место последней остановки (опять-таки, как в WinDVD)?


 
programania ©   (2006-05-18 21:04) [1]

DSPack:

hms:TDVDHMSFTimeCode;
DvdControl:IDvdControl2;
i:integer;
begin
with form1.FilterGraph1 do begin
//pos - позиция перемотки в мсек
   i:=pos div 1000;
   hms.bHours:=i div 3600;
   hms.bMinutes:=(i-hms.bHours*3600)div 60;
   hms.bSeconds:= i-hms.bHours*3600-hms.bMinutes*60;
   QueryInterface(IDvdControl2, DvdControl);
   DvdControl.PlayAtTime(@hms,DVD_CMD_FLAG_None, DvdCmd);
   DvdControl := nil;
end;

//и еще в начале
  form1.FilterGraph1.Play;
  form1.FilterGraph1.QueryInterface(IDVDControl2, DVDControl);
  DVDControl.SetOption(DVD_NotifyParentalLevelChange,false);
  DVDControl.SetOption(DVD_HMSF_TimeCodeEvents, true);


 
Белый Орёл   (2006-05-19 00:43) [2]

Большое спасибо, но всё-таки подождать, пока перемотает, приходится. Может, есть способ ускорить время перемотки?



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

Текущий архив: 2007.01.07;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.035 c
2-1166352049
jonson35
2006-12-17 13:40
2007.01.07
как правильно создать процедуру?


15-1166104582
ArtemESC
2006-12-14 16:56
2007.01.07
Как перевести на русский название произведения...


2-1166320824
КВАНТ
2006-12-17 05:00
2007.01.07
Про URL в RichEdit и про Panel (несовместимость?)


15-1166200113
allax
2006-12-15 19:28
2007.01.07
Вопрос


15-1166435526
Сатир
2006-12-18 12:52
2007.01.07
Problem “J” - Concurrency Simulator