Discussion :

[Ardely]

Bonjour,

J'utilise Delphi 10.4 pour créer un simple lecteur de livre audio.
J'ai un fichier audio mp3. Dans mon application, je souhaite que TMediaPlayer lise une phrase à une position précise dans le ficher mp3,
par exemple à partir de 00:01:12.256 à 00:01:15.734 secondes, les 100 nanosecondes sont prise en compte.
Je règle MediaPlayer.CurrentTime à 00:01:12.256, lance MediaPlayer.Play,
et l'arrêt via Timer de 50 ms je fais un stop quant le MediaPlayer.CurrentTime atteint 00:01:15.734

Pour un fichier audio mp3 de 3 minutes, j'ai environ 60 plages précises à positionner.

Mon problème est que, si je position MediaPlayer.CurrentTime à 00 : ?? : ?? . ???
la lecture ne se fait pas correctement à cette position j'ai un décalage de 500 à 1100 ms.

Si je me position au début sur certains fichiers audio, la lecture se fait plus au moins correct,
mais si je me position vers la fin du fichier audio j'ai un décalage.

Sur d'autres fichiers audio j'ai le décalage au début du fichier,
la différence de ces temps n'est pas constant et n'est pas linéaire.

Je constate que le problème apparaît de manière très frappante sur un fichier.
mais il apparaît de façon moins frappante sur un autre fichier.
J'ai aussi des fichiers où le problème est absent.

Tous les fichiers ont le même format. Sous Windows les positions se font correctement.

Ma question est-ce un problème de programmation ou de codecs MP3 ?

Si c'est un problème de codec, comment puis-je déployer et utiliser des codecs avec mon application.
Ou quel serait le meilleur format pour un fichier livre audio.

Je vous serai très reconnaissant pour l'aide.




Le format Audio:

Format : MPEG Audio
Format version : Version 1
Format profile : Layer 3
Format settings : Joint stereo
Bit rate mode : Variable
Bit rate : 161 kb/s
Minimum bit rate : 32.0 kb/s
Channel(s) : 2 channels
Sampling rate : 44.1 kHz
Frame rate : 38.281 FPS (1152 SPF)
Compression mode : Lossy
Writing library : LAME3.97r

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
 
procedure TFormMain.Button1(Sender: TObject);
var
 startTimeLyr : int64 ;
begin
 
  startTimeLyr := 10000 * MilliSecondOfTheDay(StrToDatetime(datetostr(date) + ' ' + '00:01:12.256' ));
 
  MediaPlayer1.CurrentTime := startTimeLyr  ;
 
end;

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
function TFormMain.EndTimeLyr: int64;
begin
 
  DTendLyr := StrToDatetime(datetostr(date) + ' ' + '00:01:15.734' );
  result := 10000 * MilliSecondOfTheDay(DTendLyr);
 
end;

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
 
procedure TFormMain.Timer1Timer(Sender: TObject);
begin
...
 if MediaPlayer1.CurrentTime > EndTimeLyr then 
  begin
   MediaPlayer1.Stop;
  Timer1.Enabled := False;
  end;
 
end;

[ShaiLeTroll]

Le temps serait-il calculé selon le nombre de bit, donc un bit rate variable qui améliore la compression des silences et la qualité du reste pourrait-il jouer ?
Car faut forcément lire les données pour faire les sauts temporels en fonction du bit rate de chaque segment
Si l'on fait un raccourci en supposant un bit rate constant, c'est évidemment plus rapide (pas besoin de lire le fichier, juste un saut) mais erroné sur un bit rate variable.

sur iPhone, certains MP3 font même planté toute la couche du décoder, un titre qui plante, le lecteur ne lit plus rien du tout, reboot du téléphone, ça avec même l'appli native.

[pprem]

Bonjour

Est-ce que la durée totale de la diffusion apparaît avec la même valeur sur Windows et Android pour tes fichiers ?

[Ardely]

Bonjour

Est-ce que la durée totale de la diffusion apparaît avec la même valeur sur Windows et Android pour tes fichiers ?

Voici le test que je viens de faire pour MediaPlayer1.Duration

sous Windows ça me donne 00:04:47.012
sous Android ça me donne 00:04:47.051

avec d'autres fichiers, j'ai une petite différence, mais pas plus de 50 ms

[Ardely]

Le temps serait-il calculé selon le nombre de bit, donc un bit rate variable qui améliore la compression des silences et la qualité du reste pourrait-il jouer ?
Car faut forcément lire les données pour faire les sauts temporels en fonction du bit rate de chaque segment
Si l'on fait un raccourci en supposant un bit rate constant, c'est évidemment plus rapide (pas besoin de lire le fichier, juste un saut) mais erroné sur un bit rate variable.

sur iPhone, certains MP3 font même planté toute la couche du décoder, un titre qui plante, le lecteur ne lit plus rien du tout, reboot du téléphone, ça avec même l'appli native.

Donc, si je comprends bien, pour les fichiers audiobook (non musical) c'est peut-être préférable de prendre Constant bitrate pour un meilleur positionnement.

Joue-t-il un rôle si je prends 112 ou 96 kbit/s ou Mono / Stereo.

Je pense pour écouter du texte, en Mono c'est suffisant et en plus le fichier deviendra plus petit.

Je ne sais pas quel paramètre est meilleur, pour que je me puisse positionner sur la bonne plage que je lui donne.

Je vais faire des tests ...

[pprem]

Voici le test que je viens de faire pour MediaPlayer1.Duration

sous Windows ça me donne 00:04:47.012
sous Android ça me donne 00:04:47.051

avec d'autres fichiers, j'ai une petite différence, mais pas plus de 50 ms

C'est chelou mais au moins c'est la durée interprétée par l'API de traitement du son. Par conséquent je recommande de faire du positionnement au prorata plutôt qu'en dur avec la même valeur sur toutes.

Sous Windows calcule tes valeurs et stocke la durée totale.
Sur les autres plateformes fais une règle de trois pour chaque position qui t'intéresse.

Avec un peu de chance l'intégralité est modifiée et pas juste une partie (mais c'est pas gagné).

[Ardely]

j'ai essayé de convertir le fichier audio en plusieurs formats avec des combinations
différents a chaque fois.

example avec,

- audio chaneles Mono/ Stereo
- Bitrate Mode VBR / ABR / VBR
- Bitrate 56 à 320
- Encoding alogorithm 0 à 9
- etc..

Les résultats sont très décevants, car avec tous ses formats que j'ai essayés, les positionnements ne se font pas correctement.

Je note aussi que les positionnements que je fais, se font sur une plage de coute silence (sans voix).

Si je me positionnement sur des plages avec voix le positionnement se fait correctement...!! étrange comportement .. !!

Dois-je investir ma programmation dans cette direction surtout si je veux une application Windows/IOS/Android ...

Merci pour les infos

[Ardely]

C'est chelou mais au moins c'est la durée interprétée par l'API de traitement du son. Par conséquent je recommande de faire du positionnement au prorata plutôt qu'en dur avec la même valeur sur toutes.

Sous Windows calcule tes valeurs et stocke la durée totale.
Sur les autres plateformes fais une règle de trois pour chaque position qui t'intéresse.

Avec un peu de chance l'intégralité est modifiée et pas juste une partie (mais c'est pas gagné).

Excusez-moi, je ne suis pas sûr d'avoir bien compris ce que vous me proposez,

pourriez-vous m'en dire davantage sur la façon de le faire.

Merci pour l'aide apportée.

[SergioMaster]

Je n'utilise pas Tmediaplayer très souvent et toujours pour des sons "entiers".
Naïvement j'espérais des évènements du dit composant qui aurait pu gérer le temps écoulé, grosse déception !

Par contre, je vois l'utilisation d'un Timer, j'utilise de plus en plus un TStopwatch (system.Diagnostics) peut-être plus précis ?