| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
MediaPlayer
shnitken © (2001-12-28 03:50:00)Доброый HI Мастера. Научите плз как заставить MediaPlayer проигрывать один и тот же файл до пока не надоест.
Nikolay (2001-12-30 17:56:00) [1]не помню кто дал этот ответ но кто-то на этом форуме ;)
procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
with MediaPlayer1 do
if NotifyValue = nvSuccessful then begin
Notify := True;
Play;
end;
end;
shnitken (2001-12-30 08:34:00) [2]Большое и толстое благодарю
Angel S (2001-12-28 11:42:00) [3]Можно в обработке события OnNotify поставить Play, тогда будет играть бесконечно.
RaZEr (2001-12-28 06:18:00) [4]Ну вообще можно через OnEndOfStream , пропиши туда Play . А так
надо свойства изменить , и это можно сделать нормально (через свойство TWinMediaPlayer), но как сейчас не впомню , и через реестр где он держит эти настройки .
| |
