Forum: Multimedia
Delphi
by Moyyer,
16. Jan 2005
Hi
Für alle die, die das Problem auch haben, sende ich hier mal noch die Lösung.
(Da scheinbar niemand mehr lust hat sein Wissen zu posten :evil: )
procedure TPlayer.IPlayClick(Sender: TObject);
var I: integer;
nlength: string;
begin
if s = '' then exit;
Forum: Multimedia
Delphi
by Moyyer,
13. Jan 2005
Hallo Alle Zusammen
Ich habe einen Player. Im Internet habe ich gefunden, dass man mit
mcisendstring('status MP3 Length'...) die Länge der MP3-Datei ermitteln kann.
procedure TPlayer.IPlayClick(Sender: TObject);
var I: integer;
nlength: Pchar;
begin
if s = '' then exit;