|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Наипростейший медиаплеер
Доброго времени суток!
Возник такой вопрос: Пишу медиаплеер, пока самый простой. Столкнулся с непонятной проблемой. Суть в том, чтобы из плейлиста рандомом вытягивать треки и проигрывать их. Вот кусок кода процедуры: флажок - выбор проигрывания в случайном порядке i,n - переменные integer, просто счетчики Код:
if Form1.CheckBox1.Checked=true then begin rand:randomize; n:=Form1.ListBox1.Count-1; i:=Random(n); Form1.Mediaplayer1.FileName:=Form1.ListBox1.Items[i]; Form1.MediaPlayer1.Open; Form1.MediaPlayer1.Play; goto rand; end; lmikle: Тегами пользуемся правильно!!! Проблема в том, что именно при попытке проиграть выбранный трек, программа зависает наглухо. Через отладчик код выполняется последовательно, без ошибок. Если надо, могу весь проект выложить. Заранее спасибо! |
#2
|
||||
|
||||
)))))) дк конечно он у тебя по кругу бегает, т.е. код)))
просто не понятно зачем там тебе метки нужны, и всякие бессмысленные переходы. Последний раз редактировалось Pilot_Red, 04.04.2011 в 23:17. |
#3
|
|||
|
|||
так он переходит к метке когда заканчивает проигрывать трек и снова генерирует случайное значение
|
#4
|
|||
|
|||
а почему Вы решили что он переходит именно когда закончит играть? он переходит сразу же как только начал играть, поэтому и виснет в бесконечном цикле.
взялся из неоткуда, ничего не прошу, помогаю просто так ICQ: 593977748 - стучать в случае КРАЙНЕЙ необходимости, ну, или если вы со Ставрополя |
#5
|
||||
|
||||
Цитата:
По-моему это не так... Напиши перед goto Form1.caption:='test'; и запусти проект.. если название формы сразу поменяется то ты не прав... |
#6
|
|||
|
|||
Спасибо за совет. Но поставил перед переходом эту строку. В результате - заголовок поменялся, а дальше прога зависла.
|
#7
|
|||
|
|||
Да, скорее всего, так и есть, и он переходит в тот момент, когда начинает выполнять команду "Play"
|
#8
|
||||
|
||||
Цитата:
я тебе не предлагал решение проблемы, а лишь хотел показать что после команды play у тебя обработчик не останавливается и херачит дальше |
#9
|
|||
|
|||
Что-нибудь другое придумаю...
|
#10
|
||||
|
||||
И тут...
А определить когда запись будет проиграна сами знаете что мешает? А уж потом переходить к следующей. Ну а о инновационности организации цикла: PHP код:
промолчу. |