终于解决了不重启explorer修改桌面图标大小的问题

czjt1234 · 发表于 2026-11-4 09:24:47

# =====================================================================
# Set-DesktopIconSize.ps1
# 桌面图标大小自适应脚本（兼容 Win7 / Win10 / Win11，PS 2.0+）
# 逻辑：读取主屏水平分辨率（物理像素）
# <= 1920 -> 桌面图标设为“小图标”(32px)
# > 1920 -> 不做更改（加 -ForceMedium 参数则设为“中等图标”(48px)）
#
# 主路径（COM，参考 AutoHotkey 社区脚本，文档化 API，一次生效）：
# Shell.Application.Windows 中找到桌面项
# -> QueryService(SID_STopLevelBrowser) 取 IShellBrowser
# -> QueryActiveShellView 取当前 Shell 视图
# -> IFolderView2::SetViewModeAndIconSize(FVM_ICON, size) 精确设置像素
# -> IFolderView2::GetViewModeAndIconSize 读回实际值校验
# 备用路径：WM_COMMAND 视图命令（0x7050 小 / 0x704E 中，带重发，兼容 Win7 吞消息）
# 兜底路径：-FixByRestart 写注册表 IconSize 并重启 explorer
# =====================================================================
param(
[switch]$ForceMedium,
[switch]$FixByRestart
)
$ErrorActionPreference = 'SilentlyContinue'
Add-Type -TypeDefinition @'
using System;
using System.Text;
using System.Runtime.InteropServices;
public static class DesktopIcon
{
[DllImport("user32.dll")] public static extern bool SetProcessDPIAware();
[DllImport("user32.dll")] public static extern int GetSystemMetrics(int nIndex);
[DllImport("user32.dll")] public static extern IntPtr SendMessage(IntPtr hWnd, uint Msg, IntPtr wParam, IntPtr lParam);
public delegate bool EnumProc(IntPtr hWnd, IntPtr lParam);
[DllImport("user32.dll")] public static extern bool EnumWindows(EnumProc cb, IntPtr lParam);
[DllImport("user32.dll")] public static extern bool EnumChildWindows(IntPtr parent, EnumProc cb, IntPtr lParam);
[DllImport("user32.dll", CharSet = CharSet.Unicode)] public static extern int GetClassName(IntPtr h, StringBuilder sb, int max);
[DllImport("user32.dll")] public static extern IntPtr GetAncestor(IntPtr hwnd, uint flags);
public static IntPtr Found = IntPtr.Zero;
public static IntPtr List = IntPtr.Zero;
private static bool ChildCb(IntPtr h, IntPtr l) {
StringBuilder sb = new StringBuilder(256);
GetClassName(h, sb, 256);
string cls = sb.ToString();
if (cls == "SHELLDLL_DefView") { Found = h; }
if (cls == "SysListView32") { List = h; }
return true;
}
private static bool TopCb(IntPtr h, IntPtr l) {
StringBuilder sb = new StringBuilder(256);
GetClassName(h, sb, 256);
string cls = sb.ToString();
// 桌面视图正常挂在 Progman 下；Win11 壁纸轮播等场景挂在 WorkerW 下
if (cls == "Progman" || cls == "WorkerW") {
EnumChildWindows(h, ChildCb, IntPtr.Zero);
}
return true;
}
public static IntPtr FindDesktopView() {
Found = IntPtr.Zero; List = IntPtr.Zero;
EnumWindows(TopCb, IntPtr.Zero);
return Found;
}
// LVM_GETITEMSPACING (0x1033)：读取桌面列表实际图标间距
public static int GetItemSpacing() {
if (List == IntPtr.Zero) { return 0; }
IntPtr r = SendMessage(List, 0x1033, IntPtr.Zero, IntPtr.Zero);
return (int)(r.ToInt64() & 0xFFFFFFFF);
}
public static IntPtr GetDesktopRootWindow() {
FindDesktopView();
if (Found == IntPtr.Zero) { return IntPtr.Zero; }
return GetAncestor(Found, 2); // GA_ROOT
}
}
public static class ShellViewCom
{
[ComImport, Guid("6D5140C1-7436-11CE-8034-00AA006009FA"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
public interface IServiceProvider {
[PreserveSig] int QueryService(ref Guid guidService, ref Guid riid, out IntPtr ppvObject);
}
[UnmanagedFunctionPointer(CallingConvention.StdCall)]
public delegate int QueryActiveShellView_t(IntPtr self, out IntPtr ppshv);
[UnmanagedFunctionPointer(CallingConvention.StdCall)]
public delegate int GetViewModeAndIconSize_t(IntPtr self, out int viewMode, out int iconSize);
[UnmanagedFunctionPointer(CallingConvention.StdCall)]
public delegate int SetViewModeAndIconSize_t(IntPtr self, int viewMode, int iconSize);
// 通过 COM 设置桌面图标大小；actualSize/actualMode 返回设置后读回的实际值
public static int SetIconSize(object desktopObj, int size, out int actualSize, out int actualMode, out string step) {
actualSize = -1; actualMode = -1; step = "";
IntPtr pUnk = Marshal.GetIUnknownForObject(desktopObj);
try {
IServiceProvider sp = (IServiceProvider)Marshal.GetObjectForIUnknown(pUnk);
Guid sid = new Guid("4C96BE40-915C-11CF-99D3-00AA004AE837"); // SID_STopLevelBrowser
Guid iidB = new Guid("000214E2-0000-0000-C000-000000000046"); // IID_IShellBrowser
IntPtr pBrowser;
int hr = sp.QueryService(ref sid, ref iidB, out pBrowser);
if (hr != 0) { step = "QueryService failed 0x" + hr.ToString("X"); return hr; }
try {
IntPtr vtbl = Marshal.ReadIntPtr(pBrowser);
IntPtr fn = Marshal.ReadIntPtr(vtbl, 15 * IntPtr.Size);
QueryActiveShellView_t qasv = (QueryActiveShellView_t)Marshal.GetDelegateForFunctionPointer(fn, typeof(QueryActiveShellView_t));
IntPtr pView;
hr = qasv(pBrowser, out pView);
if (hr != 0 || pView == IntPtr.Zero) { step = "QueryActiveShellView failed 0x" + hr.ToString("X"); return (hr == 0) ? -1 : hr; }
try {
Guid iidFV2 = new Guid("1AF3A467-214F-4298-908E-06B03E0B39F9"); // IID_IFolderView2
IntPtr pFV2;
hr = Marshal.QueryInterface(pView, ref iidFV2, out pFV2);
if (hr != 0) { step = "IFolderView2 QI failed 0x" + hr.ToString("X"); return hr; }
try {
IntPtr vtbl2 = Marshal.ReadIntPtr(pFV2);
GetViewModeAndIconSize_t getFn = (GetViewModeAndIconSize_t)Marshal.GetDelegateForFunctionPointer(
Marshal.ReadIntPtr(vtbl2, 36 * IntPtr.Size), typeof(GetViewModeAndIconSize_t));
SetViewModeAndIconSize_t setFn = (SetViewModeAndIconSize_t)Marshal.GetDelegateForFunctionPointer(
Marshal.ReadIntPtr(vtbl2, 35 * IntPtr.Size), typeof(SetViewModeAndIconSize_t));
int mode, isz;
hr = getFn(pFV2, out mode, out isz);
if (hr == 0) { actualMode = mode; actualSize = isz; }
hr = setFn(pFV2, 1, size); // FVM_ICON = 1
if (hr != 0) { step = "SetViewModeAndIconSize failed 0x" + hr.ToString("X"); return hr; }
hr = getFn(pFV2, out mode, out isz);
if (hr == 0) { actualMode = mode; actualSize = isz; }
return 0;
} finally { Marshal.Release(pFV2); }
} finally { Marshal.Release(pView); }
} finally { Marshal.Release(pBrowser); }
} finally { Marshal.Release(pUnk); }
}
}
'@
# 先声明 DPI 感知，保证读到物理分辨率而不是被缩放虚拟化的值
[void][DesktopIcon]::SetProcessDPIAware()
$WM_COMMAND = 0x0111
$CMD_SMALL = 0x7050 # FVM_SMALL -> 小图标 IconSize=32
$CMD_MEDIUM = 0x704E # FVM_MEDIUMICON -> 中等图标 IconSize=48
$REG_PATH = 'HKCU:\Software\Microsoft\Windows\Shell\Bags\1\Desktop'
function Get-CurrentIconSize {
# 当前桌面图标大小（像素）：256=特大 96=大 48=中 32=小
$v = Get-ItemProperty -Path $REG_PATH -Name 'IconSize'
if ($v -ne $null -and $v.IconSize -ne $null) { return [int]$v.IconSize }
return -1
}
# ---------- 主路径：COM (IFolderView2::SetViewModeAndIconSize) ----------
function Set-IconSizeByCom([int]$targetSize) {
# 在 Shell.Windows 集合中找到桌面项：HWND 与桌面视图根窗口一致优先
$shell = New-Object -ComObject Shell.Application
$sw = $shell.Windows()
$rootHwnd = [DesktopIcon]::GetDesktopRootWindow()
$desktopObj = $null
if ($sw -ne $null) {
# 策略1：文档化技巧 Item(SWC_DESKTOP=8)，与 AHK 脚本一致
try {
$d = $sw.Item(8)
if ($d -ne $null) { $desktopObj = $d }
} catch {}
# 策略2：遍历集合按 HWND 匹配桌面视图根窗口
if ($desktopObj -eq $null -and $rootHwnd -ne [IntPtr]::Zero) {
for ($i = 0; $i -lt $sw.Count; $i++) {
$item = $sw.Item($i)
if ($item -ne $null -and $item.HWND -eq $rootHwnd.ToInt64()) { $desktopObj = $item; break }
}
}
}
if ($desktopObj -eq $null) {
Write-Host '[INFO] COM: desktop item not found in Shell.Windows.'
return $false
}
$actualSize = 0; $actualMode = 0; $step = ''
$hr = [ShellViewCom]::SetIconSize($desktopObj, $targetSize, [ref]$actualSize, [ref]$actualMode, [ref]$step)
if ($hr -ne 0) {
Write-Host ('[INFO] COM: failed at {0} (hr=0x{1:X})' -f $step, $hr)
return $false
}
if ($actualSize -eq $targetSize) {
Write-Host ('[OK] COM SetViewModeAndIconSize applied, actual IconSize = {0}px (read back)' -f $actualSize)
return $true
}
Write-Host ('[INFO] COM: read-back {0}px != target {1}px' -f $actualSize, $targetSize)
return $false
}
# ---------- 备用路径：WM_COMMAND 视图命令（带 Win7 吞消息重发） ----------
function Set-DesktopIconSizeByMessage([int]$targetSize) {
if ($targetSize -le 32) { $cmd = $CMD_SMALL; $targetSize = 32 }
else { $cmd = $CMD_MEDIUM; $targetSize = 48 }
$defview = [DesktopIcon]::FindDesktopView()
if ($defview -eq [IntPtr]::Zero) {
Write-Host '[FAIL] Desktop view window (SHELLDLL_DefView) not found.'
return $false
}
# Win7 已知行为：桌面视图可能吞掉第一次视图切换消息，需重发才生效
# 校验依据：实际图标间距变化，或注册表 IconSize 变为目标值
$maxAttempts = 3
for ($attempt = 1; $attempt -le $maxAttempts; $attempt++) {
$spacingBefore = [DesktopIcon]::GetItemSpacing()
[void][DesktopIcon]::SendMessage($defview, $WM_COMMAND, [IntPtr]$cmd, [IntPtr]::Zero)
$verified = $false
for ($i = 0; $i -lt 4; $i++) {
Start-Sleep -Milliseconds 250
if ([DesktopIcon]::GetItemSpacing() -ne $spacingBefore) { $verified = $true; break }
if ((Get-CurrentIconSize) -eq $targetSize) { $verified = $true; break }
}
if ($verified) {
if ($attempt -eq 1) {
Write-Host ('[OK] Command 0x{0:X} applied, IconSize = {1}px' -f $cmd, $targetSize)
} else {
Write-Host ('[OK] Command 0x{0:X} applied on attempt {1}, IconSize = {2}px' -f $cmd, $attempt, $targetSize)
}
return $true
}
# 命令为空操作且注册表已等于目标值 => 实际状态本来就正确
if ((Get-CurrentIconSize) -eq $targetSize) {
Write-Host ('[OK] No visual change needed, IconSize = {0}px' -f $targetSize)
return $true
}
if ($attempt -lt $maxAttempts) {
Write-Host ('[INFO] Attempt {0} had no effect, resending (Win7 may swallow the first message)...' -f $attempt)
Start-Sleep -Milliseconds 1000
}
}
Write-Host ('[WARN] No change detected after command 0x{0:X}.' -f $cmd)
return $false
}
# ------------------------- 主流程 -------------------------
$cx = [DesktopIcon]::GetSystemMetrics(0)
Write-Host ('Primary screen width = {0}px' -f $cx)
$ok = $true
if ($cx -le 1920) {
Write-Host 'Target: SMALL icons (32px)'
$ok = Set-IconSizeByCom 32
} elseif ($ForceMedium) {
Write-Host 'Target: MEDIUM icons (48px)'
$ok = Set-IconSizeByCom 48
} else {
Write-Host 'Width > 1920, no change.'
}
# COM 失败时回退到 WM_COMMAND
if (-not $ok -and ($cx -le 1920 -or $ForceMedium)) {
if ($cx -le 1920) { $ok = Set-DesktopIconSizeByMessage 32 }
else { $ok = Set-DesktopIconSizeByMessage 48 }
}
# 最后兜底：写注册表 + 重启 explorer
if (-not $ok -and $FixByRestart) {
$targetSize = 32
if ($cx -gt 1920 -and $ForceMedium) { $targetSize = 48 }
Set-ItemProperty -Path $REG_PATH -Name 'IconSize' -Value $targetSize -Type DWord
Stop-Process -Name explorer -Force
Start-Sleep -Milliseconds 800
Start-Process explorer.exe
Write-Host ('[OK] IconSize={0} written to registry and explorer restarted' -f $targetSize)
$ok = $true
}
if (-not $ok) { exit 1 }
exit 0

复制代码

感谢CodeBuddy

czjt1234 · 发表于 2026-11-4 09:27:50

就是运行速度有点慢，用AutoHotkey把下面的ahk脚本编译成exe文件，运行速度极快

; 这个ahk脚本要求AutoHotkey1.1版本，实测在win7 win10 win11均能将小图标改为中等图标
; 设置桌面图标为中等大小
; 用法: 直接运行即可
SetDesktopIconSize(48) ; 48 是中等图标典型像素值
SetDesktopIconSize(size) {
; 常量定义
static SID_STopLevelBrowser := "{4C96BE40-915C-11CF-99D3-00AA004AE837}"
static IID_IShellBrowser := "{000214E2-0000-0000-C000-000000000046}"
static IID_IFolderView2 := "{1AF3A467-214F-4298-908E-06B03E0B39F9}"
static SWC_DESKTOP := 0x8
static FVM_ICON := 1
; 1. 创建 Shell.Application 对象，获取桌面窗口
shellWindows := ComObjCreate("Shell.Application").Windows
desktop := shellWindows.Item(ComObject(0x13, SWC_DESKTOP))
; 2. 获取 IShellBrowser
IShellBrowser := ComObjQuery(desktop, SID_STopLevelBrowser, IID_IShellBrowser)
if !IShellBrowser
return false
; 3. 获取 IShellView (vtable 偏移 15)
DllCall(NumGet(NumGet(IShellBrowser + 0) + A_PtrSize*15), "Ptr", IShellBrowser, "PtrP", IShellView)
; 4. 获取 IFolderView2
IFolderView2 := ComObjQuery(IShellView, IID_IFolderView2)
if !IFolderView2
return false
; 5. 调用 SetViewModeAndIconSize (vtable 偏移 35)
hr := DllCall(NumGet(NumGet(IFolderView2 + 0) + A_PtrSize*35), "Ptr", IFolderView2, "Int", FVM_ICON, "Int", size)
; 6. 释放资源
ObjRelease(IFolderView2)
ObjRelease(IShellView)
ObjRelease(IShellBrowser)
return hr = 0
}

复制代码

cutebe · 发表于 2026-11-4 16:38:08

不明觉厉

czjt1234 · 发表于 2026-11-4 17:15:20

cutebe 发表于 2026-11-4 16:38
不明觉厉

我也看不懂。AI编程的

holley · 发表于 2026-11-5 06:15:40

czjt1234 发表于 2026-11-4 09:27
就是运行速度有点慢，用AutoHotkey把下面的ahk脚本编译成exe文件，运行速度极快 ...

;===============================================================================
; Set-DesktopIconSize.au3
; 桌面图标大小自适应 —— AutoIt3 版（编译成 exe 后毫秒级启动，不重启 explorer）
; Copyright (C) 2026 洋芋哥
;
; 逻辑：
; 主屏宽度 <= 1920 -> 小图标 (32px)
; 主屏宽度 > 1920 -> 不做更改
;
; 参数：
; /s 强制小图标 (32)
; /m 强制中等图标 (48)
; /q 静默模式（不弹任何提示）
;===============================================================================
Opt("MustDeclareVars", 1)
#NoTrayIcon
Global Const $WM_COMMAND = 0x0111
Global Const $CMD_ICON_SMALL = 0x7050 ; 小图标 32px
Global Const $CMD_ICON_MEDIUM = 0x704E ; 中等图标 48px
Global Const $REG_BAG = "HKEY_CURRENT_USER\Software\Microsoft\Windows\Shell\Bags\1\Desktop"
_Main()
Exit
;-------------------------------------------------------------------------------
Func _Main()
; 1) 先声明 DPI 感知，保证读到的是物理分辨率，不是被缩放虚拟化后的值
DllCall("user32.dll", "bool", "SetProcessDPIAware")
Local $bForceSmall = False
Local $bForceMedium = False
Local $bQuiet = False
Local $i
For $i = 1 To $CmdLine[0]
Switch StringLower($CmdLine[$i])
Case "/s", "-s"
$bForceSmall = True
Case "/m", "-m"
$bForceMedium = True
Case "/q", "-q"
$bQuiet = True
EndSwitch
Next
; 2) 取主屏宽度（0 = SM_CXSCREEN）
Local $aRet = DllCall("user32.dll", "int", "GetSystemMetrics", "int", 0)
Local $iWidth = 0
If Not @error Then $iWidth = $aRet[0]
; 3) 决定目标尺寸；0 表示"不动"
Local $iTarget = 0
If $bForceSmall Then
$iTarget = 32
ElseIf $bForceMedium Then
$iTarget = 48
ElseIf $iWidth <= 1920 Then
$iTarget = 32
EndIf
If $iTarget = 0 Then
_Log("主屏宽度 " & $iWidth & "px，图标大小保持不变。", $bQuiet)
Return
EndIf
; 4) 已经是目标值就直接退出（省掉一次消息发送，也避免无谓刷新）
If _GetIconSizeReg() = $iTarget Then
_Log("当前已是 " & $iTarget & "px，无需更改。", $bQuiet)
Return
EndIf
; 5) 执行设置
Local $iRet = _SetIconSize($iTarget)
Switch $iRet
Case 1
_Log("已设置桌面图标为 " & $iTarget & "px。", $bQuiet)
Case -1
_Log("未找到桌面视图窗口（Progman / WorkerW），请确认 explorer.exe 正常运行。", True)
Case Else
_Log("命令已发送，但注册表未读到 " & $iTarget & "px，可能被系统吞掉或命令号不匹配。", True)
EndSwitch
EndFunc
;-------------------------------------------------------------------------------
; 返回值：1 成功 / 0 未生效 / -1 找不到桌面视图
Func _SetIconSize($iTarget)
Local $hView = _FindDesktopView()
If $hView = 0 Then Return -1
Local $iCmd
If $iTarget <= 32 Then
$iCmd = $CMD_ICON_SMALL
Else
$iCmd = $CMD_ICON_MEDIUM
EndIf
; Win7 的桌面视图有时会吞掉第一次视图切换消息，所以重发 + 校验
Local $iTry, $iWait
For $iTry = 1 To 3
DllCall("user32.dll", "lresult", "SendMessageW", _
"hwnd", $hView, "uint", $WM_COMMAND, "wparam", $iCmd, "lparam", 0)
For $iWait = 1 To 6
Sleep(150)
If _GetIconSizeReg() = $iTarget Then Return 1
Next
Sleep(300)
Next
Return 0
EndFunc
;-------------------------------------------------------------------------------
; 找桌面的 SHELLDLL_DefView
; Win7/10 一般挂在 Progman 下；Win11 壁纸轮播等场景挂在 WorkerW 下
Func _FindDesktopView()
Local $aList = WinList()
Local $i, $hTop, $sCls, $hDef
For $i = 1 To $aList[0][0]
$hTop = $aList[$i][1]
$sCls = _GetClassName($hTop)
If $sCls = "Progman" Or $sCls = "WorkerW" Then
$hDef = _FindWindowEx($hTop, "SHELLDLL_DefView")
If $hDef <> 0 Then Return $hDef
EndIf
Next
Return 0
EndFunc
Func _GetClassName($hWnd)
Local $tBuf = DllStructCreate("wchar[256]")
DllCall("user32.dll", "int", "GetClassNameW", _
"hwnd", $hWnd, "ptr", DllStructGetPtr($tBuf), "int", 256)
Return DllStructGetData($tBuf, 1)
EndFunc
Func _FindWindowEx($hParent, $sClass)
Local $aRet = DllCall("user32.dll", "hwnd", "FindWindowExW", _
"hwnd", $hParent, "hwnd", 0, "wstr", $sClass, "ptr", 0)
If @error Then Return 0
Return $aRet[0]
EndFunc
;-------------------------------------------------------------------------------
Func _GetIconSizeReg()
Local $vVal = RegRead($REG_BAG, "IconSize")
If @error Then Return -1
Return Int($vVal)
EndFunc
Func _Log($sMsg, $bQuiet)
ConsoleWrite($sMsg & @CRLF)
If Not $bQuiet Then
TrayTip("桌面图标", $sMsg, 2, 1)
EndIf
EndFunc

复制代码

czjt1234 · 发表于 2026-11-5 21:36:37

让CodeBuddy按ahk的方式简化一下脚本
它自己测试了好几分钟，发现"Shell.Application".Windows不含桌面
我把AutoHotkey和脚本发给它测试成功，它自己去AutoHotkey社区找答案
发现AutoHotkey在"Shell.Application".Windows找不到桌面后会自己FindWindowSW找桌面
然后它生成了新的c#
用win10自带的csc.exe编译成exe文件，速度也是极快
适用于极度不想用第三方软件的人

用以下代码编译

$cs="D:\1\SetIconMedium.cs";
$csc="C:\Windows\Microsoft.NET\Framework64\v4.0.30319\csc.exe";
& $csc /nologo /target:winexe /platform:anycpu /optimize+ /out:"D:\1\SetIconMedium.exe" $cs;

复制代码

c#源码

// =====================================================================
// SetIconMedium.cs v6 —— 将桌面图标统一设为中等图标 (48px)
//
// 编译为 /target:winexe 时运行无任何窗口（适合开机/登录静默部署），
// 编译为 /target:exe 时（SetIconMedium_console.exe）带控制台输出供排查。
//
// 路径A（首选，文档化 COM API，与验证过的 AHK 脚本同链路）：
// IShellWindows::FindWindowSW(SWC_DESKTOP) 定位桌面浏览器
// （该 API 对 SWC_DESKTOP 走特殊分支，桌面无需出现在可枚举集合中，
// 与 AHK 的 Item(VT_I4 SWC_DESKTOP) 等效）
// -> QueryService(SID_STopLevelBrowser) -> IShellBrowser
// -> QueryActiveShellView（虚表偏移 15）
// -> IFolderView2::SetViewModeAndIconSize(FVM_ICON=1, size)（偏移 35）
// -> GetViewModeAndIconSize（偏移 36）读回确认
//
// 路径B（补位）：当 FindWindowSW 也找不到桌面浏览器时（极少数壳环境），
// 向可见 SHELLDLL_DefView 发送视图命令：
// 0x704E(FVM_MEDIUMICON)=中48px / 0x7050(FVM_SMALL)=小32px
// （Win7 可能吞掉第一次消息，自动重发，最多 3 次）
//
// 校验：读回像素值 + LVM_GETITEMSPACING 实际图标间距变化
// 用法：SetIconMedium.exe [size] （缺省 48；32=小图标，其他值走 48）
// 返回码：0 成功，1 失败
// =====================================================================
using System;
using System.Collections.Generic;
using System.Reflection;
using System.Runtime.InteropServices;
using System.Text;
class Program
{
const int SWC_DESKTOP = 8;
const int FVM_ICON = 1;
const int WM_COMMAND = 0x0111;
const int CMD_MEDIUM = 0x704E; // FVM_MEDIUMICON -> 48px
const int CMD_SMALL = 0x7050; // FVM_SMALL -> 32px
static readonly Guid SID_STopLevelBrowser = new Guid("4C96BE40-915C-11CF-99D3-00AA004AE837");
static readonly Guid IID_IShellBrowser = new Guid("000214E2-0000-0000-C000-000000000046");
static readonly Guid IID_IFolderView2 = new Guid("1AF3A467-214F-4298-908E-06B03E0B39F9");
static readonly Guid CLSID_ShellWindows = new Guid("9BA05972-F6A8-11CF-A442-00A0C90A8F39");
static void Log(string s) {
try { Console.WriteLine(s); } catch {}
}
[ComImport, Guid("6D5140C1-7436-11CE-8034-00AA006009FA"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
interface IServiceProvider
{
[PreserveSig] int QueryService(ref Guid guidService, ref Guid riid, out IntPtr ppvObject);
}
[UnmanagedFunctionPointer(CallingConvention.StdCall)]
delegate int QueryActiveShellView_t(IntPtr self, out IntPtr ppshv);
[UnmanagedFunctionPointer(CallingConvention.StdCall)]
delegate int GetViewModeAndIconSize_t(IntPtr self, out int viewMode, out int iconSize);
[UnmanagedFunctionPointer(CallingConvention.StdCall)]
delegate int SetViewModeAndIconSize_t(IntPtr self, int viewMode, int iconSize);
[UnmanagedFunctionPointer(CallingConvention.StdCall)]
delegate int GetWindow_t(IntPtr self, out IntPtr hwnd); // IOleWindow::GetWindow（偏移3）
// ---------- Win32 窗口枚举 ----------
delegate bool EnumProc(IntPtr hWnd, IntPtr lParam);
[DllImport("user32.dll")] static extern bool EnumWindows(EnumProc cb, IntPtr lParam);
[DllImport("user32.dll")] static extern bool EnumChildWindows(IntPtr parent, EnumProc cb, IntPtr lParam);
[DllImport("user32.dll", CharSet = CharSet.Unicode)] static extern int GetClassName(IntPtr h, StringBuilder sb, int max);
[DllImport("user32.dll")] static extern IntPtr GetAncestor(IntPtr hwnd, uint flags);
[DllImport("user32.dll")] static extern IntPtr SendMessage(IntPtr hWnd, uint Msg, IntPtr wParam, IntPtr lParam);
static IntPtr defView = IntPtr.Zero;
static IntPtr listView = IntPtr.Zero;
static List<IntPtr> allDefViews = new List<IntPtr>();
static bool ChildCb(IntPtr h, IntPtr l) {
StringBuilder sb = new StringBuilder(256);
GetClassName(h, sb, 256);
string cls = sb.ToString();
if (cls == "SHELLDLL_DefView") { defView = h; allDefViews.Add(h); }
if (cls == "SysListView32" && listView == IntPtr.Zero) { listView = h; }
return true;
}
static bool TopCb(IntPtr h, IntPtr l) {
StringBuilder sb = new StringBuilder(256);
GetClassName(h, sb, 256);
string cls = sb.ToString();
if (cls == "Progman" || cls == "WorkerW") {
EnumChildWindows(h, ChildCb, IntPtr.Zero);
}
return true;
}
static void FindDesktop() {
defView = IntPtr.Zero; listView = IntPtr.Zero;
allDefViews.Clear();
EnumWindows(TopCb, IntPtr.Zero);
}
static bool IsDesktopView(IntPtr hwnd) {
foreach (IntPtr v in allDefViews) { if (v == hwnd) { return true; } }
return false;
}
// LVM_GETITEMSPACING：实际图标间距（布局变化的直接证据）
static string GetSpacing() {
if (listView == IntPtr.Zero) { return "n/a"; }
long r = SendMessage(listView, 0x1033, IntPtr.Zero, IntPtr.Zero).ToInt64() & 0xFFFFFFFF;
return (r & 0xFFFF) + "x" + ((r >> 16) & 0xFFFF);
}
static object GetProp(object obj, string name) {
try { return obj.GetType().InvokeMember(name, BindingFlags.GetProperty, null, obj, null); }
catch { return null; }
}
// 对 ShellWindows 项取其视图窗口句柄：QueryService -> QueryActiveShellView -> GetWindow
static IntPtr GetCandidateViewHwnd(object candidate) {
IntPtr pUnk = Marshal.GetIUnknownForObject(candidate);
try {
IServiceProvider sp = (IServiceProvider)Marshal.GetObjectForIUnknown(pUnk);
Guid sid = SID_STopLevelBrowser;
Guid iidB = IID_IShellBrowser;
IntPtr pBrowser;
int hr = sp.QueryService(ref sid, ref iidB, out pBrowser);
if (hr != 0) { return IntPtr.Zero; }
try {
IntPtr vtbl = Marshal.ReadIntPtr(pBrowser);
QueryActiveShellView_t qasv = (QueryActiveShellView_t)Marshal.GetDelegateForFunctionPointer(
Marshal.ReadIntPtr(vtbl, 15 * IntPtr.Size), typeof(QueryActiveShellView_t));
IntPtr pView;
hr = qasv(pBrowser, out pView);
if (hr != 0 || pView == IntPtr.Zero) { return IntPtr.Zero; }
try {
IntPtr vtblV = Marshal.ReadIntPtr(pView);
GetWindow_t gw = (GetWindow_t)Marshal.GetDelegateForFunctionPointer(
Marshal.ReadIntPtr(vtblV, 3 * IntPtr.Size), typeof(GetWindow_t));
IntPtr hwnd;
hr = gw(pView, out hwnd);
return (hr == 0) ? hwnd : IntPtr.Zero;
} finally { Marshal.Release(pView); }
} finally { Marshal.Release(pBrowser); }
} catch { return IntPtr.Zero; }
finally { Marshal.Release(pUnk); }
}
// 文档化 API：IShellWindows::FindWindowSW(SWC_DESKTOP)（经 IDispatch 后期绑定，安全）
static object FindDesktopByFindWindowSW(object shellWindows) {
Type t = shellWindows.GetType();
object[] locCandidates = new object[] { 0, Type.Missing }; // 0=CSIDL_DESKTOP 或 VT_EMPTY
foreach (object loc in locCandidates) {
try {
object[] args = new object[] { loc, Type.Missing, SWC_DESKTOP, 0, 1 /*SWFO_NEEDDISPATCH*/ };
ParameterModifier mod = new ParameterModifier(5);
mod[3] = true; // pHWND 为出参
ParameterModifier[] mods = new ParameterModifier[] { mod };
object ret = t.InvokeMember("FindWindowSW", BindingFlags.InvokeMethod, null,
shellWindows, args, mods, null, null);
if (ret != null) {
Log("[INFO] FindWindowSW ok, browser hwnd=" + args[3]);
return ret;
}
Log("[INFO] FindWindowSW returned null (loc=" + (loc is int ? "0" : "empty") + ")");
} catch (Exception ex) {
Log("[INFO] FindWindowSW failed: " + ex.Message);
}
}
return null;
}
static int Main(string[] args)
{
int size = 48;
if (args.Length > 0) {
int v;
if (int.TryParse(args[0], out v) && v >= 16 && v <= 256) { size = v; }
}
try { return Run(size); }
catch (Exception ex) {
Log("[FAIL] " + ex.Message);
return 1;
}
}
static int Run(int size)
{
// 1. 定位可见桌面视图
FindDesktop();
if (defView == IntPtr.Zero) {
Log("[FAIL] SHELLDLL_DefView not found");
return 1;
}
IntPtr root = GetAncestor(defView, 2);
string spacingBefore = GetSpacing();
Log("[INFO] DefView=0x" + defView.ToInt64().ToString("X") +
" Root=0x" + root.ToInt64().ToString("X") + " spacing=" + spacingBefore);
// 2. 路径A：COM 定位桌面项。FindWindowSW(SWC_DESKTOP) 是文档化的桌面查找 API，
// 其返回的浏览器句柄即桌面根窗口，可直接信任，无需再做视图匹配
object desktop = null;
Type t = Type.GetTypeFromCLSID(CLSID_ShellWindows);
object shellWindows = Activator.CreateInstance(t);
object viaSW = FindDesktopByFindWindowSW(shellWindows);
if (viaSW != null) { desktop = viaSW; }
if (desktop == null) {
// 兜底定位：集合枚举 + 视图窗口句柄匹配
List<object> candidates = new List<object>();
try {
object cand = t.InvokeMember("Item", BindingFlags.InvokeMethod, null, shellWindows,
new object[] { SWC_DESKTOP });
if (cand != null) { candidates.Add(cand); }
} catch {}
int count = 0;
object c1 = GetProp(shellWindows, "Count");
if (c1 is int) { count = (int)c1; }
for (int i = 0; i < count; i++) {
object item = null;
try {
item = t.InvokeMember("Item", BindingFlags.InvokeMethod, null, shellWindows,
new object[] { i });
} catch {}
if (item != null) { candidates.Add(item); }
}
Log("[INFO] ShellWindows candidates: " + candidates.Count);
foreach (object cand in candidates) {
IntPtr viewHwnd = GetCandidateViewHwnd(cand);
if (viewHwnd != IntPtr.Zero && IsDesktopView(viewHwnd)) { desktop = cand; break; }
}
}
// 3. 路径A执行：IFolderView2::SetViewModeAndIconSize
if (desktop != null) {
Log("[INFO] desktop item located, applying via IFolderView2...");
int mode, isz;
int hr = ApplyByCom(desktop, size, out mode, out isz);
if (hr == 0) {
System.Threading.Thread.Sleep(300);
string spacingAfter = GetSpacing();
Log("[INFO] after: spacing=" + spacingAfter + " (was " + spacingBefore + ")");
if (spacingAfter != spacingBefore) {
Log("[OK] desktop icons set to " + size + "px via COM, layout changed");
return 0;
}
if (isz == size) {
Log("[OK] view reports " + isz + "px, already at target (no layout change needed)");
return 0;
}
Log("[INFO] COM applied but unverified, trying message path...");
} else {
Log("[INFO] COM path failed (hr=0x" + hr.ToString("X") + "), trying message path...");
}
} else {
Log("[INFO] desktop item not found via COM, using message path...");
}
// 4. 路径B：消息方式（Win7 可能吞掉第一次消息，自动重发）
return ApplyByMessage(size, spacingBefore);
}
static int ApplyByCom(object desktop, int size, out int mode, out int isz) {
mode = -1; isz = -1;
IntPtr pUnk = Marshal.GetIUnknownForObject(desktop);
try {
IServiceProvider sp = (IServiceProvider)Marshal.GetObjectForIUnknown(pUnk);
Guid sid = SID_STopLevelBrowser;
Guid iidB = IID_IShellBrowser;
IntPtr pBrowser;
int hr = sp.QueryService(ref sid, ref iidB, out pBrowser);
if (hr != 0) { return hr; }
try {
IntPtr vtbl = Marshal.ReadIntPtr(pBrowser);
QueryActiveShellView_t qasv = (QueryActiveShellView_t)Marshal.GetDelegateForFunctionPointer(
Marshal.ReadIntPtr(vtbl, 15 * IntPtr.Size), typeof(QueryActiveShellView_t));
IntPtr pView;
hr = qasv(pBrowser, out pView);
if (hr != 0 || pView == IntPtr.Zero) { return (hr == 0) ? -1 : hr; }
try {
Guid iidFV2 = IID_IFolderView2;
IntPtr pFV2;
hr = Marshal.QueryInterface(pView, ref iidFV2, out pFV2);
if (hr != 0) { return hr; }
try {
IntPtr vtbl2 = Marshal.ReadIntPtr(pFV2);
SetViewModeAndIconSize_t setFn = (SetViewModeAndIconSize_t)Marshal.GetDelegateForFunctionPointer(
Marshal.ReadIntPtr(vtbl2, 35 * IntPtr.Size), typeof(SetViewModeAndIconSize_t));
GetViewModeAndIconSize_t getFn = (GetViewModeAndIconSize_t)Marshal.GetDelegateForFunctionPointer(
Marshal.ReadIntPtr(vtbl2, 36 * IntPtr.Size), typeof(GetViewModeAndIconSize_t));
hr = setFn(pFV2, FVM_ICON, size);
if (hr != 0) { return hr; }
hr = getFn(pFV2, out mode, out isz);
if (hr == 0 && isz > 0) {
Log("[INFO] read-back: mode=" + mode + " size=" + isz + "px");
}
return 0;
} finally { Marshal.Release(pFV2); }
} finally { Marshal.Release(pView); }
} finally { Marshal.Release(pBrowser); }
} finally { Marshal.Release(pUnk); }
}
static int ApplyByMessage(int size, string spacingBefore) {
int cmd = (size <= 32) ? CMD_SMALL : CMD_MEDIUM;
if (defView == IntPtr.Zero) {
Log("[FAIL] no DefView for message path");
return 1;
}
for (int attempt = 1; attempt <= 3; attempt++) {
SendMessage(defView, WM_COMMAND, (IntPtr)cmd, IntPtr.Zero);
for (int i = 0; i < 4; i++) {
System.Threading.Thread.Sleep(250);
if (GetSpacing() != spacingBefore) {
Log("[OK] desktop icons set to " + ((size <= 32) ? 32 : 48) +
"px via message 0x" + cmd.ToString("X") + " (attempt " + attempt + "), layout changed");
return 0;
}
}
if (attempt < 3) {
Log("[INFO] message attempt " + attempt + " no effect, resending...");
System.Threading.Thread.Sleep(1000);
}
}
Log("[FAIL] no layout change after message path");
return 1;
}
}

复制代码

czjt1234 · 发表于 2026-11-6 19:44:32

记得在vbs中
CreateObject("Shell.Application").Windows().Item()
返回的是桌面，不需要自己FindWindowSW找桌面

win7 中遍历 ShellWindows 集合时包含了桌面对象
win10 win11 中遍历 ShellWindows 集合时不包含桌面对象
但 win7 win10 win11 中使用 ShellWindows.Item() 方法且不指定参数，返回的都是桌面对象

让AI跑了一下，确认无误
只留主路径，去掉补位路径和验证环节
得到精简版代码

using System;
using System.Reflection;
using System.Runtime.InteropServices;
class Program
{
const int FVM_ICON = 1;
static readonly Guid SID_STopLevelBrowser = new Guid("4C96BE40-915C-11CF-99D3-00AA004AE837");
static readonly Guid IID_IShellBrowser = new Guid("000214E2-0000-0000-C000-000000000046");
static readonly Guid IID_IFolderView2 = new Guid("1AF3A467-214F-4298-908E-06B03E0B39F9");
static readonly Guid CLSID_ShellWindows = new Guid("9BA05972-F6A8-11CF-A442-00A0C90A8F39");
[ComImport, Guid("6D5140C1-7436-11CE-8034-00AA006009FA"), InterfaceType(ComInterfaceType.InterfaceIsIUnknown)]
interface IServiceProvider
{
[PreserveSig] int QueryService(ref Guid guidService, ref Guid riid, out IntPtr ppvObject);
}
[UnmanagedFunctionPointer(CallingConvention.StdCall)]
delegate int QueryActiveShellView_t(IntPtr self, out IntPtr ppshv);
[UnmanagedFunctionPointer(CallingConvention.StdCall)]
delegate int SetViewModeAndIconSize_t(IntPtr self, int viewMode, int iconSize);
static int Main(string[] args)
{
int size = 48;
if (args.Length > 0) {
int v;
if (int.TryParse(args[0], out v) && v >= 16 && v <= 256) { size = v; }
}
try {
Type t = Type.GetTypeFromCLSID(CLSID_ShellWindows);
object shellWindows = Activator.CreateInstance(t);
// 1. 桌面浏览器：Item() 无参数调用，Shell 特殊分支直接返回桌面
object desktop = t.InvokeMember("Item", BindingFlags.InvokeMethod, null,
shellWindows, new object[0]);
if (desktop == null) {
Console.Error.WriteLine("[FAIL] Item() returned null");
return 1;
}
// 2. IShellBrowser
IntPtr pUnk = Marshal.GetIUnknownForObject(desktop);
try {
IServiceProvider sp = (IServiceProvider)Marshal.GetObjectForIUnknown(pUnk);
Guid sid = SID_STopLevelBrowser;
Guid iidB = IID_IShellBrowser;
IntPtr pBrowser;
int hr = sp.QueryService(ref sid, ref iidB, out pBrowser);
if (hr != 0) {
Console.Error.WriteLine("[FAIL] QueryService hr=0x" + hr.ToString("X"));
return 1;
}
try {
// 3. IShellView
IntPtr vtbl = Marshal.ReadIntPtr(pBrowser);
QueryActiveShellView_t qasv = (QueryActiveShellView_t)Marshal.GetDelegateForFunctionPointer(
Marshal.ReadIntPtr(vtbl, 15 * IntPtr.Size), typeof(QueryActiveShellView_t));
IntPtr pView;
hr = qasv(pBrowser, out pView);
if (hr != 0 || pView == IntPtr.Zero) {
Console.Error.WriteLine("[FAIL] QueryActiveShellView hr=0x" + hr.ToString("X"));
return 1;
}
try {
// 4. IFolderView2
Guid iidFV2 = IID_IFolderView2;
IntPtr pFV2;
hr = Marshal.QueryInterface(pView, ref iidFV2, out pFV2);
if (hr != 0) {
Console.Error.WriteLine("[FAIL] IFolderView2 QI hr=0x" + hr.ToString("X"));
return 1;
}
try {
// 5. 设置图标视图 + 指定像素
IntPtr vtbl2 = Marshal.ReadIntPtr(pFV2);
SetViewModeAndIconSize_t setFn = (SetViewModeAndIconSize_t)Marshal.GetDelegateForFunctionPointer(
Marshal.ReadIntPtr(vtbl2, 35 * IntPtr.Size), typeof(SetViewModeAndIconSize_t));
hr = setFn(pFV2, FVM_ICON, size);
if (hr != 0) {
Console.Error.WriteLine("[FAIL] SetViewModeAndIconSize hr=0x" + hr.ToString("X"));
return 1;
}
Console.WriteLine("[OK] IconSize = " + size + "px");
return 0;
} finally { Marshal.Release(pFV2); }
} finally { Marshal.Release(pView); }
} finally { Marshal.Release(pBrowser); }
} finally { Marshal.Release(pUnk); }
} catch (Exception ex) {
Console.Error.WriteLine("[FAIL] " + ex.Message);
return 1;
}
}
}

复制代码

// =====================================================================
// SetIconMedium_min.cs —— 极简版：将桌面图标统一设为中等图标 (48px)
//
// 与实测可用的 AHK 脚本完全同链路，仅主路径，无补位、无校验：
// ShellWindows.Item()                      桌面浏览器（Shell 特殊分支）
// -> QueryService(SID_STopLevelBrowser)    IShellBrowser
// -> QueryActiveShellView（虚表偏移 15）    IShellView
// -> QueryInterface(IFolderView2)
// -> SetViewModeAndIconSize(FVM_ICON=1, 48)（虚表偏移 35）文档化 API
//
// 编译为 /target:winexe 运行无窗口；/target:exe 带控制台输出。
// 用法：SetIconMedium_min.exe [size]（缺省 48）
// 返回码：0 成功，1 失败
// =====================================================================

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[转载代码] 终于解决了不重启explorer修改桌面图标大小的问题

评分

浏览过的版块