Lister les périphériques Audio

[Ar-S]

Code : Tout sélectionner

; Code par Progi1984
; Date : 31/07/08

; Description de WAVEOUTCAPS
; http://msdn.microsoft.com/en-us/library/ms713743(VS.85).aspx

Nb = waveInGetNumDevs_()
String.s = ""

For a = 0 To Nb -1
Debug "----------"
S_WAVEOUTCAPS.WAVEOUTCAPS

Debug waveOutGetDevCaps_(a, @S_WAVEOUTCAPS, SizeOf(WAVEOUTCAPS))
Debug S_WAVEOUTCAPS\wMid.w
Debug S_WAVEOUTCAPS\wPid.w
Debug S_WAVEOUTCAPS\vDriverVersion.l

Debug PeekS(@S_WAVEOUTCAPS\szPname)
Debug S_WAVEOUTCAPS\dwFormats.l
Debug S_WAVEOUTCAPS\wChannels.w
Debug S_WAVEOUTCAPS\wReserved1.w
Debug S_WAVEOUTCAPS\dwSupport.l
Debug "----------"
Next 

Nikel chrome !

[djes]

Merci djes...

Pourquoi j'y ai pas pensé ? C'était tellement plus simple que mon for chr...

Ca arrive... J'étais en forme aujourd'hui

[Backup]

ben apparemment ça ne renvoie pas l'existence d'une carte ASIO

hum !

[Kwai chang caine]

ça marche pour une soundmax, merci

[Progi1984]

T'as la référence exact de ta carte, Dobro ?

[Backup]

T'as la référence exact de ta carte, Dobro ?

http://carte-son-interne.e-mu.audiofanz ... age,1.html

[Progi1984]

Tu peux donner le retour du Debug, stp, Dobro ?

[Backup]

----------
0
1
100
1290
SoundMAX Digital Audio
786431
-1
0
44
----------
----------
0
24
54
788
Roland VSC
4095
2
0
44
----------

comme tu peux le voir, il reconnait ma carte soundmax integré a ma carte mere

il reconnais egalement VSC (un prog d'emulation d'expandeur MIDI )

mais aucune trace de ma carte E-Mu0404 Asio

[djes]

L'ASIO est complètement différent d'une carte son normale. En général il y a un pilote spécial. Pourrais-tu plutôt donner une copie d'écran du gestionnaire de périphériques, ou de Sandra ou un truc du même genre, qu'on sache où aller chercher ce truc!

[Backup]

voila

[akuracy]

ben apparemment ça ne renvoie pas l'existence d'une carte ASIO

Peut-être une explication au problème.

Je viens d'essayer le code et je ne comprenais pas pourquoi j'avais juste "Casque" de listé. Cela venait du fait que je n'ai qu'un périphérique d'entrée (microphone) ce qui empêchait de lister tous les périphériques en sortie.

En fait il faut remplacer :

Code : Tout sélectionner

Nb = waveInGetNumDevs_()

par

Code : Tout sélectionner

Nb = waveOutGetNumDevs_()

Merci pour le code en tout cas