[MKN]

Изменяем стандартную страницу выбора компонентов PAGE_COMPONENTS без правки ресурсов

Код:

!define PRODUCT_NAME "COMPONENTSPRE"
!define PRODUCT_VERSION "1.0"
Name "${PRODUCT_NAME} ${PRODUCT_VERSION}"
OutFile "COMPONENTSPRE.exe"
InstallDir "$TEMP"
!include "MUI2.nsh"

!define SWP_SHOWWINDOW 0x00000040

!define MUI_PAGE_HEADER_TEXT "Текст 1"
!define MUI_PAGE_HEADER_SUBTEXT "Текст 2"
!define MUI_COMPONENTSPAGE_TEXT_TOP "Текст 3"

!define MUI_PAGE_CUSTOMFUNCTION_PRE COMPPRE
!define MUI_PAGE_CUSTOMFUNCTION_SHOW SETCTLPOS
!insertmacro MUI_PAGE_COMPONENTS

!insertmacro MUI_PAGE_INSTFILES
!insertmacro MUI_LANGUAGE "English"

Section "Section1" SEC01
SectionEnd

Section "Section2" SEC02
SectionEnd

Section "Section3" SEC03
SectionEnd

Function COMPPRE
SectionSetText ${SEC01} "Component1"
SectionSetText ${SEC02} "Component2"
SectionSetText ${SEC03} "Component3"
FunctionEnd

Function SETCTLPOS
FindWindow $R0 "#32770" "" $HWNDPARENT
GetDlgItem $0 $R0 1021
System::Call 'user32::DestroyWindow(ir0)'
GetDlgItem $0 $R0 1022
System::Call 'user32::DestroyWindow(ir0)'
GetDlgItem $0 $R0 1023
System::Call 'user32::DestroyWindow(ir0)'
GetDlgItem $0 $R0 1042
System::Call 'user32::DestroyWindow(ir0)'
GetDlgItem $0 $R0 1043
System::Call 'user32::DestroyWindow(ir0)'
GetDlgItem $0 $R0 1017
System::Call "user32::SetWindowPos(ir0,i0,i0,i30,i450,i180,i${SWP_SHOWWINDOW})"
GetDlgItem $0 $R0 1032
System::Call "user32::SetWindowPos(ir0,i0,i0,i52,i450,i158,i${SWP_SHOWWINDOW})"
FunctionEnd