Name "安裝程序"
Icon "${DIR}/setup128.ico"
OutFile "setup.exe"
InstallDir "$PROGRAMFILES/kaserv"
RequestExecutionLevel admin

!insertmacro MUI_PAGE_DIRECTORY
!insertmacro MUI_PAGE_INSTFILES

!insertmacro MUI_LANGUAGE "SimpChinese"

Function .onInit
 System::Call 'kernel32::CreateMutexA(i 0,i 0,t "SMAPLE_MUTEX") i .r1 ?e'
 Pop $R0
 StrCmp $R0 0 +3
 MessageBox MB_OK|MB_ICONSTOP "只允許運行一個實例"
 Abort
FunctionEnd

;安裝程序段
Section
SetOutPath $INSTDIR
File "${DIR}/新建文本文檔 (2).txt"
File "${DIR}/新建文本文檔.txt"
SetOutPath "$INSTDIR/office"
File "${DIR}/office/*"
;快捷方式
CreateShortCut "$DESKTOP/test.lnk" "$INSTDIR/unsetup.exe"
CreateShortCut "$SMPROGRAMS/test.lnk" "$INSTDIR/unsetup.exe"
WriteUninstaller "$INSTDIR/unsetup.exe"
SectionEnd

;卸載程序段
Section "Uninstall"
RMDir /r "$INSTDIR"
Delete "$DESKTOP/test.lnk"
Delete "$SMPROGRAMS/test.lnk"
SectionEnd

您可能感興趣的文章: