[Habetdin]

Mail.Ru Агент v5.6.3270

читать дальше »

Код:

!define PRODUCT_NAME "Mail.Ru Агент"
!define PRODUCT_VERSION "5.6.3270"
;!define PRODUCT_PUBLISHER "Habetdin"
;!define PRODUCT_WEB_SITE "http://forum.oszone.net/showthread.php?t=102452"
!define PRODUCT_DIR_REGKEY "Software\Habetdin\Mail.Ru Agent"
!define PRODUCT_UNINST_KEY "Software\Microsoft\Windows\CurrentVersion\Uninstall\${PRODUCT_NAME}"
!define PRODUCT_UNINST_ROOT_KEY "HKLM"

SetCompressor /SOLID lzma

!define MUI_ABORTWARNING
!define MUI_COMPONENTSPAGE_NODESC
;!define MUI_ICON "C:\Icons\agent.ico"
;!define MUI_UNICON "C:\Icons\orange-uninstall.ico"
!include "MUI.nsh"
!insertmacro MUI_PAGE_WELCOME
!insertmacro MUI_PAGE_DIRECTORY
!insertmacro MUI_PAGE_COMPONENTS
!insertmacro MUI_PAGE_INSTFILES
!insertmacro MUI_PAGE_FINISH
!insertmacro MUI_UNPAGE_CONFIRM
!insertmacro MUI_UNPAGE_COMPONENTS
!insertmacro MUI_UNPAGE_INSTFILES
!insertmacro MUI_UNPAGE_FINISH
!insertmacro MUI_LANGUAGE "Russian"
BrandingText "—— Compiled by Habetdin"
Name "${PRODUCT_NAME} ${PRODUCT_VERSION}"
OutFile "${PRODUCT_NAME}.${PRODUCT_VERSION}.exe"
InstallDir "$PROGRAMFILES\Mail.Ru\Agent"
InstallDirRegKey HKLM "${PRODUCT_DIR_REGKEY}" "InstallPath"
ShowInstDetails nevershow
ShowUnInstDetails nevershow
Caption "${PRODUCT_NAME} ${PRODUCT_VERSION}"
UninstallCaption "Удаление ${PRODUCT_NAME} ${PRODUCT_VERSION}"
InstType "Полная"
InstType "Сокращенная"
InstType "un.Полное удаление ${PRODUCT_NAME}"

Section "${PRODUCT_NAME}" SEC01
	SectionIn 1 2 RO
  SetOutPath "$INSTDIR"
  File /r "C:\Agent\*.*"
  SetShellVarContext all
  CreateDirectory "$SMPROGRAMS\Mail.Ru"
  CreateShortCut "$SMPROGRAMS\Mail.Ru\Mail.Ru Агент.lnk" "$INSTDIR\magent.exe"
  CreateShortCut "$SMPROGRAMS\Mail.Ru\Удалить Mail.Ru Агент.lnk" "$INSTDIR\uninst.exe"
SectionEnd

Section /o "Ярлык на рабочем столе"
  SectionIn 1
  SetShellVarContext all
  CreateShortCut "$DESKTOP\Mail.Ru Агент.lnk" "$INSTDIR\magent.exe"
SectionEnd

Section -Post
  WriteUninstaller "$INSTDIR\uninst.exe"
  WriteRegStr HKCU "Software\Mail.Ru\Agent" "lang" "ru"
  WriteRegDWORD HKCU "Software\Mail.Ru\Agent" "SavedInstSettings" 286261249
  WriteRegStr HKLM "Software\Mail.Ru\Agent" "InstallPath" "$INSTDIR"
  WriteRegDWORD HKLM "Software\Mail.Ru\Agent" "ForAllUsers" 1
  WriteRegDWORD HKLM "Software\Mail.Ru\Agent" "version" 3270
  WriteRegStr HKLM "${PRODUCT_DIR_REGKEY}" "InstallPath" "$INSTDIR\magent.exe"
  WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "DisplayName" "$(^Name)"
  WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "UninstallString" "$INSTDIR\uninst.exe"
  WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "DisplayIcon" "$INSTDIR\magent.exe"
  WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "DisplayVersion" "${PRODUCT_VERSION}"
;  WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "URLInfoAbout" "${PRODUCT_WEB_SITE}"
;  WriteRegStr ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}" "Publisher" "${PRODUCT_PUBLISHER}"
SectionEnd

Section Uninstall secidx01
  SectionIn 1 RO
  DeleteRegKey HKLM "Software\Mail.Ru\Agent"
  DeleteRegKey ${PRODUCT_UNINST_ROOT_KEY} "${PRODUCT_UNINST_KEY}"
  DeleteRegKey HKLM "${PRODUCT_DIR_REGKEY}"
  Delete /REBOOTOK "$INSTDIR\Mra\dll\mramenu.dll"
  RMDir /r "$INSTDIR"
  SetShellVarContext all
  Delete "$DESKTOP\Mail.Ru Агент.lnk"
  RMDir /r "$SMPROGRAMS\Mail.Ru"
  SetAutoClose true
SectionEnd

Section "Un.Удалить папку данных"
    SectionIn 1
	SetShellVarContext current
	RMDir /r "$APPDATA\Mra\"
SectionEnd

Section "Un.Удалить настройки реестра"
  SectionIn 1
  SetShellVarContext current
  DeleteRegKey HKCU "Software\Mail.Ru\Agent"
SectionEnd

Function un.onInit
	SectionSetText ${secidx01} "Удалить приложение"
FunctionEnd

Оффтопик

Я реально начинаю бояться за конфиденциальность. Зло »

Надо было отключать сеть