کم و زیاد کردن صدای ویندوز

[oliya24]

سلام دوستان من مدتی هست که در به در دنبال سورسی هستم که با وسیله scrollbar بتونه صدای ویندوز رو کم و زید کنه دوستان توجه کنید کم و زیاد کنه !
اگر کسی بتونه من رو کمک کنه ممنون میشم

[Mani_rf]

این تاپیک جواب گو نیست؟

[Mani_rf]

این برنامه که گذاشتم ، صدا را کم، زیاد، قطع و وصل میکنه.

[pouyansaraf]

سلام جناب مانی
با دستور زیر نتونستم صدا رو ماکسیمم کنم (ویندوز 7)

Shell("e:\nircmd.exe changesysvolume 65535")

آیا برای دستور زیر ماکسیمم وجود دارد؟

SendMessage(Me.Handle, WM_APPCOMMAND, &H30292, APPCOMMAND_VOLUME_UP * &H10000)

فکر کنم اون عدد &H10000 که به صورت UInt32 هست که در &HA در مقدارش ضرب میشود که باید ماکسیمم باشد که نمیدونم چطور تنظیم کنم. با توجه به اون تاپیکی که معرفی کردید.

تو جستجو هام هم تو گوگل فقط مثل کد شما پیدا کردم ولی از ماکسیمم خبری نبود
ممنون میشم راهنماییم کنید. از بقیه دوستان هم اگر نطری دارند ممنون میشم.
در این لینک های زیر یه چیزایی گفته ولی نتونستم استفاده کنم

[omid-vbAuto]

این برنامه که گذاشتم ، صدا را کم، زیاد، قطع و وصل میکنه.

سلام برنامه جالب و با کدهای کمی بود. ولی:

چطوری می تونیم افزایش و یا کاهش صدا رو به مقدار دلخواه کنترل کنیم .مثلا : 1+ یا 5+ یا 10+


آیا این کدهائی که نوشتین کار با API هست؟ اگه نه که مفاهیم تکه کدهای زیر چی می تونه باشه؟؟؟

<DllImport("user32.dll", SetLastError:=True, CharSet:=CharSet.Auto)>

 

و یا :

 

Const APPCOMMAND_VOLUME_UP As UInteger = &HA

 

SendMessage(Me.Handle, WM_APPCOMMAND, &H30292, APPCOMMAND_VOLUME_UP * &H10000)

 

[pouyansaraf]

خوب من که پیدا نکردم

توحلقه گذاشتم . 50 بار تکرار کردم (از نقطه صفر تا 100 ولوم)

For i AsByte = 0 To 50

SendMessage(Me.Handle, WM_APPCOMMAND, &H30292, APPCOMMAND_VOLUME_UP * &H10000)

Next