Détecteur du volume du son

Soyez le premier à donner votre avis sur cette source.

Vue 3 933 fois - Téléchargée 585 fois

Description

Une sorte de VISUAL comme dans winamp mais en plus....laid ;p

Source / Exemple :


zip

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
149
Date d'inscription
lundi 17 décembre 2001
Statut
Membre
Dernière intervention
5 février 2006

j'ai plus l'erreur... mais quand j'appuye sur le bouton il lance winamp avec le microsoft sound : je l'entends, mais rien ne change sur ton visual.
juste les lignes oranges qui avance tjrs de la meme maniere
je vois pas a quoi sert le shpe ni les images en haut, ni la barre de progression...
si tu pouvais me dire où t'a trouvé la source (en anglais, le module au moins :-) j'essayerais d'en faire qque chose. merci
@+
Messages postés
363
Date d'inscription
jeudi 20 décembre 2001
Statut
Membre
Dernière intervention
25 août 2003

ben au moins ca met kk chose pour ceux ki ont le message !!! moi j'ai un depassement de capacité !!!!
remarque c ptetre parske j'ai win2k...
Messages postés
415
Date d'inscription
mardi 3 avril 2001
Statut
Membre
Dernière intervention
26 avril 2008

ben la ligne de code du message est:

' Get the output volume meter
ok = GetControl(hmixer, MIXERLINE_COMPONENTTYPE_SRC_WAVEOUT, MIXERCONTROL_CONTROLTYPE_PEAKMETER, outputVolCtrl)

If (ok = True) Then
ProgressBar1.Min = 0
ProgressBar1.Max = outputVolCtrl.lMaximum
Else
ProgressBar1.Enabled = False
MsgBox "Erreur au chergement du détecteur de volume"
End If


je vois pas le probleme la... je renvoie le zip sans le ELSE... voir c koi sa fait
Messages postés
415
Date d'inscription
mardi 3 avril 2001
Statut
Membre
Dernière intervention
26 avril 2008

ben la ligne de code du message est:

' Get the output volume meter
ok = GetControl(hmixer, MIXERLINE_COMPONENTTYPE_SRC_WAVEOUT, MIXERCONTROL_CONTROLTYPE_PEAKMETER, outputVolCtrl)

If (ok = True) Then
ProgressBar1.Min = 0
ProgressBar1.Max = outputVolCtrl.lMaximum
Else
ProgressBar1.Enabled = False
MsgBox "Erreur au chergement du détecteur de volume"
End If


je vois pas le probleme la... je renvoie le zip sans le ELSE... voir c koi sa fait
Messages postés
415
Date d'inscription
mardi 3 avril 2001
Statut
Membre
Dernière intervention
26 avril 2008

ma rgarder sa...
Afficher les 7 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.