PDA

View Full Version : سوال: کد اطلاع از وضعیت خاموش یا روشن بودن مانیتور



mafmaf
پنج شنبه 22 دی 1390, 11:37 صبح
سلام دوستان
کدی دارم که بعد مدتی صفحه مانیتور را خاموش میکند.حالا ایا کدی هست که از خاموش یا روشن بودن صفحه مانیتور اطلاع بده؟

nokhodsiah2001
جمعه 23 دی 1390, 12:49 عصر
درود دوست من

ميشه كدت رو ببينم حتماً تو خود كدت جواب سوالت هم هست

mafmaf
جمعه 23 دی 1390, 14:19 عصر
این هم کد :چشمک:

public Class Form1


Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Int32, ByVal wMsg As Int32, ByVal wParam As Int32, ByVal lParam As Int32) As Int32
Const MONITOR_ON As Int32 = -1
Const MONITOR_OFF As Int32 = 2
Const SC_MONITORPOWER As Long = &HF170&
Const WM_SYSCOMMAND As Long = &H112

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
SendMessage(Me.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_OFF)
Threading.Thread.Sleep(5000)
SendMessage(Me.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_ON)


End Sub
End Class

nokhodsiah2001
شنبه 24 دی 1390, 21:44 عصر
چه باحال:متعجب:
اينجا كه چيزي نيست

gilsoft
یک شنبه 25 دی 1390, 07:59 صبح
احتمالا این کد رو Testنکردی !!!
سطر 13 رو یه نگاه بنداز ... مشکل حل میشه !!
SendMessage(Me.Handle, WM_SYSCOMMAND, SC_MONITORPOWER, MONITOR_ON)

mafmaf
یک شنبه 25 دی 1390, 13:36 عصر
چه باحال
اينجا كه چيزي نيست

من که متوجه نشدم.منظورتون چیه؟


احتمالا این کد رو Testنکردی !!!
سطر 13 رو یه نگاه بنداز ... مشکل حل میشه !!

سطر 13 برای روشن کردن مانیتور است. بعد از مدتی که تعیین کردی.