Jouer une alerte sonore / Bip sur la plate-forme Delphi XE5 / Android
-
21-12-2019 - |
Question
Y a-t-il un moyen de jouer une alerte sonore / bip sur la plate-forme Delphi Xe5 / Android?
Qu'est-ce que j'essaie d'atteindre, c'est comment lire une alerte système / bip Son comme une application Windows à l'aide de la fonction BEEP ou au moins trouver le chemin des fichiers audio du système afin que je puisse exécuter un fichier audio spécifique en fonction d'un événement.
La solution
J'ai fini par utiliser des fichiers de ressources pour lire mon fichier audio personnalisé.
- de Delphi IDE Cliquez sur "Projet".
- Sélectionnez ensuite "Ressources et images ...".
- Choisissez votre fichier multimédia et définissez-le comme RCDATA.
- N'oubliez pas votre identifiant de ressource.
Delphi Procédure:
procedure PlayAudio(ResourceID: string);
var
ResStream: TResourceStream;
TmpFile: string;
begin
ResStream := TResourceStream.Create(HInstance, ResourceID, RT_RCDATA);
try
TmpFile := TPath.Combine(TPath.GetTempPath, 'tmp.mp3');
ResStream.Position := 0;
ResStream.SaveToFile(TmpFile);
MediaPlayer1.FileName := TmpFile;
MediaPlayer1.Play;
finally
ResStream.Free;
end;
end;
Utilisation:
PlayAudio('Resource_1');
Licencié sous: CC-BY-SA avec attribution
Non affilié à StackOverflow