Discussion :

[Papy214]

Bonjour

Une appli sur tablette Windows développée en FMX sous XE7 !

Le client voudrait entendre un beep system sur une certaine action.
Apparemment, le bon vieux playsound n'existe plus.

Je me dis que je vais passer par un TMediaPlayer:

Code :

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

1
2
3
4
5
6
7
 
  with TMediaPlayer.Create(nil) do
  begin
    Filename := 'C:\Fichiers\beep-02.mp3';
    Play;
    Free;
  end;

Sauf que ........... au clic, je récolte :

---------------------------
Erreur
---------------------------
Fichier media beep-02.mp3.
---------------------------
OK
---------------------------


Une idée du pourquoi du comment ?


Précision: même motif et même punition si je pose un composant TMediaplayer sur la from, que je lui assigne le fichier, et que je lance l'appli. Au démarrage, erreur sur lecture fichier.

[SergioMaster]

Une appli sur tablette Windows développée en FMX sous XE7 !

Le client voudrait entendre un beep system sur une certaine action.
Apparemment, le bon vieux playsound n'existe plus.

Playsound existe encore, en incluant l'unité ShellApi ou MMSystem

Code :

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

 PlaySound(pwidechar('mysound.wav'),0,SND_ASYNC);

mais du coup ce n'est plus portable sur les autres plateformes

je suis sûr d'avoir lu quelque chose au sujet des sons quelque part
j'ai retrouvé ceci mais je sais qu'il y a d'autres lectures sur ce sujet

[free07]

Et sinon le simple Beep(frequence, duration) ne fonctionne pas sur les tablettes Windows ? ( J'en ai pas, je ne peux pas essayer )

Dans l'aide il est spécifié que cela fonctionne sous Windows.

[Papy214]

Avec mmsystem, playsound fonctionne. Problème résolu, merci !

Beep ne sort rien sur la tablette.

Par contre, je ne sais toujours pas pourquoi TMediaPlayer plante sur le mp". (j'ai aussi testé l'équivalent wav mais ça donne le même résultat).

L'important est que j'ai mon "beep".

Merci et bon w-e