1,486
社区成员
发帖
与我相关
我的任务
分享
'把SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\的TaskbarSmallIcons值改成1
rc = RegOpenKeyEx(HKEY_CURRENT_USER, SUBKEY_ADVANCED, 0, KEY_SET_VALUE, hSubKey)
If rc <> ERROR_SUCCESS Then Exit Sub
rc = RegSetValueEx(hSubKey, REGNAME_TASKBARSMALLICONS, 0, REG_DWORD, p_SmallIcons, Len(p_SmallIcons))
rc = RegCloseKey&(HKEY_CURRENT_USER&)
'然后给系统发消息
Call SendMessageTimeout(HWND_BROADCAST, WM_SETTINGCHANGE, 0, 0, SMTO_ABORTIFHUNG, 5000, w_retCode)