Entwickler-Ecke

Multimedia / Grafik - probleme beim volume setzten


matze - Sa 31.05.03 13:03
Titel: probleme beim volume setzten
hallo !!!

ich habe folgenden code:

Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
function SetWaveVolume(const AVolume: DWORD): Boolean;
var
  WaveOutCaps: TWAVEOUTCAPS;
begin
  Result := False;
  if WaveOutGetDevCaps(WAVE_MAPPER, @WaveOutCaps, SizeOf(WaveOutCaps)) = MMSYSERR_NOERROR then
    if WaveOutCaps.dwSupport and WAVECAPS_VOLUME = WAVECAPS_VOLUME then
      Result := WaveOutSetVolume(WAVE_MAPPER, AVolume) = MMSYSERR_NOERROR;
end;


das problem ist, wenn ich mit diesem code die lautstärke des wave outputs regele, wird immer nur der linke kanal aktiviert, also die balance umgestellt.
wieso ??

wie kann ich das verhindern ??

oder kennt jemand einen besseren code um die leutstärke des systems zu setzten. (muss nicht die wave sein, kann auch die gesamtlautstärke sein)


toms - Sa 31.05.03 13:11

Zitat:
oder kennt jemand einen besseren code um die leutstärke des systems zu setzten. (muss nicht die wave sein, kann auch die gesamtlautstärke sein)


http://www.swissdelphicenter.ch/de/showcode.php?id=225

BTW: Obiger Code funktioniert bei mir nicht. D.h es passiert nichts.


matze - Sa 31.05.03 13:29

jo super danke !!

der code läuft bestens !!