Ĺadny brzuch
Witam
potrzebuje w moim programie funkcji wyciszenia systemu i przywrócenia poprzedniej głosności, czyli poprostu sterowanie głównym suwakiem głosnosci w windowsie.
znalazłem co prawda kilka kodów opierających się na
auxSetVolume lub waveOutSetVolume z MMSystem, ale nie działają, getVolume zwraca stałe wartości, a setVolume wydaje się nie działać wogóle.
chyba powinna być jakaś funkcja winAPI odpowiadajaca za to?
Pokaż kod z waveOutSetVolume :>
Użytkownik Cyrkiel edytował ten post 26 kwiecień 2008, 21:31
procedure WaveSetVolume(LVol,RVol:Byte); begin waveOutSetVolume(WAVE_MAPPER,Integer(((LVol shl 8) or (RVol shl 24)))); end; procedure WaveGetVolume(var LVol:Byte;var RVol:Byte); var Vol: Integer; begin waveOutGetVolume(WAVE_MAPPER,@Vol); LVol:=Hi(Vol); RVol:=Vol shr 24; end;
i kilka modyfikacji tego kodu (w każdym razie od tego zacząłem :) ), obiło mi sie o uszy że to moze być wina Visty (kwestia uprawnień programu).
http://cid-1935db554.../VistaMixer.rar
dzięki właśnie tego potrzebowałem,
zobacze co dam radę z tego wyciągnać ;)
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
potrzebuje w moim programie funkcji wyciszenia systemu i przywrócenia poprzedniej głosności, czyli poprostu sterowanie głównym suwakiem głosnosci w windowsie.
znalazłem co prawda kilka kodów opierających się na
auxSetVolume lub waveOutSetVolume z MMSystem, ale nie działają, getVolume zwraca stałe wartości, a setVolume wydaje się nie działać wogóle.
chyba powinna być jakaś funkcja winAPI odpowiadajaca za to?
Pokaż kod z waveOutSetVolume :>
Użytkownik Cyrkiel edytował ten post 26 kwiecień 2008, 21:31
procedure WaveSetVolume(LVol,RVol:Byte); begin waveOutSetVolume(WAVE_MAPPER,Integer(((LVol shl 8) or (RVol shl 24)))); end; procedure WaveGetVolume(var LVol:Byte;var RVol:Byte); var Vol: Integer; begin waveOutGetVolume(WAVE_MAPPER,@Vol); LVol:=Hi(Vol); RVol:=Vol shr 24; end;
i kilka modyfikacji tego kodu (w każdym razie od tego zacząłem :) ), obiło mi sie o uszy że to moze być wina Visty (kwestia uprawnień programu).
http://cid-1935db554.../VistaMixer.rar
dzięki właśnie tego potrzebowałem,
zobacze co dam radę z tego wyciągnać ;)