mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: Make window title dark only when dark mode enabled

Browse source
This commit is contained in:
Alexander Koblov 2020-02-10 18:27:49 +00:00
commit bec4ea82d3
1 changed files with 6 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

9
src/platform/uosforms.pas
View file

@ -573,9 +573,12 @@ begin
with Widgetset do
SetWindowLong(AppHandle, GWL_EXSTYLE, GetWindowLong(AppHandle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW);
{$ELSEIF DEFINED(LCLQT5)}
Handler.Data:= MainForm;
Handler.Code:= @ScreenFormEvent;
Screen.AddHandlerFormVisibleChanged(TScreenFormEvent(Handler), True);
if g_darkModeEnabled then
begin
Handler.Data:= MainForm;
Handler.Code:= @ScreenFormEvent;
Screen.AddHandlerFormVisibleChanged(TScreenFormEvent(Handler), True);
end;
{$ENDIF}
// Register network file source
RegisterVirtualFileSource(rsVfsNetwork, TWinNetFileSource);