Svaret på dit spørgsmål:
funktionen hedder
<pre>
waveOutSetVolume(1, DET DU VIL SÆTTE VOLUMEN TIL);
</pre>
Husk at inkludere MMSystem i din uses. Vær opmærksom på at max-volume er 65535, så det hjælper ikke hvis du sætter volume til 100.
Du kan evt. droppe en trackbar på din form og bruge den, det ville nok være det mest brugervenlige.
<pre>
procedure TForm1.Button1Click(Sender: TObject);
begin
waveOutSetVolume(1, TrackBar1.Position);
end;
</pre>
Husk at sætte TrackBar1.Max til 65535.
Med venlig hilsen
Mikkel Bøg Clemmensen
mt.clemmensen@vip.cybercity.dk