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

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

Непрерывное видео [D6, WinXP]


T54 ©   (2006-06-18 13:41:00) 

Подскажите, как можно бесконечно воспроизводить один и тот же Avi-файл ? Заранее большой пасиб


!_SM_!   (2006-06-24 14:34:00) [1]

procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
  with MediaPlayer1 do
   if NotifyValue = nvSuccessful then begin
    Notify := True;
    Play;
   end;
end;


DevilDevil   (2006-06-19 22:06:00) [2]

http://www.delphimaster.ru/cgi-bin/forum.pl?id=1150624494&n=18


Vasiliy   (2006-06-19 18:11:00) [3]

procedure Form1.Timer1Timer(Sender: TObject);
begin
If MediaPlayer1.Mode=mpStopped then MediaPlayer1.Play;
end;


Наверх

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