quickmic
16.12.2004, 09:10
Hi Stefan...
Erstmal vielen Dank für das Update auf die 1.5er Version... Teste auch schon fleissig, und da ist mir gleich beim Ogg-Format eine kleine Ungereimtheit aufgefallen...
Wenn ich die Ogg-Daten einfach so rausschreibe:
genie.OggArtist = frmMain.interprettag.Caption 'Interprettag setzen
genie.OggTitle = frmMain.titeltag.Caption ' titel setzen
genie.OggAlbum = frmMain.Albumtag.Caption 'Album setzen
genie.OggDate = frmMain.yeartag.Caption 'Jahr setzen
genie.OggGenre = frmMain.genretag.Caption 'Genre setzen
genie.OggComment = frmMain.Labeltag.Caption 'Label setzen
genie.SaveOggtoFile tagfile 'wird sepeichert
Wird das Song-file zerstört (hat nur noch 1kb)
Wenn ich aber vorher die Infos auslesen lasse geht es:
genie.FileInfo tagfile
genie.OggArtist = frmMain.interprettag.Caption 'Interprettag setzen
genie.OggTitle = frmMain.titeltag.Caption ' titel setzen
genie.OggAlbum = frmMain.Albumtag.Caption 'Album setzen
genie.OggDate = frmMain.yeartag.Caption 'Jahr setzen
genie.OggGenre = frmMain.genretag.Caption 'Genre setzen
genie.OggComment = frmMain.Labeltag.Caption 'Label setzen
genie.SaveOggtoFile tagfile 'wird sepeichert
Bei mp3/mp2 (mehr hab ich noch nicht getestet), braucht man aber zuvor diese "genie.FileInfo" nicht auslesen... Da gehts gleich direkt...
Coverunterstützung werd ich in den nächsten Tagen testen... Falls es Probleme gibt, sag ich dir wieder bescheid.
Also nochmal Danke!!! :)
mfg
quickmic
Erstmal vielen Dank für das Update auf die 1.5er Version... Teste auch schon fleissig, und da ist mir gleich beim Ogg-Format eine kleine Ungereimtheit aufgefallen...
Wenn ich die Ogg-Daten einfach so rausschreibe:
genie.OggArtist = frmMain.interprettag.Caption 'Interprettag setzen
genie.OggTitle = frmMain.titeltag.Caption ' titel setzen
genie.OggAlbum = frmMain.Albumtag.Caption 'Album setzen
genie.OggDate = frmMain.yeartag.Caption 'Jahr setzen
genie.OggGenre = frmMain.genretag.Caption 'Genre setzen
genie.OggComment = frmMain.Labeltag.Caption 'Label setzen
genie.SaveOggtoFile tagfile 'wird sepeichert
Wird das Song-file zerstört (hat nur noch 1kb)
Wenn ich aber vorher die Infos auslesen lasse geht es:
genie.FileInfo tagfile
genie.OggArtist = frmMain.interprettag.Caption 'Interprettag setzen
genie.OggTitle = frmMain.titeltag.Caption ' titel setzen
genie.OggAlbum = frmMain.Albumtag.Caption 'Album setzen
genie.OggDate = frmMain.yeartag.Caption 'Jahr setzen
genie.OggGenre = frmMain.genretag.Caption 'Genre setzen
genie.OggComment = frmMain.Labeltag.Caption 'Label setzen
genie.SaveOggtoFile tagfile 'wird sepeichert
Bei mp3/mp2 (mehr hab ich noch nicht getestet), braucht man aber zuvor diese "genie.FileInfo" nicht auslesen... Da gehts gleich direkt...
Coverunterstützung werd ich in den nächsten Tagen testen... Falls es Probleme gibt, sag ich dir wieder bescheid.
Also nochmal Danke!!! :)
mfg
quickmic