Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.23;
Скачать: CL | DM;

Вниз

WinAmp - PlayList   Найти похожие ветки 

 
FlyDragon   (2003-06-23 12:18) [0]

Вопрос такой. Нужно загрузить в свою программу плэй лист WinAmp"а (сохраненный на жиске).
Как посоветуете это сделать?
Может через Readln(дайте пример)?
Спасибо!!!


 
Ru ©   (2003-06-23 12:39) [1]

var
F:tetFile; {возможно ошибка}
S:string;
...
begin
Assign(f,"MyList.m3u");
Reset(f);
ReadLn(f,s);
{обработка строки, проверка что за строка поиск нужной информации}
CloseFile(f);
end;


 
FlyDragon   (2003-06-23 13:44) [2]

Как использовать Readln я знаю. Я имел в виду сам алгоритм загрузки информации из "MyList.m3u" (например) в Memo1 и чтение ...


 
Ru ©   (2003-06-23 14:48) [3]

с мемо проще:
Memo1.Lines.LoadFromFile("MyList.m3u");

Это если нужно просто прочитать файл (в чем я сомневаюсь)


 
Poirot ©   (2003-06-23 15:25) [4]

ему похоже парсер надобыло написать - но нафиг это каму надо - сам пиши или предлагай бабки - тривиальная задача!!!


 
Ru ©   (2003-06-23 15:35) [5]

>Poirot © (23.06.03 15:25)
"И я, и я, и я того же мнения" Ослик Иа
Пример файла листа:
#EXTM3U
#EXTINF:174,Океан Эльзы - Вставай
Вставай.mp3
#EXTINF:83,Океан Эльзы - Друг Ч.1
Друг1.mp3

Первая строчка заголовок
Последовательность #EXTINF: - означает, что дальше идет описание взятое из Id3Tag
Цифры это время в секундах.
Дальше "артист - композиция"
следующая строчка это путь к композиции от положения листа, либо абсолютный путь.

Собственно парсить нечего. Начинаем читать с первой строчки:
1. Выкинули #EXTINF:
2. Считали строчку до запятой (запятую выкинуть).
3. Считали название.
4. В следующей строчке путь.
5. пока не конец идти 1.



Страницы: 1 вся ветка

Текущий архив: 2003.10.23;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.031 c
3-74029
uu
2003-10-03 13:01
2003.10.23
sql error


8-74326
oic
2003-06-21 22:08
2003.10.23
Как из делфи отсканировать или сфотографировать рисунок


1-74173
Lam
2003-10-10 14:02
2003.10.23
File


1-74271
senya
2003-10-13 10:42
2003.10.23
BLOB -> TImage


14-74477
Yanis
2003-10-03 10:44
2003.10.23
Про Assembler