Thema: Delphi WMA TAGs auslesen

Einzelnen Beitrag anzeigen

dominikkv

Registriert seit: 30. Sep 2006
Ort: Gundelfingen
1.109 Beiträge
 
Delphi 2007 Professional
 
#1

WMA TAGs auslesen

  Alt 24. Jun 2007, 20:09
Hi

zur zeit benutze ich die ATL (Audio Tools Library) um den TAG aus einem WMA-File zu lesen.
Allerdings hab ich festgestellt das das Album und die Tracknummer nur manchmal richtig ausgelesen werden, in den meisten fällen kommt einfach nur '' oder 0 raus.
Ich weiß aber das diese Informationen im File enthalten sind, da diese im Explorer und in Winamp richtig angezeigt werden.

Hier der Code wie ich die TAGs hole:

Delphi-Quellcode:
function TMusicInfo.LoadWma(Source: string): Boolean;
begin
  result := false;

  if WmaFile.ReadFromFile(Source) then
    if WmaFile.Valid then
      begin
        pTyp := Wma;
        pTitle := WmaFile.Title;
        pAlbum := WmaFile.Album;
        pArtist := WmaFile.Artist;
        pGenre := WmaFile.Genre;
        pBitRate := WmaFile.BitRate;
        pTrack := WmaFile.Track;
        pDuration := WmaFile.Duration;
        result := True;
      end;
end;
Wie gesagt, Titel und Interpret etc werden richtig ausgelesen, nur Album und Tracknummer (Track) werden in ca 80% der Files als leerer String bzw 0 zurückgegeben.

Hat jemand eine Idee wie ich das hinbekomme oder eine andere Lösung mit der ich an die TAGs komme?
Vielen dank,
mfg.Dominik
Dominik
  Mit Zitat antworten Zitat