|
Вопрос # 5 135/ вопрос открыт / |
|
Здравствуйте! Я делаю простой проигрыватель по примеру указанному по ссылке: https://www.delphi-int.ru/articles/17/
Этим способом делаю впервые. Так все работает, но хотелось бы сделать к проигрывателю плейлист. Возможно ли сделать это в данном примере и если да, то как? Если можно по подробнее. Заранее спасибо!!!
 |
Вопрос задал: Loki05 (статус: Посетитель)
Вопрос отправлен: 29 марта 2011, 15:15
Состояние вопроса: открыт, ответов: 1.
|
Ответ #1. Отвечает эксперт: Вадим К
Здравствуйте, Loki05!
Для того, что бы работали кнопки "следующий трек"/"предыдущий трек", нужно заполнить плейлист содержимым.
Для этого существует свойство currentPlaylist и тут http://msdn.microsoft.com/en-us/library/dd564177(v=VS.85).aspx его описание. Для начала нужно использовать свойство appendItem для наполнения. count покажет общее кол-во в списке, а item[номер] доступ к элементу.
Вот по этим ссылкам есть хорошие примеры
http://www.rsdn.ru/forum/delphi/3788947.flat.aspx
http://www.plm.hk/phpgm/archiver/tid-5028.html (тут правда весь текст на китайском, но кого это интересует? код то на делфи:) ).
 |
Ответ отправил: Вадим К (статус: Академик)
Время отправки: 29 марта 2011, 17:38
Оценка за ответ: 5
|
Мини-форум вопроса
Всего сообщений: 17; последнее сообщение — 29 марта 2011, 20:39; участников в обсуждении: 3.
|
min@y™ (статус: Доктор наук), 29 марта 2011, 15:18 [#1]:
А что не получается?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
Loki05 (статус: Посетитель), 29 марта 2011, 15:22 [#2]:
Через OpenDialog открываю несколько MP3 файлов, а воспроизводится 1. И кнопки следующего и предыдущего трека вообще не активны. В целом нужно открыть список песен и с помощью кнопок менять треки, как то так
|
|
|
min@y™ (статус: Доктор наук), 29 марта 2011, 15:51 [#3]:
Ну так имена файлов надо где-то в памяти хранить, ёмаё. Самый простой способ - TListBox.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
Loki05 (статус: Посетитель), 29 марта 2011, 15:54 [#4]:
Использую. Как мне в TListBox занести список треков из OpenDialog? А то он заносит только по 1 треку, а в самом OpenDialog выбираю несколько.
|
|
|
Loki05 (статус: Посетитель), 29 марта 2011, 15:55 [#5]:
Как правильно написать эту строку ListBox1.Items.Add(opendialog1.FileName);
что бы добавлялся список, а не 1 трек
|
|
|
min@y™ (статус: Доктор наук), 29 марта 2011, 16:00 [#6]:
Цитата (Loki05):
Как правильно написать эту строку ListBox1.Items.Add(opendialog1.FileName); что бы добавлялся список, а не 1 трек
ListBox1.Items.AddStrings(opendialog1.Files);
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
Loki05 (статус: Посетитель), 29 марта 2011, 16:02 [#7]:
Спасибо работает!!!
|
|
|
Loki05 (статус: Посетитель), 29 марта 2011, 16:04 [#8]:
min@y: Если можешь посмотри пожалуйста эту ссылку: https://www.delphi-int.ru/articles/17/
как сделать что бы кнопки следующий трек и предыдущий трек работали? на компоненте они не активны вообще.
|
|
|
min@y™ (статус: Доктор наук), 29 марта 2011, 16:10 [#9]:
Ниахота мне. Найми негров. 
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
Loki05 (статус: Посетитель), 29 марта 2011, 16:15 [#10]:
Ну а можешь тогда показать как сделать переключение следующего трека по нажатии кнопки вперед? ПЛИЗ!!!!!
|
|
|
min@y™ (статус: Доктор наук), 29 марта 2011, 16:34 [#11]:
Ну ёпрст! По нажатию кнопки увеличивай на +1 ItemIndex у ListBox. Строка с текстом будет ListBox.Items[ListBox.ItemIndex].
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
|
|
|
Вадим К (статус: Академик), 29 марта 2011, 16:53 [#12]:
а у компонента MediaPlayer случайно нет свойства currentPlaylist ?
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
Loki05 (статус: Посетитель), 29 марта 2011, 17:22 [#13]:
Вадим К: есть только я не пойму как его использовать
|
|
|
Loki05 (статус: Посетитель), 29 марта 2011, 17:57 [#14]:
Вадим К: Спасибо за помощь очень помог все работает!!! но если можешь взгляни эту ссылку https://www.delphi-int.ru/articles/17/ здесь проигрыватель без плейлиста. можно ли сделать туда плейлист? там есть свойство currentPlaylist оно выпадающее но там нет нечего. какой компонент нужно использовать что бы он там отобразился для создания плейлиста? Хочу разобраться чисто для себя. За ранее огромное СПАСИБО!!!!
|
|
|
Loki05 (статус: Посетитель), 29 марта 2011, 18:17 [#15]:
Импортированый Windows MediaPlayer как ActiveX. Как для него создавать плейлист? я не пойму как это происходит как физически так и логически. Объясните пожалуйста кто нибудь??
|
|
|
Вадим К (статус: Академик), 29 марта 2011, 18:33 [#16]:
физически - электроны бегают. Не более.
Логически - сам плейлист уже есть,создавать не нужно, нужно только наполнить. А то, что его не видно - это другое дело.
Галочка "подтверждения прочтения" - вселенское зло.
|
|
|
Loki05 (статус: Посетитель), 29 марта 2011, 20:39 [#17]:
Вадим К: а как наполнить этот плейлист? я так понимаю то же самое что и со стандартным MediaPlayer не прокатит? или то же самое?
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
