how to stop the screensaver

M_JaGuar

New member
Joined
Jan 11, 2008
Messages
2
Programming Experience
Beginner
hi ..

i have a media player programme that i made in vb.net 2005
and i wont the screensaver to not show up when iam waching in full screen mode . this is what a got but i dont know how to use it

VB.NET:
      Protected Overrides Sub WndProc(ByRef m As Message)

      Const WM_SYSCOMMAND As Integer = &H112  'A system command has been set
  
      Const SC_SCREENSAVE As Integer = &HF140  'The screensaver is being activated

      If m.Msg = WM_SYSCOMMAND AndAlso m.WParam.ToInt32 = SC_SCREENSAVE Then

      Return Nothing  'Prevent it from calling base.

      End If

      MyBase.WndProc(m)

      End Sub

how can i use this code to stop the screensaver from show up

pleas help ..
 
Simply put the code into your form.

And I would recommend changing it a little to this:
VB.NET:
Protected Overrides Sub WndProc(ByRef m As Message)

      Const WM_SYSCOMMAND As Integer = &H112  'A system command has been set
  
      Const SC_SCREENSAVE As Integer = &HF140  'The screensaver is being activated

      If Not (m.Msg = WM_SYSCOMMAND AndAlso m.WParam.ToInt32 = SC_SCREENSAVE) Then

          MyBase.WndProc(m)

      End If
End Sub
 
Back
Top