Главная страница
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.051 c
2-1166273130
Ivolg
2006-12-16 15:45
2007.01.07
HEX значения


2-1166577368
Алексей Филонович
2006-12-20 04:16
2007.01.07
форма


15-1166437699
Gydvin
2006-12-18 13:28
2007.01.07
И снова javasctipt


4-1156701339
AlexKRAM
2006-08-27 21:55
2007.01.07
Программно добавить пользователя Windows


15-1166178154
031178
2006-12-15 13:22
2007.01.07
К кого есть компоненты Alvas Components Collection for delphi 7 ?