Vichingo455/WUIsBack
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases 2 Wiki Activity

Bump to 1.11

Browse Source
This commit is contained in:
Vichingo455
2025-03-23 12:49:51 +01:00
parent 7ca9105b8d
commit 23ac8a27f0
65 changed files with 2470 additions and 3597 deletions
Download Patch File Download Diff File Expand all files Collapse all files

62
setup/AeroWizard.nsh
View File

@@ -12,7 +12,13 @@
!insertmacro SetControlColor ${parent} ${control} SYSCLR:WINDOWTEXT
!macroend
; These are PE resources because there's no benefit to LZMA compressing PNGs
PEAddResource "banner-wordmark-light.png" "PNG" "#1337"
PEAddResource "banner-wordmark-dark.png" "PNG" "#1338"
PEAddResource "banner-wordmark-glow.png" "PNG" "#1339"
Var /GLOBAL ChildHwnd
Var /GLOBAL AeroWizard.Font
!macro -AeroWizardOnShow
; Get the child window where the wizard page is
@@ -26,55 +32,44 @@ Var /GLOBAL ChildHwnd
CreateFont $3 "Segoe UI Variable Display Semibold" 14 600
!insertmacro SetControlColor $HWNDPARENT 1037 SYSCLR:WINDOWTEXT
${Else}
; Aero style
CreateFont $3 "Segoe UI" 12 400
!insertmacro SetControlColor $HWNDPARENT 1037 0x003399
${EndIf}
CreateFont $2 "Segoe UI" 8 400
CreateFont $AeroWizard.Font "Segoe UI" 8 400
!insertmacro SetFont $3 $HWNDPARENT 1037
!insertmacro SetFont $2 $HWNDPARENT 1
!insertmacro SetFont $2 $HWNDPARENT 2
!insertmacro SetFont $2 $HWNDPARENT 3
!insertmacro SetFont $2 $HWNDPARENT 1028
!insertmacro SetFont $2 $ChildHwnd 1000
!insertmacro SetFont $2 $ChildHwnd 1004
!insertmacro SetFont $2 $ChildHwnd 1006
!insertmacro SetFont $2 $ChildHwnd 1016
!insertmacro SetFont $2 $ChildHwnd 1022
!insertmacro SetFont $2 $ChildHwnd 1023
!insertmacro SetFont $2 $ChildHwnd 1029
!insertmacro SetFont $2 $ChildHwnd 1027
!insertmacro SetFont $2 $ChildHwnd 1032
!insertmacro SetFont $2 $ChildHwnd 1043
!insertmacro SetFont $AeroWizard.Font $HWNDPARENT 1028
${For} $4 1 3
!insertmacro SetFont $AeroWizard.Font $HWNDPARENT $4
${Next}
${For} $4 1000 1043
!insertmacro SetFont $AeroWizard.Font $ChildHwnd $4
${Next}
${Else}
; Wizard97 style
; Wizard97ish style
${If} ${FileExists} "$FONTS\framd.ttf"
CreateFont $2 "Franklin Gothic Medium" 13 400
!insertmacro SetFont $2 $HWNDPARENT 1037
!insertmacro SetControlColor $HWNDPARENT 1037 0x003399
${Else}
CreateFont $2 "Verdana" 12 800
!insertmacro SetFont $2 $HWNDPARENT 1037
!insertmacro SetControlColor $HWNDPARENT 1037 SYSCLR:WINDOWTEXT
${EndIf}
!insertmacro SetFont $2 $HWNDPARENT 1037
CreateFont $AeroWizard.Font "MS Shell Dlg 2" 8 400
${EndIf}
; Set white background
SetCtlColors $HWNDPARENT SYSCLR:WINDOWTEXT SYSCLR:WINDOW
SetCtlColors $ChildHwnd SYSCLR:WINDOWTEXT SYSCLR:WINDOW
!insertmacro SetBackground $ChildHwnd 1020
!insertmacro SetBackground $ChildHwnd 1028
!insertmacro SetBackground $ChildHwnd 1006
!insertmacro SetBackground $ChildHwnd 1022
!insertmacro SetBackground $ChildHwnd 1023
!insertmacro SetBackground $ChildHwnd 1027
!insertmacro SetBackground $ChildHwnd 1029
!insertmacro SetBackground $ChildHwnd 1032
!insertmacro SetBackground $ChildHwnd 1043
${For} $4 1000 1043
!insertmacro SetBackground $ChildHwnd $4
${Next}
; Set up banner and glass
LegacyUpdateNSIS::DialogInit
; Activate taskbar progress bar plugin
${If} ${AtLeastWin7}
LegacyUpdateNSIS::InitTaskbarProgress
${EndIf}
LegacyUpdateNSIS::InitTaskbarProgress
!macroend
Function AeroWizardOnShow
@@ -84,3 +79,10 @@ FunctionEnd
Function un.AeroWizardOnShow
!insertmacro -AeroWizardOnShow
FunctionEnd
!macro -AeroWizardDialogControl hwnd
SendMessage ${hwnd} ${WM_SETFONT} $AeroWizard.Font 0
SetCtlColors ${hwnd} SYSCLR:WINDOWTEXT SYSCLR:WINDOW
!macroend
!define AeroWizardDialogControl '!insertmacro -AeroWizardDialogControl'