Hi,
I am trying to do two things with my form.
1. Disable minimize button
2. Disable the effect of "Show Desktop", "Windows-D" and "Windows-M" effect on my form.
I am using Sub-classing to handle this and have stop the form from minimizing (please see code below). I can't handle the 2nd problem in the list. How do I disable the effect of "Show Desktop" on my form so that it stays up all the time no matter what?
Thanks
Sajjad
Private Const WM_SYSCOMMAND As System.Int32 = &H112
Private Const SC_MINIMIZE As System.Int32 = &HF020
Private Const WM_WINDOWPOSCHANGING As System.Int32 = &H46
Const WM_ERASEBKGND = &H14
Protected Overloads Overrides Sub WndProc(ByRef msg As Message)
'If msg.Msg = WM_ERASEBKGND Then Exit Sub
If msg.Msg = WM_SYSCOMMAND Then
If msg.WParam.ToInt32 = SC_MINIMIZE Then
Else
MyBase.WndProc(msg)
End If
Else
MyBase.WndProc(msg)
End If
End Sub
This Question has been solved and asker verified All Experts Exchange premium technology solutions are available to subscription members.
Experts Exchange has been collecting answers to technology questions since 1996…3 million and counting! If you have a question, chances are we already have your answer.
If you can't find the exact answer you're looking for, ask our exclusive community of 50,000 experts. You’ll get a personalized answer from a trusted professional.
Thousands of free tech tips, tricks, how-to’s and tutorials are available in our peer reviewed articles section. See for yourself how smart our experts are, no login required.
Save solutions to your questions, answers you’ve discovered through searching plus helpful articles in your personal knowledgebase for easy future access.
Access the answers to your technology questions today.
30-day free trial. Register in 60 seconds.
Members of the expert community talk about why the experience at Experts Exchange is different than what you will find anywhere else.
Try it out and discover for yourself.
30-day free trial. Register in 60 seconds.
Join the community of experts here and help other tech pros by answering question in your area of expertise. You can earn FREE access to all Experts Exchange's premium features and resources.
Just to explain what's happening there...
1) The form's resize event is fired when the form is minimized by pressing Windows-D.
2) You have to create a new thread to restore the form as doing it in the same thread doesn't work.
3) A new thread is created which then creates an instance of a delegate, which is then invoked on the main thread, causing the window to be restored.
Hope that helps!
simoncampbell,
I'm running VB.Net 2003 on a WinXP Pro machine. After setting the MinimizeBox to False on a standard form, the WindowState no longer becomes Minimized in the Resize() event after pressing the "Show Desktop" button.
Does this code work on your system?
I set the TopMost property of the Form to True and it was no longer affected by "Show Desktop". You probably don't want it always on the top though...
Thanks for the replies guys....
Simon, I tried your code for the 2nd question. It does work but it is not seemless. It minimizes and then restores. The user can see this happening. That is just not acceptable in my app. Is there a way to just swallow the "Show Desktop" command so that it doesnot even fire for my form?
Knea
I'm sure there is... You just need to find out the code of the windows message and handle it the same way you are handling point 1.
By the way, your originally posted code can be tidied up as follows:
Protected Overloads Overrides Sub WndProc(ByRef msg As Message)
If msg.Msg = WM_SYSCOMMAND andalso msg.WParam.ToInt32 = SC_MINIMIZE Then
Else
MyBase.WndProc(msg)
End If
End Sub
Ok, the only other way of doing it is inserting a system wide keyboard hook, and trapping the windows key.
http://forums.microsoft.co
As far as actually doing that, I wrote a class a while back that does just that, but it's a bit of a sledgehammer-to-crack-a-nu
Business Accounts
Answer for Membership
by: simoncampbellPosted on 2006-02-02 at 14:55:04ID: 15858231
To stop the form minimising, just set the form's MinimizeBox property to false, so that the mnimize button won't even show.
as for the other question, the resize event will fire when the form gets minimized by pressing Windows-D, so just add this code to your form:
Private Sub frmMain_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
If WindowState = FormWindowState.Minimized Then
Dim t As New Threading.Thread(AddressOf
t.Start()
End If
End Sub
Delegate Sub dRestore()
Private Sub NewThread()
Dim r As New dRestore(AddressOf Restore)
Me.Invoke(r)
End Sub
Private Sub Restore()
Threading.Thread.Sleep(100
WindowState = FormWindowState.Normal
End Sub