Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.022 c
1-8422
Oleg Barsky
2003-10-22 12:31
2003.11.03
Как узнать существует ли дирректория?


4-8734
Rel_
2003-08-28 11:29
2003.11.03
HDC


14-8634
Mystic
2003-10-07 13:54
2003.11.03
Интересная партия


1-8487
Mag
2003-10-24 17:32
2003.11.03
Бегущая строка


1-8351
Master
2003-10-23 01:16
2003.11.03
Помогите стиль bsnone как ее можна перетакивать???????




   Наверх