问题描述
我正在创建自己的补充工具栏（就像在Vista中一样）。
在我的XP中快速菜单，我有一个名为显示桌面的按钮。当我点击
时，所有表格都被最小化。
由于我不希望我的SideBar被最小化，我该如何防止这种情况？ />
谢谢！
MOJO
Hi,
I''m creating my own Sidebar (like in Vista).
In my XP''s quick menu, I have a button called "Show Desktop". When I click
it all forms are minimized.
Since I don''t want my SideBar to be minimized, how do I prevent this?
Thanks!
M O J O
推荐答案
\\\
Private Const WM_SYSCOMMAND As Int32 =& H112
Private Const SC_MAXIMIZE As Int32 =& HF030
Private Const SC_MINIMIZE As Int32 =& HF020
Private Const SC_RESTORE As Int32 =& HF120
Private Const SC_CLOSE As Int32 =& HF060
受保护的覆盖子WndProc（ByRef m As Message）
如果m.Msg = WM_SYSCOMMAND那么
选择案例m.WParam.ToInt32（）
案例SC_MAXIMIZE
Debug.WriteLine（表格获得最大化。）
案例SC_MINIMIZE
Debug.WriteLine（表格被最小化。）
案例SC_RESTORE
Debug.WriteLine（" ;表格恢复。）
案例SC_CLOSE
Debug.WriteLine（表格关闭。）
结束选择
结束如果
MyBase.WndProc（m）
结束子
///
-
MS Herfried K. 。瓦格纳
MVP< URL：http：//dotnet.mvps.org/>
VB< URL：http：//classicvb.org/petition/ >
rowe_newsgroups写道：
\\\
Private Const WM_SYSCOMMAND As Int32 = &H112
Private Const SC_MAXIMIZE As Int32 = &HF030
Private Const SC_MINIMIZE As Int32 = &HF020
Private Const SC_RESTORE As Int32 = &HF120
Private Const SC_CLOSE As Int32 = &HF060
Protected Overrides Sub WndProc(ByRef m As Message)
If m.Msg = WM_SYSCOMMAND Then
Select Case m.WParam.ToInt32()
Case SC_MAXIMIZE
Debug.WriteLine("Form gets maximized.")
Case SC_MINIMIZE
Debug.WriteLine("Form gets minimized.")
Case SC_RESTORE
Debug.WriteLine("Form gets restored.")
Case SC_CLOSE
Debug.WriteLine("Form gets closed.")
End Select
End If
MyBase.WndProc(m)
End Sub
///
--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://classicvb.org/petition/>
rowe_newsgroups wrote:
这篇关于防止形式最小化的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持！