| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

форматы в mediaSeeking (DirectShow) [D7, WinXP]

hahol ©   (2007-09-02 14:08:00) 

привет всем
вот есть такой кусок кода
......
var
mediaseeking:iMediaSeeking;
........
if mediaseeking=nil then exit;
if (MediaSeeking.IsFormatSupported(time_format_frame)=s_ok) then
 begin
   MediaSeeking.SetTimeFormat(time_format_frame);
   Mediaseeking.GetDuration(FrameCount);
   InvalidateRect(Video_Display.Video_panel.Handle,nil,false);
   VideoWindow.put_Owner(Video_display.video_panel.Handle);
   VideoWindow.put_WindowStyle(WS_CHILD or WS_CLIPSIBLINGS);
   video_display.Show;
   istimeformat:=false;
   showmessage('time format');
 end else
  begin
  if (MediaSeeking.IsFormatSupported(TIME_FORMAT_MEDIA_TIME)=s_ok) then
   begin
    Mediaseeking.SetTimeFormat(TIME_FORMAT_MEDIA_TIME);
    MediaSeeking.GetDuration(FrameCount);
    FrameCount:=FrameCount div FrameDuration;
    isTimeFormat:=true;
    form1.Caption:='2';
    showmessage('mediatime format');
    Video_Display.Hide;
   end;
  end;

но он почемуто не работает
тк form1.caption не изменяется
че не правильно
подскажите плз
выже мастера

---

Reindeer Moss Eater   (2007-09-02 22:48:00) [1]

А что, проверять результаты вызовов функций не модно?

---

Наверх