Ustawienia dzwieku pod suwakiem ScrollBar

Witam mam maly problem bo nie wiem jak ustawic regulacje glosnosci dzwieku (wav) pod suwakiem ScrollBar ( sok suwaka 0-15)

Proponuję wrzucić na formę TrackBara i w OnChange wywołać funkcję API waveOutSetVolume, podając jako parametr głośność wartość Position. Jak widzisz dwVolume ma wartość podwójnego słowa. Jak zapisać pod starsze i młodsze słowo, pomyśl sam (proponuję napisac funkcję).

MMRESULT waveOutSetVolume(

    HWAVEOUT hwo,	
    DWORD dwVolume	
   );	

hwo jest to uchwyt urządzenia
dwVolume - głośność dla prawego i lewego głośnika. 0x0000 to max wyciszenie, 0xffff to maksymalna głośność.

Przykład wywołania: waveOutSetVolume(0, $90009000);