我想使用DwmSetIconicThumbnail函数为我的应用程序的缩略图预览设置静态图像。
正如上面的参考链接中指出的，首先需要调用Dwm设置窗口属性启用DWMWA_FORCE_ICONIC_REPRESENTATION and DWMWA_HAS_ICONIC_BITMAP属性。
我已经做了这一切。我已经从以下位置获取了所有定义WindowsAPI代码包源代码here，并且我正在遵循相同的步骤（或者我认为是这样）。
问题是，当我尝试为我的 WinForms 窗口调整示例时，我得到了一个E_INVALIDARG调用时的 HRESULT 代码DwmSetIconicThumbnail下面代码末尾的函数，我不确定有问题的参数是 hwnd 还是 hBitmap。
我做错了什么？
C#:
Bitmap bmp;
IntPtr hBitmap;
IntPtr hwnd;
int hresult;
const int DisplayThumbnailFrame = 0x1;
public enum DwmWindowAttribute : uint
{
NcRenderingEnabled = 1,
NcRenderingPolicy,
TransitionsForceDisabled,
AllowNcPaint,
CaptionButtonBounds,
NonClientRtlLayout,
ForceIconicRepresentation,
Flip3DPolicy,
ExtendedFrameBounds,
HasIconicBitmap,
DisallowPeek,
ExcludedFromPeek,
Cloak,
Cloaked,
FreezeRepresentation,
Last
}
[DllImport("dwmapi.dll", PreserveSig = true)]
static internal extern int DwmSetWindowAttribute(IntPtr hwnd,
DwmWindowAttribute dwAttributeToSet,
IntPtr pvAttributeValue,
uint cbAttribute);
[DllImport("Dwmapi.dll")]
public static extern int DwmSetIconicThumbnail(IntPtr hwnd,
IntPtr hBitmap,
int flags);
private void Form1_Shown() {
bmp = (Bitmap)Bitmap.FromFile("C:\\Image.jpg");
hBitmap = bmp.GetHbitmap();
hwnd = Process.GetCurrentProcess.MainWindowHandle;
IntPtr block = Marshal.AllocHGlobal(4);
int value = Math.Abs(Convert.ToInt32(true)); // or 1
Marshal.WriteInt32(block, value);
try {
hresult = DwmSetWindowAttribute(hwnd, DwmWindowAttribute.HasIconicBitmap, block, 4);
if ((hresult != 0)) {
throw Marshal.GetExceptionForHR(hresult);
}
hresult = DwmSetWindowAttribute(hwnd, DwmWindowAttribute.ForceIconicRepresentation, block, 4);
if ((hresult != 0)) {
throw Marshal.GetExceptionForHR(hresult);
}
} finally {
Marshal.FreeHGlobal(block);
}
hresult = DwmSetIconicThumbnail(hwnd, hBitmap, DisplayThumbnailFrame);
if ((hresult != 0)) {
throw Marshal.GetExceptionForHR(hresult);
}
}
VB.NET:
Dim bmp As Bitmap
Dim hBitmap As IntPtr
Dim hwnd As IntPtr
Dim hresult As Integer
Const DisplayThumbnailFrame As Integer = &H1
Enum DwmWindowAttribute As UInteger
NcRenderingEnabled = 1
NcRenderingPolicy
TransitionsForceDisabled
AllowNcPaint
CaptionButtonBounds
NonClientRtlLayout
ForceIconicRepresentation
Flip3DPolicy
ExtendedFrameBounds
HasIconicBitmap
DisallowPeek
ExcludedFromPeek
Cloak
Cloaked
FreezeRepresentation
Last
End Enum
<DllImport("dwmapi.dll", PreserveSig:=True)>
Friend Shared Function DwmSetWindowAttribute(hwnd As IntPtr,
dwAttributeToSet As DwmWindowAttribute,
pvAttributeValue As IntPtr,
cbAttribute As UInteger
) As Integer
End Function
<DllImport("Dwmapi.dll")>
Public Shared Function DwmSetIconicThumbnail(ByVal hwnd As IntPtr,
ByVal hBitmap As IntPtr,
ByVal flags As Integer
) As Integer
End Function
Private Sub Form1_Shown() Handles MyBase.Shown
bmp = DirectCast(Bitmap.FromFile("C:\Image.jpg"), Bitmap)
hBitmap = bmp.GetHbitmap()
hwnd = Process.GetCurrentProcess.MainWindowHandle
Dim block As IntPtr = Marshal.AllocHGlobal(4)
Dim value As Integer = Math.Abs(CInt(True)) ' or 1
Marshal.WriteInt32(block, value)
Try
hresult = DwmSetWindowAttribute(hwnd, DwmWindowAttribute.HasIconicBitmap, block, 4)
If (hresult <> 0) Then
Throw Marshal.GetExceptionForHR(hresult)
End If
hresult = DwmSetWindowAttribute(hwnd, DwmWindowAttribute.ForceIconicRepresentation, block, 4)
If (hresult <> 0) Then
Throw Marshal.GetExceptionForHR(hresult)
End If
Finally
Marshal.FreeHGlobal(block)
End Try
hresult = DwmSetIconicThumbnail(hwnd, hBitmap, DisplayThumbnailFrame)
If (hresult <> 0) Then
Throw Marshal.GetExceptionForHR(hresult)
End If
End Sub
根据MSDN 文档:
应用程序通常在收到其窗口的 WM_DWMSENDICONICTHUMBNAIL 消息后调用 DwmSetIconicThumbnail 函数。缩略图不应超过该消息中指定的最大 x 坐标和 y 坐标。缩略图还必须具有 32 位颜色深度。
因此，使用以下具有 32 位颜色深度的 32×32 位图，它可以工作：
异常消失了。但是，它并没有完全取代应用程序图标缩略图，而是附加了它。
使用 ALT+TAB 的效果如下：
当鼠标悬停在它上面时：
请注意，我根本没有修改您的代码并完全按照原样运行它，而只是使用合适的Bitmap。这些是 Windows 10 计算机的结果。
究其原因，是因为DwmSetIconicThumbnail函数返回错误是因为图像超出了缩略图的最大尺寸，就是这样，Windows本身不处理调整大小，所以我们需要做更多的工作。
我不确定哪个因素决定了我们可以为图像建立的最大可能缩略图大小，这是猜测，但我认为这取决于确定缩略图预览的宽度和高度的 Windows 注册表值（我完全不知道）记住该值的注册表位置，抱歉，但可以轻松通过 Google 搜索）。
嗯，正如上面指出的，我们需要处理WM_DWMSENDICONICTHUMBNAIL (0x323) 消息，因此我们需要重写基本窗口过程（又名）WNDPROC我们的 Win32 窗口（一个表单），最后我们可以从消息参数中检索缩略图创建的最大宽度和高度。
这是一个工作代码示例：
Private Const WM_DWMSENDICONICTHUMBNAIL As Integer = &H323
Protected Overrides Sub WndProc(ByRef m As Windows.Forms.Message)
Select Case m.Msg
Case WM_DWMSENDICONICTHUMBNAIL
Dim hwnd As IntPtr = Process.GetCurrentProcess().MainWindowHandle
Dim dWord As Integer = m.LParam.ToInt32()
Dim maxWidth As Short = BitConverter.ToInt16(BitConverter.GetBytes(dWord), 2)
Dim maxHeight As Short = BitConverter.ToInt16(BitConverter.GetBytes(dWord), 0)
Using img As Image = Bitmap.FromFile("C:\Image.jpg")
Using thumb As Bitmap = CType(img.GetThumbnailImage(maxWidth, maxHeight, Nothing, Nothing), Bitmap)
Dim hBitmap As IntPtr = thumb.GetHbitmap()
Dim hresult As Integer = NativeMethods.DwmSetIconicThumbnail(hwnd, hBitmap, 0)
If (hresult <> 0) Then
' Handle error...
' Throw Marshal.GetExceptionForHR(hresult)
End If
NativeMethods.DeleteObject(hBitmap)
End Using
End Using
End Select
' Return Message to base message handler.
MyBase.WndProc(m)
End Sub
作为最后一条评论，如果将来我需要记住这一点，我将分享我在 MSDN 上找到的这个问题，这对于遇到问题的人可能会有所帮助WM_DWMSENDICONICTHUMBNAIL信息：