通过 PowerShell 调用 user32.dll “SetWindowCompositionAttribute”

Question

我一直在努力让 PowerShell 通过 Pinvoke 控制 SetWindowCompositionAttribute（通过 PowerShell 向 Windows 任务栏和其他窗口添加 Windows 10 Acrylic Blur 效果）。

我很乐意发送简单的参数，例如 HWND 和相应的值（如下面的两个示例所示）。但是，我不确定如何增强下面的 PowerShell 代码，以便它也可以处理打包在结构中的发送参数。请参阅 SetWindowCompositionAttribute。

我在 Delphi 和 AutoIt（而不是 PowerShell）中看到了执行此操作的代码示例。不幸的是，我无法弄清楚它们。

无论如何，下面是我的工作 PowerShell 代码和使用示例，它们演示了与 Windows API 的基本交互。我希望有人可以帮助我增强此代码（通过几个示例）来控制SetWindowCompositionAttribute 提供的各种功能。

最终，我希望能够指定 hWnd、Windows 类名和/或我希望添加模糊的组件的窗口标题名称；如果可能，请指定模糊/透明度的量。

工作功能和示例用法：

$script:nativeMethods = @();

function Register-NativeMethod([string]$dll, [string]$methodSignature) {
    $script:nativeMethods += [PSCustomObject]@{ Dll = $dll; Signature = $methodSignature; }
}

function Add-NativeMethods() {
    $nativeMethodsCode = $script:nativeMethods | % { "
        [DllImport(`"$($_.Dll)`")]
        public static extern $($_.Signature);
    " }

    Add-Type @"
        using System;
        using System.Runtime.InteropServices;
        public class NativeMethods {
            $nativeMethodsCode
        }
"@
}

#Build class and registers them:
Add-NativeMethods


#Example 1:
Register-NativeMethod "user32.dll" "bool SetForegroundWindow(IntPtr hWnd)"
[NativeMethods]::SetForegroundWindow((Get-Process -name notepad).MainWindowHandle)

#Example 2:
Register-NativeMethod "user32.dll" "bool ShowWindow(IntPtr hWnd, int nCmdShow)"
[NativeMethods]::ShowWindow((Get-Process -name notepad).MainWindowHandle, 0)

Answer 1

编辑：添加了带有颜色着色的“丙烯酸”模糊选项。移动窗户时似乎有点慢。

这就是你所追求的吗？

函数运行前的窗口：

函数运行后的窗口（@98​​7654327@）：

主要代码：

$SetWindowComposition = @'
[DllImport("user32.dll")]
public static extern int SetWindowCompositionAttribute(IntPtr hwnd, ref WindowCompositionAttributeData data);

[StructLayout(LayoutKind.Sequential)]
public struct WindowCompositionAttributeData {
    public WindowCompositionAttribute Attribute;
    public IntPtr Data;
    public int SizeOfData;
}

public enum WindowCompositionAttribute {
    WCA_ACCENT_POLICY = 19
}

public enum AccentState {
    ACCENT_DISABLED = 0,
    ACCENT_ENABLE_BLURBEHIND = 3,
    ACCENT_ENABLE_ACRYLICBLURBEHIND = 4
}

[StructLayout(LayoutKind.Sequential)]
public struct AccentPolicy {
    public AccentState AccentState;
    public int AccentFlags;
    public int GradientColor;
    public int AnimationId;
}
'@
Add-Type -MemberDefinition $SetWindowComposition -Namespace 'WindowStyle' -Name 'Blur'
function Set-WindowBlur {
    [CmdletBinding()]
    param (
        [Parameter(Mandatory)]
        [int]
        $MainWindowHandle,
        [Parameter(ParameterSetName='Enable',Mandatory)]
        [switch]
        $Enable,
        [Parameter(ParameterSetName='Acrylic',Mandatory)]
        [switch]
        $Acrylic,
        # Color in BGR hex format (for ease, will just be used as an integer), eg. for red use 0x0000FF
        [Parameter(ParameterSetName='Acrylic')]
        [ValidateRange(0x000000, 0xFFFFFF)]
        [int]
        $Color= 0x000000,
        # Transparency 0-255, 0 full transparency and 255 is a solid $Color
        [Parameter(ParameterSetName='Acrylic')]
        [ValidateRange(0, 255)]
        [int]
        $Transparency = 80,
        [Parameter(ParameterSetName='Disable',Mandatory)]
        [switch]
        $Disable
    )
    $Accent = [WindowStyle.Blur+AccentPolicy]::new()
    switch ($PSCmdlet.ParameterSetName) {
        'Enable' {
            $Accent.AccentState = [WindowStyle.Blur+AccentState]::ACCENT_ENABLE_BLURBEHIND
        }
        'Acrylic' {
            $Accent.AccentState = [WindowStyle.Blur+AccentState]::ACCENT_ENABLE_ACRYLICBLURBEHIND
            $Accent.GradientColor = $Transparency -shl 24 -bor ($Color -band 0xFFFFFF)
        }
        'Disable' {
            $Accent.AccentState = [WindowStyle.Blur+AccentState]::ACCENT_DISABLED
        }
    }
    $AccentStructSize = [System.Runtime.InteropServices.Marshal]::SizeOf($Accent)
    $AccentPtr = [System.Runtime.InteropServices.Marshal]::AllocHGlobal($AccentStructSize)
    [System.Runtime.InteropServices.Marshal]::StructureToPtr($Accent,$AccentPtr,$false)
    $Data = [WindowStyle.Blur+WindowCompositionAttributeData]::new()
    $Data.Attribute = [WindowStyle.Blur+WindowCompositionAttribute]::WCA_ACCENT_POLICY
    $Data.SizeOfData = $AccentStructSize
    $Data.Data = $AccentPtr
    $Result = [WindowStyle.Blur]::SetWindowCompositionAttribute($MainWindowHandle,[ref]$Data)
    if ($Result -eq 1) {
        Write-Verbose "Successfully set Window Blur status."
    }
    else {
        Write-Verbose "Warning, couldn't set Window Blur status."
    }
    [System.Runtime.InteropServices.Marshal]::FreeHGlobal($AccentPtr)
}

将 call 与以下内容一起使用：

Set-WindowBlur -MainWindowHandle 1114716 -Acrylic -Color 0xFF0000 -Transparency 50
Set-WindowBlur -MainWindowHandle 1114716 -Disable
Set-WindowBlur -MainWindowHandle 1114716 -Enable

改编自：https://gist.github.com/riverar/fd6525579d6bbafc6e48 并来自： https://github.com/riverar/sample-win32-acrylicblur/blob/master/MainWindow.xaml.cs

Answer 2

我可以看到您通过在 Powershell 脚本中嵌入/构建 C# 源代码来调用这些 Windows API 函数。这可能是要走的路，尽管我认为我不会费心尝试“添加”方法并逐段构建 C# 源代码（因为使用您的系统声明 SetWindowCompositionAttribute 不会那么容易）。

首先，因为SetWindowCompositionAttribute 接受复杂的参数，所以您必须在 C# 代码中声明底层结构，然后您可以公开 C# 方法，以简化 SetWindowCompositionAttribute 的使用以供 Powershell 端使用。

通过谷歌搜索（只需键入 TheMethodINeedToWrap C#），我很快找到了一些资源。我已将这些发现混合到一个 C# 类中，该类公开了一个（足够简单以至于它是 Powershell 可调用的）方法来模糊窗口。我的测试结果并不理想，因为我最终得到了一个模糊的窗口边框，但内部和控件看起来很奇怪（必须与 winforms 和/或窗口创建参数有关），但至少我得到了一些东西。

因为有点长，我将这个类保存为要点here，但正如我所说，它由一堆互操作结构和方法定义组成，然后是一个公共方法，简化了对SetWindowCompositionAttribute 的访问。

PS：如果SetWindowCompositionAttribute 被证明太难以包装，DwmSetWindowAttribute 可能是一个可行的替代方案。您还会发现，尽管有时需要对其进行调整，但 http://pinvoke.net/ 被证明是互操作定义的可行来源。