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

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

TMediaPlayer AV при повторном открытии файла


@!!ex ©   (2010-02-17 09:54:00) 

Procedure StartView(const FileName:string; Form:TForm);
begin
 if not Assigned(Player) then begin
   Player:=TMediaPlayer.Create(Form);
   Player.ParentWindow:=Form.Handle;
   Player.Visible:=false;
   Player.Display:=Form;
 end;

 Player.Close();
 Player.FileName:=FileName;
 Player.Open();
 Player.Play();
end;

Первый раз вызываю StartView - нормально запускается проигрывание видео.
Вызываю второй раз - падает на Player.Close();
Если Player.Close() не вызываеть падает на Open();


@!!ex   (2010-02-17 10:05:00) [1]

Стоп. Я идиот. Мой косяк. Копипаст - зло


Сергей М.   (2010-02-17 10:02:00) [2]

И форма, передаваемая 2-м параметром, при этом одна и та же ?
И Handle у нее один и тот же ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо