Bon je suis désolée pour la question débile qui va suivre mais je dois etre tres fatigué
    ya quelque chose qui cloche dans ma fonction parceque je n'arrive pas a m'en servir !
...
const
      MAX_VOLUME               :integer    =65535;
      MIN_VOLUME                :integer    =0;
      DEVICE_IDENTIFIER     :integer    =0;
...
function  GetVolume():DWORD;
var
  VolumeGeneral: DWORD;
begin
  waveOutGetVolume(DEVICE_IDENTIFIER,@VolumeGeneral);
  result:=VolumeGeneral;
end;
...
  GaugeVolume.MaxValue:=MAX_VOLUME;
  GaugeVolume.MinValue:=MIN_VOLUME;
  GaugeVolume.Progress:=GetVolume;

...

le probleme , ca ne reflete absolument pas mon Volume ( oui oui c'est un assez gros et surement tres *** de probleme Mais la je suis a la limite de la crise de nerf , Desolé mais g pas trouvé d'exemple en utilisant WaveOutGetVolume())

Et en passant , en Delphi c'est quoi l'equivalent de alwaysOnTop ?

Merci

Réponse acceptée !
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;

Salut les gars,   :)))

« En Delphi c'est quoi l'equivalent de alwaysOnTop ? »

BringToFront, je pense.

Euh, je dirais TForm.FormStyle := fsStayOnTop, non ?

Salut Flo,

Euh... Oui pour une form... Mais il peut aussi s'agir d'un compo pendant un drag'n drop, par exemple...

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

pfff
De toute façon j'ai l'habitude. C'est tj Flo qui a raison...

meuuuuuuh non ! j'ai pas la science infuse non plus !
ça se saurait sinon, hein ?

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 *** !

Réponse acceptée !
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.