mirror of
https://github.com/valinet/ExplorerPatcher.git
synced 2025-02-20 20:41:26 +01:00
Explorer: Option for Mica effect and hiding window icon and/or title (thanks @MishaTY)
This commit is contained in:
Valentin Radu
parent
69ffcd414e
commit
fe636c0626
@ -66,6 +66,7 @@ DWORD bWasOldTaskbarSet = FALSE;
|
||||
DWORD bAllocConsole = FALSE;
|
||||
DWORD bHideExplorerSearchBar = FALSE;
|
||||
DWORD bMicaEffectOnTitlebar = FALSE;
|
||||
DWORD bHideIconAndTitleInExplorer = FALSE;
|
||||
DWORD bHideControlCenterButton = FALSE;
|
||||
DWORD bFlyoutMenus = TRUE;
|
||||
DWORD bCenterMenus = TRUE;
|
||||
@ -3225,7 +3226,128 @@ BOOL WINAPI DisableImmersiveMenus_SystemParametersInfoW(
|
||||
#pragma endregion
|
||||
|
||||
|
||||
#pragma region "Explorer: Hide search bar, Mica effect (private), hide navigation bar"
|
||||
#pragma region "Explorer: Hide search bar, hide icon and/or title, Mica effect, hide navigation bar"
|
||||
inline BOOL IsRibbonEnabled(HWND hWnd)
|
||||
{
|
||||
return GetPropW(hWnd, (LPCWSTR)0xA91C);
|
||||
}
|
||||
|
||||
inline BOOL ShouldApplyMica(HWND hWnd)
|
||||
{
|
||||
if (!IsRibbonEnabled(hWnd)) return TRUE;
|
||||
return FindWindowExW(hWnd, NULL, L"Windows.UI.Composition.DesktopWindowContentBridge", NULL);
|
||||
}
|
||||
|
||||
HRESULT ApplyMicaToExplorerTitlebar(HWND hWnd, DWORD_PTR bMicaEffectOnTitleBarOrig)
|
||||
{
|
||||
RECT Rect;
|
||||
GetWindowRect(hWnd, &Rect);
|
||||
HWND hWndRoot = GetAncestor(hWnd, GA_ROOT);
|
||||
MapWindowPoints(NULL, hWndRoot, (LPPOINT)&Rect, 2);
|
||||
MARGINS pMarInset;
|
||||
ZeroMemory(&pMarInset, sizeof(MARGINS));
|
||||
pMarInset.cyTopHeight = Rect.bottom;
|
||||
wchar_t wszParentText[100];
|
||||
GetWindowTextW(GetParent(hWnd), wszParentText, 100);
|
||||
if (!_wcsicmp(wszParentText, L"FloatingWindow")) pMarInset.cyTopHeight = 0;
|
||||
BOOL bShouldApplyMica;
|
||||
if (bMicaEffectOnTitleBarOrig == 2) bShouldApplyMica = FALSE;
|
||||
else bShouldApplyMica = ShouldApplyMica(GetAncestor(hWnd, GA_ROOT));
|
||||
if (bShouldApplyMica)
|
||||
{
|
||||
DwmExtendFrameIntoClientArea(hWndRoot, &pMarInset);
|
||||
SetPropW(hWndRoot, L"EP_METB", TRUE);
|
||||
}
|
||||
else
|
||||
{
|
||||
RemovePropW(hWndRoot, L"EP_METB");
|
||||
}
|
||||
return SetMicaMaterialForThisWindow(hWndRoot, bShouldApplyMica);
|
||||
}
|
||||
|
||||
LRESULT RebarWindow32MicaTitlebarSubclassproc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam, UINT_PTR uIdSubclass, DWORD_PTR dwRefData)
|
||||
{
|
||||
if (uMsg == RB_SETWINDOWTHEME && !wcsncmp(lParam, L"DarkMode", 8) && dwRefData != 2 && ShouldApplyMica(GetAncestor(hWnd, GA_ROOT)))
|
||||
{
|
||||
lParam = wcsstr(lParam, L"NavbarComposited");
|
||||
}
|
||||
else if (uMsg == WM_DESTROY)
|
||||
{
|
||||
RemoveWindowSubclass(hWnd, RebarWindow32MicaTitlebarSubclassproc, RebarWindow32MicaTitlebarSubclassproc);
|
||||
}
|
||||
return DefSubclassProc(hWnd, uMsg, wParam, lParam);
|
||||
}
|
||||
|
||||
LRESULT ExplorerMicaTitlebarSubclassProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam, UINT_PTR uIdSubclass, DWORD_PTR dwRefData)
|
||||
{
|
||||
if (uMsg == WM_DESTROY)
|
||||
{
|
||||
RemoveWindowSubclass(hWnd, ExplorerMicaTitlebarSubclassProc, ExplorerMicaTitlebarSubclassProc);
|
||||
}
|
||||
if (uMsg == WM_ERASEBKGND)
|
||||
{
|
||||
wchar_t wszParentText[100];
|
||||
GetWindowTextW(GetParent(hWnd), wszParentText, 100);
|
||||
if (_wcsicmp(wszParentText, L"FloatingWindow") && dwRefData != 2 && ShouldApplyMica(GetAncestor(hWnd, GA_ROOT))) return TRUE;
|
||||
}
|
||||
else if (uMsg == WM_WINDOWPOSCHANGED)
|
||||
{
|
||||
WINDOWPOS* lpWp = (WINDOWPOS*)lParam;
|
||||
if (lpWp->flags & SWP_NOMOVE)
|
||||
{
|
||||
ApplyMicaToExplorerTitlebar(hWnd, dwRefData);
|
||||
}
|
||||
else
|
||||
{
|
||||
PostMessageW(hWnd, WM_APP, 0, 0);
|
||||
}
|
||||
}
|
||||
else if (uMsg == WM_APP)
|
||||
{
|
||||
ApplyMicaToExplorerTitlebar(hWnd, dwRefData);
|
||||
}
|
||||
else if (uMsg == WM_PARENTNOTIFY)
|
||||
{
|
||||
if (LOWORD(wParam) == WM_CREATE)
|
||||
{
|
||||
ATOM atom = GetClassWord(lParam, GCW_ATOM);
|
||||
if (atom == RegisterWindowMessageW(L"ReBarWindow32"))
|
||||
{
|
||||
SetWindowSubclass(lParam, RebarWindow32MicaTitlebarSubclassproc, RebarWindow32MicaTitlebarSubclassproc, dwRefData);
|
||||
}
|
||||
}
|
||||
}
|
||||
return DefSubclassProc(hWnd, uMsg, wParam, lParam);
|
||||
}
|
||||
|
||||
LRESULT CALLBACK HideIconAndTitleInExplorerSubClass(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam, UINT_PTR uIdSubclass, DWORD_PTR dwRefData)
|
||||
{
|
||||
if (uMsg == WM_DESTROY)
|
||||
{
|
||||
RemoveWindowSubclass(hWnd, HideIconAndTitleInExplorerSubClass, HideIconAndTitleInExplorerSubClass);
|
||||
}
|
||||
else if (uMsg == WM_PARENTNOTIFY)
|
||||
{
|
||||
if (LOWORD(wParam) == WM_CREATE)
|
||||
{
|
||||
WTA_OPTIONS ops;
|
||||
ops.dwFlags = bHideIconAndTitleInExplorer;
|
||||
ops.dwMask = WTNCA_NODRAWCAPTION | WTNCA_NODRAWICON;
|
||||
SetWindowThemeAttribute(hWnd, WTA_NONCLIENT, &ops, sizeof(WTA_OPTIONS));
|
||||
}
|
||||
}
|
||||
return DefSubclassProc(hWnd, uMsg, wParam, lParam);
|
||||
}
|
||||
|
||||
HRESULT uxtheme_DwmExtendFrameIntoClientAreaHook(HWND hWnd, MARGINS* m)
|
||||
{
|
||||
if (GetPropW(hWnd, L"EP_METB"))
|
||||
{
|
||||
return S_OK;
|
||||
}
|
||||
return DwmExtendFrameIntoClientArea(hWnd, m);
|
||||
}
|
||||
|
||||
static HWND(__stdcall *explorerframe_SHCreateWorkerWindowFunc)(
|
||||
WNDPROC wndProc,
|
||||
HWND hWndParent,
|
||||
@ -3271,19 +3393,17 @@ HWND WINAPI explorerframe_SHCreateWorkerWindowHook(
|
||||
wnd_extra
|
||||
);
|
||||
}
|
||||
if (dwExStyle == 0x10000 && dwStyle == 0x46000000)
|
||||
if (dwExStyle == 0x10000 && dwStyle == 0x46000000 && result)
|
||||
{
|
||||
#ifdef USE_PRIVATE_INTERFACES
|
||||
if (bMicaEffectOnTitlebar && result)
|
||||
if (bHideIconAndTitleInExplorer)
|
||||
{
|
||||
BOOL value = TRUE;
|
||||
SetPropW(hWndParent, L"NavBarGlass", HANDLE_FLAG_INHERIT);
|
||||
DwmSetWindowAttribute(hWndParent, DWMWA_MICA_EFFFECT, &value, sizeof(BOOL));
|
||||
if (result) SetWindowSubclass(result, ExplorerMicaTitlebarSubclassProc, ExplorerMicaTitlebarSubclassProc, 0);
|
||||
SetWindowSubclass(hWndParent, HideIconAndTitleInExplorerSubClass, HideIconAndTitleInExplorerSubClass, 0);
|
||||
}
|
||||
#endif
|
||||
|
||||
if (bHideExplorerSearchBar && result)
|
||||
if (bMicaEffectOnTitlebar)
|
||||
{
|
||||
SetWindowSubclass(result, ExplorerMicaTitlebarSubclassProc, ExplorerMicaTitlebarSubclassProc, bMicaEffectOnTitlebar);
|
||||
}
|
||||
if (bHideExplorerSearchBar)
|
||||
{
|
||||
SetWindowSubclass(hWndParent, HideExplorerSearchBarSubClass, HideExplorerSearchBarSubClass, 0);
|
||||
}
|
||||
@ -5642,12 +5762,38 @@ void WINAPI LoadSettings(LPARAM lParam)
|
||||
bWasOldTaskbarSet = TRUE;
|
||||
}
|
||||
dwSize = sizeof(DWORD);
|
||||
dwTemp = 0;
|
||||
RegQueryValueExW(
|
||||
hKey,
|
||||
TEXT("MicaEffectOnTitlebar"),
|
||||
0,
|
||||
NULL,
|
||||
&bMicaEffectOnTitlebar,
|
||||
&dwTemp,
|
||||
&dwSize
|
||||
);
|
||||
if (dwTemp != bMicaEffectOnTitlebar)
|
||||
{
|
||||
bMicaEffectOnTitlebar = dwTemp;
|
||||
HMODULE hUxtheme = GetModuleHandleW(L"uxtheme.dll");
|
||||
if (hUxtheme)
|
||||
{
|
||||
if (bMicaEffectOnTitlebar)
|
||||
{
|
||||
VnPatchDelayIAT(hUxtheme, "dwmapi.dll", "DwmExtendFrameIntoClientArea", uxtheme_DwmExtendFrameIntoClientAreaHook);
|
||||
}
|
||||
else
|
||||
{
|
||||
//VnPatchDelayIAT(hUxtheme, "dwmapi.dll", "DwmExtendFrameIntoClientArea", DwmExtendFrameIntoClientArea);
|
||||
}
|
||||
}
|
||||
}
|
||||
dwSize = sizeof(DWORD);
|
||||
RegQueryValueExW(
|
||||
hKey,
|
||||
TEXT("HideIconAndTitleInExplorer"),
|
||||
0,
|
||||
NULL,
|
||||
&bHideIconAndTitleInExplorer,
|
||||
&dwSize
|
||||
);
|
||||
dwSize = sizeof(DWORD);
|
||||
@ -8676,6 +8822,7 @@ DWORD Inject(BOOL bIsExplorer)
|
||||
{
|
||||
VnPatchIAT(hExplorer, "uxtheme.dll", (LPCSTR)0x7E, PeopleBand_DrawTextWithGlowHook);
|
||||
}
|
||||
// DwmExtendFrameIntoClientArea hooked in LoadSettings
|
||||
printf("Setup uxtheme functions done\n");
|
||||
|
||||
|
||||
|
||||
@ -154,13 +154,17 @@
|
||||
;e this utility as shell extension using the option below.
|
||||
;y Learn more 🡕
|
||||
;https://github.com/valinet/ExplorerPatcher/wiki/Using-ExplorerPatcher-as-shell-extension
|
||||
[HKEY_CURRENT_USER\Software\ExplorerPatcher]
|
||||
;q
|
||||
;b Register as shell extension
|
||||
;"Virtualized_{D17F1E1A-5919-4427-8F89-A1A8503CA3EB}_RegisterAsShellExtension"=dword:00000000
|
||||
[-HKEY_CURRENT_USER\Software\Classes\CLSID\{d93ed569-3b3e-4bff-8355-3c44f6a52bb5}\InprocServer32]
|
||||
;d Disable the Windows 11 command bar *
|
||||
@=""
|
||||
[-HKEY_CURRENT_USER\Software\Classes\CLSID\{86ca1aa0-34aa-4e8b-a509-50c905bae2a2}\InprocServer32]
|
||||
;d Disable the Windows 11 context menu *
|
||||
@=""
|
||||
;t The following settings take effect on newly created File Explorer windows:
|
||||
[HKEY_CURRENT_USER\Software\ExplorerPatcher]
|
||||
;i Use immersive menus when displaying Windows 10 context menus **
|
||||
"DisableImmersiveContextMenu"=dword:00000000
|
||||
@ -173,12 +177,18 @@
|
||||
[HKEY_CURRENT_USER\Software\ExplorerPatcher]
|
||||
;b Hide search bar completely **
|
||||
"HideExplorerSearchBar"=dword:00000000
|
||||
;p 2
|
||||
;b Mica effect on title bar
|
||||
"MicaEffectOnTitlebar"=dword:00000000
|
||||
;c 4 Title bar
|
||||
;x 0 Show icon and title (default)
|
||||
;x 1 Hide title, show icon
|
||||
;x 2 Hide icon, show title
|
||||
;x 3 Hide icon and title
|
||||
"HideIconAndTitleInExplorer"=dword:00000000
|
||||
[HKEY_CURRENT_USER\Software\ExplorerPatcher]
|
||||
;b Register as shell extension
|
||||
;"Virtualized_{D17F1E1A-5919-4427-8F89-A1A8503CA3EB}_RegisterAsShellExtension"=dword:00000000
|
||||
;c 3 Apply Mica effect on these areas
|
||||
;x 0 Let File Explorer decide (default)
|
||||
;x 1 Title bar, command bar and navigation bar
|
||||
;x 2 Nowhere
|
||||
"MicaEffectOnTitlebar"=dword:00000000
|
||||
|
||||
|
||||
;T Start menu
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user