09. juli 2012 - 18:04 Der er 2 kommentarer og
1 løsning

Læse index på audio cd

Hej

På audio cd er der ikke ret meget andet end lydinformationer, alligevel er der visse programmer der kan læse en (næsten) entydig id ud af en audio cd, og bruge denne id til at slå op i en database.
F. eks, Easy Cd extractor, Windows mediaplayer.

Hvordan læser man denne id ved hjælp af Delphi?

Jeg har læst lidt på freedb.org om hvordan denne id bruges til at slå op i deres database, men ikke noget om hvordan man generer denne id.
Avatar billede mbsnet Nybegynder
10. juli 2012 - 00:27 #1
Hej, du kan hente serienummeret således:

function getVolumeSerial(aDrive:char):string;
var k,z:dWord;
begin
if aDrive in ['a'..'z'] then dec(aDrive,$20);
if getVolumeInformation(pAnsiChar(aDrive+':\'),nil,0,@k,z,z,nil,0) then
result:=intToHex(k,8) else result:='';
end;

//caption:=getVolumeSerial('d');

..ellers mere info her:

http://www.un4seen.com/forum/?topic=8855.0
17. juli 2012 - 22:12 #2
Hej Mbsnet
Du må hellere lægge et svar, din hjælp var rigtig god.
Jeg brugte hvad der fulgte med CDDB.zip.
Tak for hjælpen.
Avatar billede mbsnet Nybegynder
18. juli 2012 - 11:44 #3
ok, selv tak.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester