Détail de l'API - Visual Basic Research Center

~ Edito ~

12/03/2006 @ 13:39
Depuis la dernière mise à jour (qui remonte à... oulala plusieurs mois), un petit ménage de printemps s'impose. Ca tombe bien, c'est presque la période.
Au menu, et progressivement sur les jours à venir, rafraîchissement de plusieurs fonctions et procédures, nouvelles APIs et nouveaux programmes.

~ Rechercher ~

~ Annuaire VB ~

~ Partenaires ~

Retour à la liste des API

Fonction waveOutGetNumDevs

Declare Function waveOutGetNumDevs Lib "winmm.dll" Alias "waveOutGetNumDevs" () As Long
Versions :
. Windows 95/98 : Oui
. Windows NT : A partir de 3.1
. Windows 2000/XP : Oui

Description :
Cette fonction retourne le nombre de périphérique de sortie audio présents sur le système.
La fonction ne prend aucun argument et retourne 0 en cas d'erreur (ou si aucune carte son n'est installée).

Exemple d'utilisation :

Private Declare Function waveOutGetNumDevs Lib "winmm" () As Long

Private Function CarteSonExiste() As Boolean
' Renvoie "Vrai" si une carte son est présente, sinon "Faux".
Dim lgTMP As Long
lgTMP = waveOutGetNumDevs()
' On récupère dans lgTMP le nombre de cartes son installées.
' Il en faut donc au moins une pour renvoyer "Vrai".
CarteSonExiste = (lgTMP > 0)
End Sub

Retour à la liste des API