Вверх ↑
Этот топик читают: Гость
Ответов: 232
Рейтинг: 6
#91: 2008-06-18 15:14:25 ЛС | профиль | цитата
Блин как сложно выглядит все а... Чувствую себя блондинкой )
карма: 0

0
Разработчик
Ответов: 26163
Рейтинг: 2127
#92: 2008-06-18 16:15:05 ЛС | профиль | цитата
Antonio DieS, на, попробуй. Что-то читает, но пока неизвестно как. И я, пока, не знаю, как переключиться на следующий файл.

code_9299.txt
карма: 22

0
файлы: 1code_9299.txt [10.3KB] [667]
Ответов: 232
Рейтинг: 6
#93: 2008-06-18 16:42:10 ЛС | профиль | цитата
Компилируется но не запускается ( ни ошибки ничего, в процесах не пояляется.
------------ Дoбавленo:

Отсоединяю точку doREAD и запускается.
------------ Дoбавленo:

в 168 запустилось на ура.
------------ Дoбавленo:

Но у меня проект то в 167, можноли скопировать компонент дельфи в 167 версию будет работать ?
карма: 0

0
Разработчик
Ответов: 26163
Рейтинг: 2127
#94: 2008-06-18 16:42:44 ЛС | профиль | цитата
Antonio DieS, bass.dll может быть не тот. Помести bass.dll новейшей версии в папку Винды, или в папку программы. У меня именно это было
карма: 22

0
Ответов: 232
Рейтинг: 6
#95: 2008-06-18 16:43:11 ЛС | профиль | цитата
В 168 кстате ошибка с прозрачностью из за ХР стиля происходит смещение маски на 3 пикселя Верх и лево.
карма: 0

0
Разработчик
Ответов: 26163
Рейтинг: 2127
#96: 2008-06-18 16:45:53 ЛС | профиль | цитата
Antonio DieS писал(а):
можноли скопировать компонент дельфи в 167 версию будет работать

Там IC, должен работать в новых версиях
карма: 22

0
Ответов: 232
Рейтинг: 6
#97: 2008-06-18 16:47:58 ЛС | профиль | цитата
const
urls: array[0..9] of string = ( // stream URLs
'http://www.radioparadise.com/musiclinks/rp_128-9.m3u','http://www.radioparadise.com/musiclinks/rp_32.m3u',
'http://www.sky.fm/mp3/classical.pls','http://www.sky.fm/mp3/classical_low.pls',
'http://www.sky.fm/mp3/the80s.pls','http://www.sky.fm/mp3/the80s_low.pls',
'http://bassdrive.com/v2/streams/BassDrive.m3u','http://bassdrive.com/v2/streams/BassDrive3.m3u',
'http://somafm.com/secretagent.pls','http://somafm.com/secretagent24.pls'
);




Если в этой строчки заполнить (подстовлять) ссылки прямиком на поток ?
Или посмотреть где он обрабатывает список и выдает чистый урл для вытяжки тэгов?
карма: 0

0
Разработчик
Ответов: 26163
Рейтинг: 2127
#98: 2008-06-18 16:51:07 ЛС | профиль | цитата
Antonio DieS, вытащи в отдельный список и подставляй через верхнюю точку. В IC нет свойств

Antonio DieS писал(а):
Или посмотреть где он обрабатывает список и выдает чистый урл для вытяжки тэгов?

На сервере, дискриптором файла
карма: 22

0
Ответов: 232
Рейтинг: 6
#99: 2008-06-18 16:52:18 ЛС | профиль | цитата
begin

// if (not BASS_Init(-1, 44100, 0, ReadHandle, nil)) then begin
// Err;
// if Assigned(th) then free_and_nil(th);
// exit;
// end;
StrURL := ReadString(_Data, URL); - вот эта строчка интересная )
карма: 0

0
Разработчик
Ответов: 26163
Рейтинг: 2127
#100: 2008-06-18 16:54:45 ЛС | профиль | цитата
Antonio DieS писал(а):
вот эта строчка интересная

И что тут интересного -- чтение верхней точки URL, и если там бублик, то читаем из потока
карма: 22

0
Ответов: 232
Рейтинг: 6
#101: 2008-06-18 17:06:54 ЛС | профиль | цитата
Так а разборщика м3у списка то я и не вижу, тоесть как происходит чтение то списка и выдачи на поток... Бред какойто неужели они не могли придумать чтения прямиком с урла на поток...
------------ Дoбавленo:

HTTP/1.0 404 File Not Found это выдает когда прямиком на файл кажешь в инете. и бублик в виде ошибки (
------------ Дoбавленo:

БУГАГАГАГА Я В ШОКЕ ))))))))))))))))))))

Смотри Неско как здорово получилось : http://nullwave.ru:8000/dark.m3u - Это он воспоизводит!
Но это чушь м3u я сам подставил!!!! Тоесть вместо имени расширения надо ставить тупо м3у
карма: 0

0
Разработчик
Ответов: 26163
Рейтинг: 2127
#102: 2008-06-18 17:07:17 ЛС | профиль | цитата
Antonio DieS писал(а):
Так а разборщика м3у списка то я и не вижу

А я тебе про что говорил -- нет его там, файлы читаются и воспроизводятся последовательно из списка (можно симмитировать проигрывание, но время на чтение всего саиска -- мама не горюй, а трафик-то какой на весь список... ужас просто).
А ну его все нафиг, а то я не рассчитаюсь за трафик, он у меня на работе не халявный.
карма: 22

0
Ответов: 232
Рейтинг: 6
#103: 2008-06-18 17:12:59 ЛС | профиль | цитата
У меня безлимитка, и дома и на работе, но я всеровно сделал попроще поставил ICECast и он тупа на 127,0,0,1 гоняет музыку и усе.
карма: 0

0
Разработчик
Ответов: 26163
Рейтинг: 2127
#104: 2008-06-18 17:13:33 ЛС | профиль | цитата
Antonio DieS писал(а):
Тоесть вместо имени расширения надо ставить тупо м3у

А в чем проблема-то
карма: 22

0
Ответов: 232
Рейтинг: 6
#105: 2008-06-18 17:14:40 ЛС | профиль | цитата
Кстате список я как раз таки понял что лежит рядом в сети с одноименным потоком да ?
------------ Дoбавленo:

Да вот именно совершенно никакой проблемы )
карма: 0

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