![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Быстрая перемотка DVD [D6, WinXP]
Белый Орёл © (2006-05-18 12:23:00)Приветствую, мастера! Меня очень интересует, как можно средствами DSPack или какими-нибудь другими сделать перемотку DVD также быстро, как это реализовано в WinDVD. И кто-нибудь знает, как можно DVD перемотать на место последней остановки (опять-таки, как в WinDVD)?
Белый Орёл (2006-05-19 00:43:00) [1]Большое спасибо, но всё-таки подождать, пока перемотает, приходится. Может, есть способ ускорить время перемотки?
programania (2006-05-18 21:04:00) [2]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);