کم کردن نور مانیتور در ویژوال بیسیک 6

[reza234]

سلام دوستان من با ویژوال بیسیک 6 این کد رو نوشتم ولی اون رو روی سیستم خودم امتحان کردم و نور مانیتور پایین اومد ولی نمی تونم درستش کنم و با دگمه های روی مانیتور هم درست نمی شه .
لطفا کمک




Option Explicit
Private Ramp1(0 To 255, 0 To 2) As Integer
Private Ramp2(0 To 255, 0 To 2) As Integer
Private Declare Function GetDeviceGammaRamp Lib "gdi32" (ByVal hdc As Long, lpv As Any) As Long
Private Declare Function SetDeviceGammaRamp Lib "gdi32" (ByVal hdc As Long, lpv As Any) As Long
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)
Private Sub Form_Load()
'----------------------------------------------------------------
Dim iCtr As Integer
Dim lVal As Long
'----------------------------------------------------------------
GetDeviceGammaRamp Me.hdc, Ramp1(0, 0)
For iCtr = 0 To 255
lVal = Int2Lng(Ramp1(iCtr, 0))
Ramp2(iCtr, 0) = Lng2Int(Int2Lng(Ramp1(iCtr, 0)) / 2)
Ramp2(iCtr, 1) = Lng2Int(Int2Lng(Ramp1(iCtr, 1)) / 2)
Ramp2(iCtr, 2) = Lng2Int(Int2Lng(Ramp1(iCtr, 2)) / 2)
Next iCtr
SetDeviceGammaRamp Me.hdc, Ramp2(0, 0)

End Sub

Public Function Int2Lng(IntVal As Integer) As Long

CopyMemory Int2Lng, IntVal, 2

End Function
Public Function Lng2Int(Value As Long) As Integer

CopyMemory Lng2Int, Value, 2

End Function

[vbhamed]

سلام

ورودتون رو به سايت برنامه نويس تبريك مي گم

تو حلقه For به جاي 2 / بزار 2 *

[night_secret]

آقای vbhamed کمکم کن من دو بار برنامه رو با 2* اجرا کردم کل مونیتورم به هم ریخت:عصبانی++:

[vbhamed]

سلام
يعني چي ؟ رنگهاش بهم ريخت ؟
براي منم البته يك بار اينطوري شد كه با يك ريست درست شد
ولي كلا، هر تغييري مي دين همون رو بايد برگردونيد
يعني مثلا اگر يكبار / 2 كردين بايد يكبار * 2 كنيد

[M.T.P]

روشنایی مانیتور به هم نخورده نظیمات گامای کارت گرافیک رو دستکاری میکنه.
اگه چیپ کارت گرافیکتون Nvidia باشه تو کنترل پنلش یه تنظیمات گاما داره ، احتمالا برنامه شما اونو تغییر میده.

[night_secret]

سلام
يعني چي ؟ رنگهاش بهم ريخت ؟
براي منم البته يك بار اينطوري شد كه با يك ريست درست شد
ولي كلا، هر تغييري مي دين همون رو بايد برگردونيد
يعني مثلا اگر يكبار / 2 كردين بايد يكبار * 2 كنيد
نه من دو بار 2* کردم ولی هر کاری کردم درست نشد فقط با رسیت درست میشه راهشو میدونید باید چی بکنم؟؟؟:متفکر:

[vbhamed]

سلام

كاري كه اين برنامه مي كنه تو تنظيمات كارت گرافيك nVidia قابل برگشت نيست

[alirezash]

دوست عزیز از سایت nvidia فایل آپدیت کارت گرافیک رو بگیر ( البته خودش برات پیدا می کنه ) مشکلت حل میشه