Mp3FileUtils.pas Zugriffsverletzung beim schreiben von Tags.

[MisterSonic]

Halli hallo liebe Leute,

ich habe mir die Mp3FileUtils.pas von Gausi hier aus dem Forum geladen und damit versucht einen ID3Tag in eine Datei zu schreiben, mit folgendem Code ...

Code:

        stream := TFileStream.Create(Datei,fmOpenRead or fmShareDenyWrite);
 // ID3-Tag auslesen
        Id3v2Tag.ReadFromStream(stream);
 // an das Ende des Tags springen
        if Not Id3v2Tag.exists then
         stream.Seek(0, sobeginning)
        else
         stream.Seek(Id3v2Tag.size, soFromBeginning);
  
         Id3v2Tag.Artist := Interpret;
         Id3v2Tag.Title  := Titel;
         Id3v2Tag.Genre  := Genre;
         Id3v2Tag.Year   := Jahr;
         Id3v2Tag.Comment:= datetostr(datum)+' / '+timetostr(datum);
         Id3v2Tag.WriteToStream(Stream);
 
        stream.free;

Diesen Code habe ich aus der beiligenden Manual und hab ihn für meine Bedürfnisse angepasst ..., leider erfolgt bei der Ausführung ne Fehlermeldung : Zugriffsverletzung .....

Kann mir da jemand weiterhelfen?

Ich danke euch im vorraus für die Hilfe und Tipps.

Liebe Grüße, Patrick.