Générer un son sous VB (2eme requete plus précise)

Question

Bonjour &#224; tous,

Je reitere ma question en la precisant :

Comment faire pour g&#233;n&#233;rer un son d'une fr&#233;quence donn&#233;e qui commence &#224; l'appui d'une touche (evenement KeyDown) et qui s'arrete &#224; la remont&#233;e de la touche (evenement KeyUp) sous VB6.
Peu importe la qualit&#233; du son (un son sinuso&#239;dal serait le mieux).

NB : L'Api Beep ne peut pas etre utilis&#233;e car on ne peut pas connaitre &#224; l'avance la dur&#233;e du son (2eme parametre de la fonction Beep).

Merci

cs_CanisLupus · Answer

Salut,

Peut-&#234;tre une petite piste ici avec une API :

http://www.mentalis.org/apilist/PlaySound.shtml

Car &#224; part le Beep en VB, je ne vois pas.

Loup Gris

cs_CanisLupus · Answer

Ou alors, utilise un controle mmcontrol (Microsoft Multim&#233;dia Control 6.0) :

dans le .filename : le chemin de ton fichier son
pour l'ouvrir : .command = open
pour le jouer : .command = play
pour l'arr&#234;ter : .command = close (ou stop, je ne sais plus)

Loup Gris

Gobillot · Answer

un Beep un peu plus sophistiqu&#233;

Private Declare Function Beep Lib "kernel32" (ByVal dwFreq As Long, ByVal dwDuration As Long) As Long


Call Beep(2500, 200)

Daniel

Générer un son sous VB (2eme requete plus précise)

3 réponses

Discussions similaires