Einzelnen Beitrag anzeigen

Maekkelrajter

Registriert seit: 8. Mär 2017
Ort: Köln
95 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Cover in WMP Format

  Alt 12. Apr 2018, 18:30
Zitat:
Der WMP speichert sein Cover in einer beliebigen mp3 in einem bestimmten Format und einer speziellen Kennung.

"APIC Image/jpg" wenn ich mich nicht irre.

Dann ist die Frage.
Wird das Cover bzw. der Tag am ende oder Anfang einer Datei gespeichert.
'APIC' ist nach ID3v2.3 der Bezeichner für den Frame, der die Coverbilder enthält.
'Image/Jpeg' ist der sog Mime-Typ, der im Header des Frames hinterlegt ist.

Ausführlichere Informationen findest Du hier: http://id3.org/id3v2.3.0
Und in dieser PDF-Datei:https://de.osdn.net/frs/g_redir.php?....14_letter.pdf
(Seite 62)

Hast Du die MP3FileUtils tatsächlich ausprobiert?

Delphi-Quellcode:

uses mp3FileUtils;

const picfile = 'MeinCoverbild_200x200.jpg';
const mp3file = 'MeinMp3.mp3';


Procedure SetCoverpic;
  var
      MP3Tags: TId3v2Tag;
      PicData: TMemorystream;

begin
  MP3Tags:= TId3v2Tag.Create;
  PicData:= TMemoryStream.Create;
  try
    If (MP3Tags.ReadFromFile(mp3File) = MP3ERR_None) Then
    begin
      Picdata.LoadFromFile(Picfile);
      MP3Tags.SetPicture('image/jpeg', 0, '*', PicData);
      MP3Tags.WriteToFile(mp3file);
    end;
  finally
    FreeAndNIL(MP3Tags);
    FreeAndNIl(PicData);
  end;
end;

//Deklaration von Setpicture:
procedure SetPicture(MimeTyp: AnsiString; PicType: Byte; Description: UnicodeString; stream: TStream);
{
MimeTyp nach Filetyp: 'Image/jpeg' oder 'Image/png'

Pictype: Kennziffer für Cover-Arten:

$00    Other
$01    32x32 pixels 'file icon' (PNG only)
$02    Other file icon
$03    Cover (front)
$04    Cover (back)
[...] usw. bis $14

Description: Dasselbe als Text; '*' entspricht 'other'.

stream: Die eigentlichen Bilddaten;
}
Mein WMP (V12) zeigt das mit dieser Routine im MP3-File eingebettete Cover jedenfalls korrekt an.

Gruß LP
  Mit Zitat antworten Zitat