WaveOutGetVolume [Résolu]
Nicolas___
- Messages postés
- 1039
- Date d'inscription
- jeudi 2 novembre 2000
- Dernière intervention
- 24 avril 2013
A voir également:
- Waveoutgetvolume
- Waveoutcaps - Meilleures réponses
- Delphi dword - Meilleures réponses
13 réponses
Meilleure réponse
Salut,
Il te manque des trucs dans ta fonction : Essaye ca
function GetWaveVolume(var Vol: DWORD): Boolean;
var
WaveOutCaps: TWAVEOUTCAPS;
Volume: DWORD;
begin
Result := False;
if WaveOutGetDevCaps(DEVICE_IDENTIFIER, @WaveOutCaps, SizeOf(WaveOutCaps)) = MMSYSERR_NOERROR then
if WaveOutCaps.dwSupport and WAVECAPS_VOLUME = WAVECAPS_VOLUME then
begin
Result := WaveOutGetVolume(DEVICE_IDENTIFIER, @Volume) = MMSYSERR_NOERROR;
Vol := Volume;
{Pour trouver le son de gauche ou de droite
LVol := LoWord(Volume);
RVol := HiWord(Volume);}
end;
end;
Il te manque des trucs dans ta fonction : Essaye ca
function GetWaveVolume(var Vol: DWORD): Boolean;
var
WaveOutCaps: TWAVEOUTCAPS;
Volume: DWORD;
begin
Result := False;
if WaveOutGetDevCaps(DEVICE_IDENTIFIER, @WaveOutCaps, SizeOf(WaveOutCaps)) = MMSYSERR_NOERROR then
if WaveOutCaps.dwSupport and WAVECAPS_VOLUME = WAVECAPS_VOLUME then
begin
Result := WaveOutGetVolume(DEVICE_IDENTIFIER, @Volume) = MMSYSERR_NOERROR;
Vol := Volume;
{Pour trouver le son de gauche ou de droite
LVol := LoWord(Volume);
RVol := HiWord(Volume);}
end;
end;
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
a aidé 97 internautes ce mois-ci
- Messages postés
- 1105
- Date d'inscription
- dimanche 1 août 2004
- Dernière intervention
- 17 août 2008
Euh, d'après la msdn, c'est un int sur 16 bits qu'il faut donner à la fonction waveOutGetVolume.
Donc il faudrait mettre (var Vol: Word) et non pas DWord !! Sinon, tu passes un type trop grand et donc quand tu récupères, tout est shl 8, ce qui expliquerait ton "gros" résultat.
Donc il faudrait mettre (var Vol: Word) et non pas DWord !! Sinon, tu passes un type trop grand et donc quand tu récupères, tout est shl 8, ce qui expliquerait ton "gros" résultat.
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
a aidé 97 internautes ce mois-ci
- Messages postés
- 1039
- Date d'inscription
- jeudi 2 novembre 2000
- Dernière intervention
- 24 avril 2013
et en plus maintenant je decrouve ca :
http://www.delphifr.com/codes/CONTROL-CHANGER-VOLUME-PRINCIPAL_36595.aspx
(mais forcement qd on confond les termes , c'est plus dur de trouver la bonne source ... )
http://www.delphifr.com/codes/CONTROL-CHANGER-VOLUME-PRINCIPAL_36595.aspx
(mais forcement qd on confond les termes , c'est plus dur de trouver la bonne source ... )
Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire
a aidé 97 internautes ce mois-ci
- Messages postés
- 2684
- Date d'inscription
- jeudi 15 janvier 2004
- Dernière intervention
- 26 juillet 2018
- Messages postés
- 2684
- Date d'inscription
- jeudi 15 janvier 2004
- Dernière intervention
- 26 juillet 2018
- Messages postés
- 1039
- Date d'inscription
- jeudi 2 novembre 2000
- Dernière intervention
- 24 avril 2013
je comprends pas ... ta fonction me donne aussi des resultats débiles :
---------------------------
Controlevolumeson
---------------------------
4294377462
---------------------------
OK
---------------------------
pas normal ! ou alors suis vraiment mauvais , peut etre un piti exemple (Sivouplè )
mais a mon avis c autre chose
Désolé cari , c flo qui a raison :)
Ciao
---------------------------
Controlevolumeson
---------------------------
4294377462
---------------------------
OK
---------------------------
pas normal ! ou alors suis vraiment mauvais , peut etre un piti exemple (Sivouplè )
mais a mon avis c autre chose
Désolé cari , c flo qui a raison :)
Ciao
- Messages postés
- 2684
- Date d'inscription
- jeudi 15 janvier 2004
- Dernière intervention
- 26 juillet 2018
- Messages postés
- 1039
- Date d'inscription
- jeudi 2 novembre 2000
- Dernière intervention
- 24 avril 2013
S'il vous plait , désolé d'insister mais la fonction de Francky ( alors que je suis presque sur qu'elle est bonne) ne m donne toujours pas de bon resultat ...
J'en demande peut etre a la science infuse (lol) de Flo ...
Cari , Flo le combat ? lol
M'enfin je comprend pas le prob ... Ma carte son m'a tjs refiler que des *** !
J'en demande peut etre a la science infuse (lol) de Flo ...
Cari , Flo le combat ? lol
M'enfin je comprend pas le prob ... Ma carte son m'a tjs refiler que des *** !
- Messages postés
- 1039
- Date d'inscription
- jeudi 2 novembre 2000
- Dernière intervention
- 24 avril 2013
Merci Flo ,c ca .... MAIS SURTOUT
DESOLE DESOLE DESOLE ...
je savais bien qu'il y avait une co**** qq part et je savais que ca devait forcement venir de moi ...
Et ca venais bien de moi , je confondais le volume WAVE et le MASTER volume ...
Forcement je trouvais que les chiffres etaient tjs bizarre vu que j'avais beau Augmenter/Diminuer le niveau sonore ,
mon GetWaveVolume ne semblait jamais bougé ( chose logique maintenat que j'ai enfin compris mon ENORME bourde ;) )
Merci tout de meme d'avoir pris la patience de resoudre mon probleme ( moi je ne l'aurais pas eu :) )
et sorry
DESOLE DESOLE DESOLE ...
je savais bien qu'il y avait une co**** qq part et je savais que ca devait forcement venir de moi ...
Et ca venais bien de moi , je confondais le volume WAVE et le MASTER volume ...
Forcement je trouvais que les chiffres etaient tjs bizarre vu que j'avais beau Augmenter/Diminuer le niveau sonore ,
mon GetWaveVolume ne semblait jamais bougé ( chose logique maintenat que j'ai enfin compris mon ENORME bourde ;) )
Merci tout de meme d'avoir pris la patience de resoudre mon probleme ( moi je ne l'aurais pas eu :) )
et sorry
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.