|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
01.10.2007, 11:46 | #1 |
Пользователь
Регистрация: 13.09.2007
Сообщений: 63
|
проблема с MediaPlayer
Подскажите пожалуйста как сделать так чтобы MediaPlayer не останавливался после воспроизведения дорожки а продолжал её воспроизводить снова и снова. Пробовал так:
procedure TForm1.FormCreate(Sender: TObject); begin MediaPlayer1.Display:=Panel1; MediaPlayer1.FileName:='Videos1.avi '; MediaPlayer1.Open; MediaPlayer1.Play; end; Патом я пробовал так: procedure TForm1.MediaPlayer1Notify(Sender: TObject); begin MediaPlayer1.Play; end; Но программа зависает причем на столько что снять её можно только через диспетчер задач Windows.Что делать. |
01.10.2007, 12:01 | #2 |
Пользователь
Регистрация: 12.07.2007
Сообщений: 60
|
Напишу грубо, делфи нет под рукой, но что то вроде:
If MediaPlayer1.position=l100 then begin MediaPlayer1.position:=1; MediaPlayer1.play; end; А там сам смотри правельность. |
01.10.2007, 12:45 | #3 |
Пользователь
Регистрация: 13.09.2007
Сообщений: 63
|
Спасибо я тебе очень признателен.
У меня также нет под рукой делфи но я думаю что смогу справится позже. |
01.10.2007, 18:43 | #4 |
Телепат с дипломом
Старожил
Регистрация: 10.06.2007
Сообщений: 4,929
|
Миша, в событии таймера впиши этот код
if MediaPlaer1.Position = MediaPlaer1.Length then begin MediaPlaer1.Position:=0; MediaPlaer1.Play; end;
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог |
01.10.2007, 20:46 | #5 |
Пользователь
Регистрация: 12.07.2007
Сообщений: 60
|
mutabor, так я тоже самое написал только слету...без орфографии так сказать.
|
02.10.2007, 16:25 | #6 |
Пользователь
Регистрация: 13.09.2007
Сообщений: 63
|
Таймер запускать когда при каком событии?
|
02.10.2007, 16:33 | #7 |
With best regards
Участник клуба
Регистрация: 20.04.2007
Сообщений: 1,448
|
В TForm1.MediaPlayer1Notify впиши то, что сказал mutabor.
Life is too short, play more...
Как правильно задавать вопросы |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
MediaPlayer и mp3 | ale_krolik | Мультимедиа в Delphi | 5 | 29.05.2009 22:39 |
Mediaplayer | anton14 | Мультимедиа в Delphi | 12 | 20.10.2008 11:07 |
MediaPlayer | DANNY | Мультимедиа в Delphi | 5 | 05.05.2008 21:14 |
Mediaplayer.... | ZhekON | Компоненты Delphi | 13 | 19.02.2007 19:32 |
MediaPlayer | PAVEL315 | Общие вопросы Delphi | 1 | 10.02.2007 16:05 |