[Erledigt] Tags auslesen (mp3, m4a, mp4 etc)

[charlytango]

Hi,

ich möchte mit der Tags Library 1.0.104.172 Tags aus diversen Formaten auslesen, denn die schafft eine umfassende Zahl unterschiedlicher Tagformate mit quasi einer Syntax.

An sich ist sie für Delphi und Lazarus verfügbar. Habe ein beiliegendes Delphi Tutorial nach Lazarus konvertiert und für mp3 Dateien läuft es perfekt.

Bei M4A Dateien (also aus der Typgruppe MP4) bekomme ich seltsame Ergebnisse.
Die beiliegende EXE liest die Tags sauber aus.

Screenshot Own EXE.png (25.33 KiB) 1509 mal betrachtet

Mit der konvertierten Demo (soweit ich beurteilen kann der gleiche Code wie die Delphi-compilierte EXE) gibt es eine Einführung in fernöstliche Schriftzeichen.

Screenshot Tags Lib Tut.png (30.8 KiB) 1509 mal betrachtet

Das Programm MP3Tag liest die Tags übrigens auch sauber aus.

Meiner Vermutung folgend habe ich UTF8ToSys versucht, aber leider ohne Erfolg.
Mail an den Hersteller ist raus, aber vielleicht kennt jemand eine mögliche Ursache ?

Falls sich jemand näher damit beschäftigen mag kann ich den Code posten.

THX

[theo]

K.A. Schon mal mit OvoTag probiert?
https://github.com/varianus/ovoplayer/t ... src/ovotag

[af0815]

Ich würde mir mal im Debugger ansehen, was da wirklich gelesen wird. Nicht das da UTF-8 (Lazarus) und UTF-16 (Delphi) irgendwie verwürfelt wird.

[charlytango]

K.A. Schon mal mit OvoTag probiert?
https://github.com/varianus/ovoplayer/t ... src/ovotag

auf dein Anraten hab ich mal versucht das Beispielprogramm zu kompilieren.

Code: Alles auswählen

  HaveID3 := (ID1[0] = 'I') and (ID1[0] = 'D') and (ID1[0] = '3');  

file_mp4.pas(314,19) Error: range check error while evaluating constants (0 must be between 1 and 4)

keine Ahnung was da bemängelt wird.

Das komplette Programm (ovoplayer) lässt sich auch nicht kompilieren

[af0815]

ID1[0] will nicht haben, das du da index 0 verwendest. 1 bis 4 sind da nur erlaubt. Null liegt mal nicht zwischen 1-4

[charlytango]

ID1[0] will nicht haben, das du da index 0 verwendest. 1 bis 4 sind da nur erlaubt. Null liegt mal nicht zwischen 1-4

langsam mit den alten Pferden
nicht ich -- war eine zeile aus dem OVO-Player der mir empfohlen wurde ggg

Ich mag es wirklich sehr wenn nicht mal die Beispielprogramme kompilierbar sind grrr

[af0815]

Deswegen habe ich gemeint, das du dir bei deinem eigentlichen Programm mal ansiehst was im String drinnensteht. Das ganze kommt ja aus einer c-dll, soweit ich das gelesen habe. Da ist es günstig mal anzusehen, was wirklich daherkommt. Wen die DLL Delphikompatibel ist, so muss man mit UTF-16 rechnen. Ist mir selbst schon passiert, der Code läuft unter Delphi, derselbe Code macht aber komische Zeichen unter Lazarus - es war UTF-16 was ich über die Schnittstelle bekam.

[charlytango]

K.A. Schon mal mit OvoTag probiert?
https://github.com/varianus/ovoplayer/t ... src/ovotag

das Beispielprogramm tut es immer noch nicht wirklich... aber es sieht so aus als ob ovotag nicht ALLE möglichen Tags ausliest -- ich bin jetzt wieder bei meiner ersten Frage

[charlytango]

Nur zur Info falls jemand eine Taglibrary sucht:

Innerhalb von 12 Stunden (über Nacht) hat der Entwickler eine adaptierte Version geschickt.
Jetzt werden die M4A Tags sauber ausgelesen.

Tags Library

Folgende Formate werden unterstützt:

WAV, WAVE, RF64, BWF
APE, MPC, WV, OFR
MP4, M4A, M4B, ALAC
WMA, WMV, ASF
FLAC, FLA, FLC, OGA
OGG, OPUS, OGV,
MPG, MP1, MP2, MP3, MPA
AIFF, AIF, AIFC, AFC
DSF, DFF

case closed