işini grür mü? http://greatis.com/delphicb/tips/lib/others-setsoundvolume.html EDİT: Delphi çok iyi bir programlama dili ama programlamaya yeni başladıysan heba etme kendini :) doğru yol java c# tan geçer :) DuPi tarafından 04/Ara/14 17:32 tarihinde düzenlenmiştir Ne zaman birşey ğrenmek istesem, Birden Vaktim Kalmıyor?

yazdığım bir uygulama içinde sndPlaySound ile çaldığım sesleri trackbar daki değere gre kısmak/açmak istiyorum. Genel sesi değil de sadece uygulamanın ses seviyesi değişmeli. MediaPlayer ile bu işi halledebiliyorum ama benim sndPlaySound kullanmam lazım. . Fikri olan var mı? İnternette araştırdım ama bulamadım, bulduklarımdan da anlamadım. Teşekkürler.

hocam sorunu aşağıdaki fonksiyonlarla hallettik. nerin için sağol Dupi. SetWaveVolume(MakeLong ı kullanacağımız yerde çağırıyoruz. ek olarak: function GetWaveVolume : Boolean; var WaveOutCaps: TWAVEOUTCAPS; Volume: DWORD; begin Result := False; if WaveOutGetDevCaps(WAVE_MAPPER,@WaveOutCaps, SizeOf =MMSYSERR_NOERROR then if WaveOutCaps. dwSupport and WAVECAPS_VOLUME=WAVECAPS_VOLUME then begin Result:=WaveOutGetVolume =MMSYSERR_NOERROR; LVol:=LoWord ; RVol:=HiWord ; end; end; function SetWaveVolume : Boolean; var WaveOutCaps: TWAVEOUTCAPS; begin Result:=False; if WaveOutGetDevCaps(WAVE_MAPPER, @WaveOutCaps, SizeOf = MMSYSERR_NOERROR then if WaveOutCaps. dwSupport and WAVECAPS_VOLUME = WAVECAPS_VOLUME then Result:=WaveOutSetVolume =MMSYSERR_NOERROR; end; RockZs tarafından 04/Ara/14 18:10 tarihinde düzenlenmiştir