Вверх ↑
Этот топик читают: Гость
Ответов: 133
Рейтинг: 3
#1: 2010-01-04 17:30:44 ЛС | профиль | цитата
Как в схеме реализовать переключение треков, чтобы после проигрывания треков проигрывался второй трек, третий и так далее, а не первый трек повторно?
Надо, чтобы программа запоминала тот трек, что уже проигрывала!
Схема такая
code_16314.txt
карма: 0

0
файлы: 1code_16314.txt [1KB] [186]
Ответов: 2438
Рейтинг: 693
#2: 2010-01-04 17:42:51 ЛС | профиль | цитата
Artem_user, пробуй так:
Add(ListBox,14842960,623,399)
{
Left=70
Top=55
Width=545
Height=125
}
Add(Counter,7346845,588,462)
{
link(onNext,9357745:doRead,[])
}
Add(ArrayRW,9357745,637,462)
{
link(Array,14842960:Array,[])
}
карма: 11

0
Ответов: 133
Рейтинг: 3
#3: 2010-01-04 17:49:56 ЛС | профиль | цитата
Вот только как к предыдущей схеме это приделать?
карма: 0

0
Ответов: 2438
Рейтинг: 693
#4: 2010-01-04 18:02:56 ЛС | профиль | цитата
Тебе нужно просмотреть примеры идущие с HiAsm очень поможет.
code_16316.txt
карма: 11

1
файлы: 1code_16316.txt [1KB] [470]
Голосовали:Artem_user
Ответов: 133
Рейтинг: 3
#5: 2010-01-04 18:25:57 ЛС | профиль | цитата
А почему начинает проигрываться не строка 1( начальная) , а следующая ?
карма: 0

0
Ответов: 1328
Рейтинг: 69
#6: 2010-01-04 18:46:36 ЛС | профиль | цитата
А почему начинает проигрываться не строка 1( начальная) , а следующая ?/quote]
Потому что в Counter 0 стоит
Add(ListBox,14842960,434,182)
{
Left=70
Top=55
Width=545
Height=125
}
Add(Counter,7346845,399,238)
{
Min=-1
Default=-1
link(onNext,9357745:doRead,[])
}
Add(ArrayRW,9357745,448,238)
{
link(onRead,8201:doPlay,[])
link(Array,14842960:Array,[])
}
Add(Button,47479,287,182)
{
Left=5
Top=5
Width=75
Caption="Open"
link(onClick,31869:doExecute,[])
}
Add(MainForm,6300486,287,133)
{
Caption="Пример использования ArrayEnum"
}
Add(ODialog,31869,336,182)
{
Filter="ALL"
link(onExecute,5972:doText,[])
}
Add(Edit,5972,385,182)
{
Left=85
Top=5
Width=530
Height=21
Text=""
link(onChange,14842960:doAdd,[])
}
Add(Button,2496941,287,238)
{
Left=15
Top=210
Width=175
Caption="запуск перебора массива"
link(onClick,8234160:doEvent1,[])
}
Add(Hub,8234160,371,238)
{
InCount=2
OutCount=1
link(onEvent1,7346845:doNext,[])
}
Add(MediaPlayer,8201,497,238)
{
link(onEndPlay,8234160:doEvent2,[(546,244)(546,291)(352,291)(352,251)])
}


карма: 2

1
Голосовали:Artem_user
Ответов: 133
Рейтинг: 3
#7: 2010-01-04 18:50:31 ЛС | профиль | цитата
"Потому что в Counter 0 стоит" - чуть-чуть не додумался- в свойствах счетчика надо было -1 поставить.
Сечас проверяю схему.....
------------ Дoбавленo в 18.52:
Работает!
карма: 0

0
Ответов: 100
Рейтинг: 10
#8: 2010-01-09 21:20:57 ЛС | профиль | цитата
По моему проще сделать схему без массивов,
вот так code_16413.txt
карма: 1

0
файлы: 1code_16413.txt [1KB] [252]
Ответов: 1328
Рейтинг: 69
#9: 2010-01-09 21:31:46 ЛС | профиль | цитата
PanQ, ты свою схему запускал перед тем как выкладывать?
карма: 2

0
Ответов: 100
Рейтинг: 10
#10: 2010-01-09 21:36:08 ЛС | профиль | цитата
конечно запускал, а что там не работает??
карма: 1

0
Ответов: 1328
Рейтинг: 69
#11: 2010-01-09 21:53:29 ЛС | профиль | цитата
ни чего не работает, интересно как у тебя это может работать
------------ Дoбавленo в 21.55:
запусти анимационную отладку и посмотри, что у тебя в схеме происходит
Add(ListBox,14842960,469,343)
{
Left=70
Top=55
Width=545
Height=125
Point(doSelect)
link(onClick,6637786:doEvent,[(520,356)(520,377)])
}
Add(Counter,7346845,371,399)
{
link(onNext,8952859:doEvent,[(425,405)(425,391)])
}
Add(Button,47479,259,343)
{
Left=5
Top=5
Width=75
Caption="Open"
link(onClick,31869:doExecute,[])
}
Add(MainForm,4723321,259,294)
{
Caption="Пример использования ArrayEnum"
}
Add(ODialog,31869,308,343)
{
Filter="ALL"
link(onExecute,5972:doText,[])
}
Add(Edit,5972,357,343)
{
Left=85
Top=5
Width=530
Height=21
Text=""
link(onChange,14842960:doAdd,[])
}
Add(Button,2496941,259,399)
{
Left=15
Top=210
Width=175
Caption="запуск перебора массива"
link(onClick,8234160:doEvent1,[])
}
Add(Hub,8234160,343,399)
{
InCount=2
OutCount=1
link(onEvent1,7346845:doNext,[])
}
Add(MediaPlayer,8201,602,371)
{
link(onEndPlay,8234160:doEvent2,[(646,377)(646,395)(331,395)(331,412)])
}
Add(Debug,6637786,553,371)
{
link(onEvent,8201:doPlay,[])
}
Add(Debug,8952859,434,385)
{
link(onEvent,14842960:doSelect,[])
}


карма: 2

0
Ответов: 100
Рейтинг: 10
#12: 2010-01-09 21:57:09 ЛС | профиль | цитата
вроде работает, тока музыка не играет, схемы на mediaPlayer почемуто перестают работать вскоре после переустановки винды, а треки нажатием на кнопку листаются, только надо подогнать максимальное значение счетчика с кол-вом треков в плейлисте
сам плеер собираю, тока на bass, по такой же схеме все прекрасно работает
карма: 1

0
Гость
Ответов: 17029
Рейтинг: 0
#13: 2010-01-10 00:39:44 правка | ЛС | профиль | цитата


Редактировалось 4 раз(а), последний 2025-01-14 16:02:05
карма: 0

0
Ответов: 133
Рейтинг: 3
#14: 2010-01-11 19:42:24 ЛС | профиль | цитата
Переключение треков в басс- смотрите здесь.... "Пакет Windows >> Help >> Как подключить схему к басс?"
карма: 0

0
14
Сообщение
...
Прикрепленные файлы
(файлы не залиты)