[katok888]

У себя нашел вот такой скрипт, автор EgOrus,

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

[Setup] AppName=Foxit Reader AppVerName=Foxit Reader V3.0.1120 AppPublisher=EgOrus AppVersion=3.0.1120 DefaultDirName={pf}\FoxitReader DefaultGroupName=+ОФИС\FoxitReader OutputBaseFilename=FoxitReader Compression=lzma/ultra InternalCompressLevel=ultra SolidCompression=yes VersionInfoVersion=3.0.1120 VersionInfoCompany=Foxit Software VersionInfoCopyright=Foxit Software DisableFinishedPage=yes DirExistsWarning=no DisableProgramGroupPage=yes DisableReadyPage=yes ShowLanguageDialog=no SetupIconFile=Mainicon.ico WizardImageFile=embedded\WizardImage.bmp WizardSmallImageFile=embedded\WizardSmallImage.bmp ChangesAssociations=yes ;Для безошибочной работы скрипта структура папок должна быть следующей: ;+embedded\ - файлы картинок для инстолятора ;+files\ - Файлы программы ; foxread.iss - скрипт ; Mainicon.ico - иконка инстолятора [Languages] Name: en; MessagesFile: compiler:Default.isl Name: ru; MessagesFile: compiler:Languages\Russian.isl [Messages] BeveledLabel=—— Copyright 2008 © FoxitSoftware [Compiled by katok888] [CustomMessages] en.CreateGroupIcons=Create &Program icons ru.CreateGroupIcons=Создать значки в Главном меню [Files] Source: files\*; DestDir: {app}; Flags: ignoreversion recursesubdirs; BeforeInstall: MyBeforeInstall [Registry] Root: HKLM; Subkey: Software\Foxit Software; Flags: uninsdeletekey Root: HKCU; Subkey: Software\Foxit Software\Foxit Reader\MainFrame; ValueName: ShowEditorAd_908; ValueType: String; ValueData: 0 Root: HKCU; Subkey: Software\Foxit Software\Foxit Reader\MainFrame; ValueName: ShowPOAd_908; ValueType: String; ValueData: 0 Root: HKCU; Subkey: Software\Foxit Software\Foxit Reader\MainFrame; ValueName: ShowReaderAd_908; ValueType: String; ValueData: 0 Root: HKCU; Subkey: Software\Foxit Software\Foxit Reader\MainFrame; ValueName: ShowSDKAd_908; ValueType: String; ValueData: 0 Root: HKCU; Subkey: Software\Foxit Software\Foxit Reader\MainFrame; ValueName: ShowTypewriterAd_908; ValueType: String; ValueData: 0 Root: HKCR; SubKey: .pdf; ValueType: string; ValueName: ; ValueData: FoxitReader.Document Root: HKCR; SubKey: .pdf; ValueType: string; ValueName: Content Type; ValueData: application/pdf Root: HKCR; SubKey: FoxitReader.Document; Flags: uninsdeletekey Root: HKCR; SubKey: FoxitReader.Document; ValueType: string; ValueName: ; ValueData: Документы формата PDF Root: HKCR; SubKey: FoxitReader.Document; ValueType: string; ValueName: BrowseInPlace; ValueData: 1 Root: HKCR; SubKey: FoxitReader.Document\DefaultIcon; ValueType: string; ValueData: {app}\Foxit Reader.exe,1 Root: HKCR; SubKey: FoxitReader.Document\DocObject; ValueType: string; ValueName: ; ValueData: 0 Root: HKCR; SubKey: FoxitReader.Document\shell\open\command; ValueType: string; ValueData: """{app}\Foxit Reader.exe"" ""%1""" [Icons] Name: {group}\Foxit Reader; Filename: {app}\Foxit Reader.exe; WorkingDir: {app}; Tasks: programs Name: {group}\Домашняя страница; Filename: {app}\Foxit Reader Home.url; Tasks: programs Name: {group}\Удалить Foxit Reader; Filename: {uninstallexe}; IconFilename: {sys}\shell32.dll; IconIndex: 31; Tasks: programs Name: {userdesktop}\Foxit Reader; Filename: {app}\Foxit Reader.exe; Tasks: desktopicon Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\Foxit Reader; Filename: {app}\Foxit Reader.exe; Tasks: quicklaunchicon [Tasks] Name: programs; Description: {cm:CreateGroupIcons}; GroupDescription: {cm:AdditionalIcons} Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked [code] // Пропускаем страницу приветствия procedure CurPageChanged(CurPageID: Integer); begin If CurPageID=wpWelcome then begin SendMessage(WizardForm.NEXTBUTTON.Handle, 513, 0, 0) SendMessage(WizardForm.NEXTBUTTON.Handle, 514, 0, 0) end; end; // При установке, бэкапим значение HKEY_CLASSES_ROOT\.pdf\default в Foxit_bak // нужно для кореектной деинсталяции, c возвратом предыдущей ассоциации на pdf-файлы procedure MyBeforeInstall(); var PDF: String; begin if RegQueryStringValue(HKEY_CLASSES_ROOT, '.pdf', '', PDF) then begin RegWriteStringValue(HKEY_CLASSES_ROOT, '.pdf', 'Foxit_bak', PDF); end; end; // При деинсталяции восстанавливаем бэкапное значение и удаляем ключ Foxit_bak procedure DeinitializeUninstall(); var PDF: String; begin RegDeleteValue(HKEY_CLASSES_ROOT, '.pdf', ''); if RegQueryStringValue(HKEY_CLASSES_ROOT, '.pdf', 'Foxit_bak', PDF) then begin RegWriteStringValue(HKEY_CLASSES_ROOT, '.pdf', '', PDF); end; RegDeleteValue(HKEY_CLASSES_ROOT, '.pdf', 'Foxit_bak'); end;