Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Мультимедиа
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 11.06.2007, 00:06
Аватар для Danila
Danila Danila вне форума
Прохожий
 
Регистрация: 30.05.2007
Сообщения: 1
Репутация: 10
По умолчанию PlayList

Помогите с проблемкой... я пишу свои проигрыватель. а с листом проблемы. кто нибудь знает как сделать PlayList?
Заранее БЛАГОДАРЮ
Ответить с цитированием
  #2  
Старый 11.06.2007, 02:51
BlackCash BlackCash вне форума
Прохожий
 
Регистрация: 08.06.2007
Сообщения: 42
Репутация: 15
По умолчанию

попробуй сделать playlist используя tlistview, в первой колонке имя песни, во второй продолжительность и т.д.
Ответить с цитированием
  #3  
Старый 11.06.2007, 10:08
aleksnine aleksnine вне форума
Начинающий
 
Регистрация: 08.03.2007
Сообщения: 151
Репутация: 12
По умолчанию

Попробуй этот компонент.
Сам правда не использовал.

----------------------
Suported these formats:
PLS Playlist
M3U Playlist
BSPlayer Playlist (not Crypted)
Light Alloy Playlist
Media Player Classic Playlist
Windows Media ASX Playlist
----------------------

http://www.torry.net/vcl/mmedia/audio/PlayList.zip
Ответить с цитированием
  #4  
Старый 18.06.2007, 21:22
Аватар для <<D>>
<<D>> <<D>> вне форума
Активный
 
Регистрация: 06.05.2007
Адрес: ГДЕ ТО В СОЛНЕЧНОЙ СИСТЕМЕ
Сообщения: 207
Репутация: 15
По умолчанию

На форме создаешь два ListBox'a. Первый (PL1) делаешь невидимым,
а второй (pl2) - основным. Далее в PL1 добавляешь полные адреса
файлов, а в PL2 - уже переделанные на более короткие
(пример: PL1 - 'C:\Music\Sound.mp3',a pl2 - 'Sound.mp3'). При
двойном клике на PL2 - PLAY(pl1.items[pl2.itemindex]).

В таймире написать условие:
if position=length then //если позиция вспр. = Длине дорожки тогда
begin
pl2.itemindex:=pl2.itemindex+1;
play(pl1.items[pl2.itemindex]);
end;
Ответить с цитированием
  #5  
Старый 13.08.2008, 23:15
Anti_L@+meR Anti_L@+meR вне форума
Прохожий
 
Регистрация: 19.05.2008
Сообщения: 39
Репутация: 10
По умолчанию

Цитата:
Сообщение от <<D>>
На форме создаешь два ListBox'a. Первый (PL1) делаешь невидимым,
а второй (pl2) - основным. Далее в PL1 добавляешь полные адреса
файлов, а в PL2 - уже переделанные на более короткие
(пример: PL1 - 'C:\Music\Sound.mp3',a pl2 - 'Sound.mp3'). При
двойном клике на PL2 - PLAY(pl1.items[pl2.itemindex]).

В таймире написать условие:
if position=length then //если позиция вспр. = Длине дорожки тогда
begin
pl2.itemindex:=pl2.itemindex+1;
play(pl1.items[pl2.itemindex]);
end;
а как сделать чтоб листбоксы понимали pls и m3u плейлисты если не трудно помоги
Ответить с цитированием
  #6  
Старый 14.08.2008, 01:41
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,035
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Берешь pls и/или m3u файл. Смотришь как он устроен и пишешь читалку для него (ну и сохранялку, если нужна). m3u вообще, если не ошибаюсь, просто список файлов с полным путем.

Ребят, давайте задавать вопросы, над которыми действительно надо думать. Что, лень скачать (вариант, купить) пару книжек и их ВНИМАТЕЛЬНО прочитать, что бы владеть хотя бы основами
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 18:17.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter