Einzelnen Beitrag anzeigen

Amateurprofi

Registriert seit: 17. Nov 2005
Ort: Hamburg
1.083 Beiträge
 
Delphi XE2 Professional
 
#15

AW: Problem mit TMediaPlayer

  Alt 7. Jan 2025, 23:30
Moin Klaus,

eventuell könntest Du auch ffmpeg verwenden.
ffmpeg zum Konvertieren und ffprobe zum Prüfen.
Dieses Programm ist zwar meist für Video-Dateien bekannt,
kann aber auch Audio-Dateien.
Ich werde mal versuchen die passenden Parameter rauszusuchen.
Danke, Cristian,
wie ich schrieb, arbeite ich mit WavePad und bin damit auch zufrieden.
Das "Reparieren" einer Datei kostet mich nur einen Klick, der Rest läuft automatisch.
Delphi-Quellcode:
const Fmt='"%S" -saveas "%S" -saveas "%S" -exit';
var WavDsn,S,WP:String;
begin
   ...
   WP:=MPlayer.WavePadPath;
   WavDsn:=ChangeFileExt(Dsn,'.wav'); // Dsn ist der Pfad zur .mp3
   S:=Format(Fmt,[Dsn,WavDsn,Dsn]);
   ShellExecuteW(0,'open',PWideChar(WP),PWideChar(S),Nil,SW_SHOWNORMAL);
end;
Gruß, Klaus
Die Titanic wurde von Profis gebaut,
die Arche Noah von einem Amateur.
... Und dieser Beitrag vom Amateurprofi....
  Mit Zitat antworten Zitat