有没有办法让默认的消息框(MessageBox.Show()
) TopMost 为真,即使消息框失去焦点,它也会保持在顶部?我不想创建一个自定义的。有没有办法通过使用 SetWindowHook 或类似的东西来做到这一点?我已经研究了很多,但我发现的所有解决方案都不起作用。有人可以帮助我如何在 VB.net 或 C# 中执行此操作吗?
问问题
833 次
2 回答
1
最简单的方法是 p/invokeMessageBox
函数并传递MB_SYSTEMMODAL
标志。
于 2014-04-04T20:19:38.923 回答
0
我知道了。这将在所有打开的窗口顶部显示一个消息框,无论它们是否具有最顶层选项,消息框始终显示在前面。
Public Enum MessageBoxResult As UInteger
Ok = 1
Cancel
Abort
Retry
Ignore
Yes
No
Close
Help
TryAgain
ContinueOn
Timeout = 32000
End Enum
Public Enum MessageBoxOptions As UInteger
SystemModal = &H1000
NoFocus = &H8000
SetForeground = &H10000
Topmost = &H40000
End Enum
<DllImport("user32.dll", EntryPoint:="MessageBoxW", SetLastError:=True, Charset:=CharSet.Unicode)> _
Public Shared Function MessageBox(hwnd As IntPtr, _
<MarshalAs(UnmanagedType.LPTStr)> lpText As String, _
<MarshalAs(UnmanagedType.LPTStr)> lpCaption As String, _
<MarshalAs(UnmanagedType.U4)> uType As MessageBoxOptions) As <MarshalAs(UnmanagedType.U4)> MessageBoxResult
End Function
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
MessageBox(IntPtr.Zero, TextBox2.Text, TextBox1.Text, MessageBoxButtons.OK Or MessageBoxOptions.SystemModal + MessageBoxOptions.Topmost + MessageBoxOptions.SetForeground + MessageBoxIcon.Information)
End Sub
End Class
于 2014-04-04T21:08:36.470 回答