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

Вниз

как использовать описание инфоpмационного тэга MP3 ?   Найти похожие ветки 

 
alexsandri ©   (2003-08-23 16:26) [0]

описание инфоpмационного тэга MP3

Offset 00h db "TAG" ;сигнатура информационного тэга
Offset 03h db rep 1Eh (ASCII) ;Hазвание 30 байт ASCII
Offset 21h db rep 1Eh (ASCII) ;Исполнитель 30 байт ASCII
Offset 3Fh db rep 1Eh (ASCII) ;Альбом 30 байт ASCII
Offset 5Dh db rep 04h (ASCII) ;Год 4 байта ASCII
Offset 61h db rep 1Eh (ASCII) ;Комментарий 30 байт ASCII
Offset 7Fh db ? ;Жанр

пожалуцста подскажите как ,ОБРАЩАТЬСЯ К ЭТИМ ПООЛЯМ, если можно
куском кода
спосибо за подсказку


 
Sheng ©   (2003-08-24 10:31) [1]


var
f: File;
ID3Tag_v1: record
Head: array3;
Title: array30;
Artist: array30;
Album: array30;
Year: array4;
Comment: array30;
Genre: Byte;
end;

...

FileMode:=0;
AssignFile(f,ListBox1.Items.Strings[ListBox1.ItemIndex]);
Reset(f,1);
Seek(f,FileSize(f)-128);
BlockRead(f,ID3Tag_v1,128);

CloseFile(f);

// - и в ID3Tag_v1 появится вся инфа.


 
Sheng ©   (2003-08-24 10:32) [2]

array3 = array [1..3] of Char;
array4 = array [1..4] of Char;
array30 = array [1..30] of Char;



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

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

Наверх




Память: 0.47 MB
Время: 0.017 c
1-8390
Aleksandr
2003-10-22 17:56
2003.11.03
Можно ли как-то при помощи директив компилятора изменить exename?


3-8291
Dimon123
2003-10-13 16:03
2003.11.03
Quick report


4-8714
Glajik
2003-08-29 04:18
2003.11.03
Виртуальный диск или ...


1-8363
dolphin1
2003-10-24 15:54
2003.11.03
Процессы


6-8575
Поляков Владимир Викторович
2003-09-09 12:22
2003.11.03
Voice & UDP