Главная страница
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.044 c
15-1166431387
Чапаев
2006-12-18 11:43
2007.01.07
Про IE


15-1166154820
Slider007
2006-12-15 06:53
2007.01.07
С днем рождения ! 15 декабря


6-1155292138
Orxan
2006-08-11 14:28
2007.01.07
Как проверит существование того или иного почтового ящика,


15-1166347457
Alex_ey
2006-12-17 12:24
2007.01.07
outlook


2-1166570104
Святослав
2006-12-20 02:15
2007.01.07
Базы данных и Delphi 2006