Songlänge auslesen

[Sämy]

Hallo

Wie kann man aus einer mp3 datei (wenn möglich auch anderen musikdateien) die abspieldauer auslesen?

besten dank

[Red_Dragon]

über den ID3 Tag google mal danach oder such es im forum solltest eigentlich sehr viel dazu finden...

[Luckie]

Im ID3-Tag steht das nicht drinne. Aber entsprechende Kompinenten (TmediaPlyer oder auch die bass.dll) bieten entsprechende Schnittstellen an.

[toms]

Hi,

Du könntest auch die MPGTools Unit nehmen.

URL http://www.dv.co.yu/mpgscript/download.htm

Zitat:

Base of this unit is TMPEGAudio class which deals with single MPEG audio file. MPEG audio version 1 and 2, layer I, II and III are supported. MPEG Audio compressed WAV files too. It allows easy access to MPEG TAG, and HEADER info (ID3v1.1). Writes TAG to MPEG file, also can completely remove tag from file. You will also find very powerful method which converts string macros (more than 70 predefined macros and option to create your own) to MPEG data. Other class is TMPEGAudioList which deals with lists of MPEG data, including importing data from MPEG files, WinAmp playlists and MPEG Datalists. List sorting capabilities included.

Beispiel:

Code:

uses
  MPGTools; // (Siehe Download)

procedure TForm1.Button1Click(Sender: TObject);
var
  MPEGFile: TMPEGAudio;
begin
   { create object }
  MPEGFile := TMPEGAudio.Create;
  try
   { load data for mp3 song }
    MPEGFile.FileName := 'D:\Mp3s\XYZ.mp3';
    Label1.Caption := IntToStr(MPEGFile.Duration);
   { free }
  finally
    MPEGFile.Free;
  end;
end;

[Sämy]

Danke für die schnellen antworten.
@toms: könntest du dieses pas-file mal bitte posten (bei dem, welches man auf der site downloaden kann, gibt es mir einen syntaxerror, wenn ich compilieren will...)

[toms]

Siehe Anhang...