Войти

Показать полную графическую версию : Скрипты Inno Setup. Помощь и советы [часть 8]


Страниц : 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 [80] 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126

Nordek
13-06-2016, 19:49
Max-RZD,
Смотрите что у вас получается:
В скрипте:
klrFr_Hopper-0001_e.wag

В папке:
klrFr_Hopper-0001e.wag

Надеюсь заметите разницу.

Если конечный файл на выходе имеет имя "klrFr_Hopper-0001e.wag", то на вход в инсталлятор должно быть таким же.

Т.е скопируйте всё содержимое:
; Script generated by the Inno Setup Script Wizard.
; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!

[Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
AppId={{BD9A852C-C404-4988-92C3-8DA3D57B29B5}
AppName=TrainSim.Ru - MSTS Addon
AppVerName=RZD (Russian Railways) hopper cars #0001, 0002, 0003, 0004 (version 1.0)
;AppVerName=TrainSim.Ru - MSTS Addon RZD (Russian Railways) hopper cars #0001, 0002, 0003, 0004 (version 1.0)
AppPublisher=rainsim.ru
AppPublisherURL=http://trainsim.ru
AppSupportURL=http://trainsim.ru
AppUpdatesURL=http://trainsim.ru
DefaultDirName={reg:HKLM\Software\Microsoft\Microsoft Games\Train Simulator\1.0,Path}
DefaultGroupName=TrainSim.Ru - MSTS Addon
DisableProgramGroupPage=yes
LicenseFile=Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\License.txt
InfoBeforeFile=Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-pack_readme.txt
OutputDir=E:\готово
OutputBaseFilename=klrFr_Hopper-0001-0002-0003-0004_v1_0
Compression=lzma
SolidCompression=yes
WizardImageFile=c.bmp
WizardSmallImageFile=train.bmp
Uninstallable=false
DirExistsWarning=no

[Languages]
Name: english; MessagesFile: compiler:Default.isl

[Types]
Name: full; Description: Стандартная
Name: custom; Description: Выборочная

[Components]
Name: klrFr_Hopper_0001; Description: klrFr_Hopper-0001; Types: full custom
Name: klrFr_Hopper_0002; Description: klrFr_Hopper-0002; Types: full
Name: klrFr_Hopper_0003; Description: klrFr_Hopper-0003; Types: full
Name: klrFr_Hopper_0004; Description: klrFr_Hopper-0004; Types: full

[Files]
; klrFr_Hopper-0001
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\License.txt; DestDir: {app}\klrFr_Hopper; DestName: License.txt; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0001e.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0001f.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0001.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0001e.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0001f.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0001.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0001.sd; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\SDW_Hopper.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\SDW_Hopper.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-pack_readme.txt; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001

; klrFr_Hopper-0002
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\License.txt; DestDir: {app}\klrFr_Hopper; DestName: License.txt; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0002e.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0002f.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0002.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0002e.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0002f.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0002.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0002.sd; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\SDW_Hopper.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\SDW_Hopper.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-pack_readme.txt; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002

; klrFr_Hopper-0003
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\License.txt; DestDir: {app}\klrFr_Hopper; DestName: License.txt; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0003e.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0003f.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0003.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0003e.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0003f.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0003.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0003.sd; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\SDW_Hopper.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\SDW_Hopper.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-pack_readme.txt; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003

; klrFr_Hopper-0004
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\License.txt; DestDir: {app}\klrFr_Hopper; DestName: License.txt; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0004e.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0004f.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0004.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0004e.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0004f.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0004.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-0004.sd; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\SDW_Hopper.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\SDW_Hopper.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-pack_readme.txt; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
;
;

Замените в Script.iss.
Отработает без препятствий.


На заметку: Смотрите отмеченное красным: \Trains\Trainset\klrFr_Hopper\License.txt
Обратный слеш вначале - означает корень диска.

Max-RZD
13-06-2016, 20:13
Вроде разобрался, сейчас инсталлятор весь собирается без ошибок.
Я изменил пути в секции [Files], удалил \Trains\Trainset и ошибки не стало.
; Script generated by the Inno Setup Script Wizard.
; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!

[Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
AppId={{BD9A852C-C404-4988-92C3-8DA3D57B29B5}
AppName=TrainSim.Ru - MSTS Addon
AppVerName=RZD (Russian Railways) hopper cars #0001, 0002, 0003, 0004 (version 1.0)
;AppVerName=TrainSim.Ru - MSTS Addon RZD (Russian Railways) hopper cars #0001, 0002, 0003, 0004 (version 1.0)
AppPublisher=rainsim.ru
AppPublisherURL=http://trainsim.ru
AppSupportURL=http://trainsim.ru
AppUpdatesURL=http://trainsim.ru
DefaultDirName={reg:HKLM\Software\Microsoft\Microsoft Games\Train Simulator\1.0,Path}
DefaultGroupName=TrainSim.Ru - MSTS Addon
DisableProgramGroupPage=yes
LicenseFile=E:\Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\License.txt
InfoBeforeFile=E:\Games Laboratory\Microsoft Train Simulator\TRAINS\TRAINSET\klrFr_Hopper\klrFr_Hopper-pack_readme.txt
OutputDir=E:\готово
OutputBaseFilename=klrFr_Hopper-0001-0002-0003-0004_v1_0
Compression=lzma
SolidCompression=yes
WizardImageFile=D:\c.bmp
WizardSmallImageFile=E:\скрины\train.bmp
Uninstallable=false
DirExistsWarning=no

[Languages]
Name: english; MessagesFile: compiler:Default.isl

[Types]
Name: full; Description: Стандартная
Name: custom; Description: Выборочная

[Components]
Name: klrFr_Hopper_0001; Description: klrFr_Hopper-0001; Types: full custom
Name: klrFr_Hopper_0002; Description: klrFr_Hopper-0002; Types: full
Name: klrFr_Hopper_0003; Description: klrFr_Hopper-0003; Types: full
Name: klrFr_Hopper_0004; Description: klrFr_Hopper-0004; Types: full

[Files]
Source: \klrFr_Hopper\License.txt; DestDir: {app}\klrFr_Hopper; DestName: License.txt; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: \klrFr_Hopper\klrFr_Hopper-0001_e.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: \klrFr_Hopper\klrFr_Hopper-0001_f.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: \klrFr_Hopper\klrFr_Hopper-0001.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: \klrFr_Hopper\klrFr_Hopper-0001_e.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: \klrFr_Hopper\klrFr_Hopper-0001_f.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: \klrFr_Hopper\klrFr_Hopper-0001.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: \klrFr_Hopper\klrFr_Hopper-0001.sd; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: \klrFr_Hopper\SDW_Hopper.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: \klrFr_Hopper\SDW_Hopper.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: \klrFr_Hopper\klrFr_Hopper-pack_readme.txt; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0001
Source: \klrFr_Hopper\License.txt; DestDir: {app}\klrFr_Hopper; DestName: License.txt; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: \klrFr_Hopper\klrFr_Hopper-0002_e.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: \klrFr_Hopper\klrFr_Hopper-0002_f.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: \klrFr_Hopper\klrFr_Hopper-0002.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: \klrFr_Hopper\klrFr_Hopper-0002_e.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: \klrFr_Hopper\klrFr_Hopper-0002_f.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: \klrFr_Hopper\klrFr_Hopper-0002.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: \klrFr_Hopper\klrFr_Hopper-0002.sd; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: \klrFr_Hopper\SDW_Hopper.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: \klrFr_Hopper\SDW_Hopper.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: \klrFr_Hopper\klrFr_Hopper-pack_readme.txt; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0002
Source: \klrFr_Hopper\License.txt; DestDir: {app}\klrFr_Hopper; DestName: License.txt; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: \klrFr_Hopper\klrFr_Hopper-0003_e.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: \klrFr_Hopper\klrFr_Hopper-0003_f.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: \klrFr_Hopper\klrFr_Hopper-0003.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: \klrFr_Hopper\klrFr_Hopper-0003_e.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: \klrFr_Hopper\klrFr_Hopper-0003_f.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: \klrFr_Hopper\klrFr_Hopper-0003.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: \klrFr_Hopper\klrFr_Hopper-0003.sd; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: \klrFr_Hopper\SDW_Hopper.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: \klrFr_Hopper\SDW_Hopper.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: \klrFr_Hopper\klrFr_Hopper-pack_readme.txt; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0003
Source: \klrFr_Hopper\License.txt; DestDir: {app}\klrFr_Hopper; DestName: License.txt; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: \klrFr_Hopper\klrFr_Hopper-0004_e.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: \klrFr_Hopper\klrFr_Hopper-0004_f.wag; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: \klrFr_Hopper\klrFr_Hopper-0004.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: \klrFr_Hopper\klrFr_Hopper-0004_e.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: \klrFr_Hopper\klrFr_Hopper-0004_f.jpg; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: \klrFr_Hopper\klrFr_Hopper-0004.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: \klrFr_Hopper\klrFr_Hopper-0004.sd; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: \klrFr_Hopper\SDW_Hopper.ace; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: \klrFr_Hopper\SDW_Hopper.s; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004
Source: \klrFr_Hopper\klrFr_Hopper-pack_readme.txt; DestDir: {app}\klrFr_Hopper; Flags: ignoreversion; Components: klrFr_Hopper_0004

Но теперь появился другой вопрос: В конце установке есть выбор Стандартная или Выборочная установка
http://savepic.ru/10152317m.jpg (http://savepic.ru/10152317.htm)

Но она почему то расположена не в виде кнопок как здесь
http://savepic.ru/10047088m.jpg (http://savepic.ru/10047088.htm)

А как в выпадающем меню. Как это можно исправить?

И когда выбираешь Выборочная, никакого выбора нет, как здесь
http://savepic.ru/10141055m.jpg (http://savepic.ru/10141055.htm) http://savepic.ru/10111359m.jpg (http://savepic.ru/10111359.htm)

А просто устанавливается Первый хоппер - klrFr_Hopper-0001 Как это можно всё исправить?

Max-RZD
13-06-2016, 21:06
В скрипте как раз правильно указано:
klrFr_Hopper-0001_e.wag

В папке, так не правильно:
klrFr_Hopper-0001e.wag

Всё уже исправил в папке. Удалил пути в секции [Files], удалил \Trains\Trainset, инсталлятор теперь собирается без ошибок.
Вопрос остаются по выбору вот в конце установке?

habib2302
16-06-2016, 11:46
Доброе время суток. Помогите решить проблему с запуском процесса explorer.exe. Как видно на видео (https://youtu.be/UTB-k3SPQQw) процесс explorer завершается успешно, но после завершения установки софтины инсталлятор обратно запускает explorer, но открывается только папка.

El Sanchez
16-06-2016, 14:57
но после завершения установки софтины инсталлятор обратно запускает explorer, но открывается только папка. »
habib2302, инсталлятор, бездумно играющийся с важными пользовательскими (тем более системными) процессами, не имеет права на существование. Что будет делать ваш инсталлятор, если кто-то запустит его из-под другой учетной записи (например, из-под админской учетки в сеансе пользователя)?

Alloc
22-06-2016, 17:02
Приветствую!

Я не знаю как в зависимости от выбранного языка заставить скрипт выдавать нужный перевод для Типа Диска. Это единственное что я не перевел и как я полагаю функция возвращает результат в зависимости от языка системы, что мне не нужно..

Вместо "Локальный диск/Съемный диск" - должен писать "Logical Disk" и "Removable Disk" соответственно (в случае выбора английского языка). Поможете?

http://www.img-load.de/images/2016/06/17/BEZYMYNNYI.png

вот сам скрипт:


[Setup]
AppName=My Program
AppVerName=My Program v.1.2
DefaultDirName={pf}\My Program
;BitmapResource=Drive:img_small.bmp
[CustomMessages]
rus.DiskName=Имя
rus.DiskFileSystem=Файловая система
rus.DiskTotal=Ёмкость
rus.DiskFree=Свободно
rus.DiskType=Тип

eng.DiskName=Name
eng.DiskFileSystem=File System
eng.DiskTotal=Capacity
eng.DiskFree=Free Space
eng.DiskType=Type

[.Code]
#ifdef UNICODE
#define A "W"
#else
#define A "A"
#endif

const
#ifndef NeedHDD
DRIVE_NO_ROOT_DIR = 1;
DRIVE_REMOVABLE = 2;
DRIVE_FIXED = 3;
#endif
MAX_PATH = 260;
SHGFI_ICON = $100;
SHGFI_SMALLICON = $1;
SHGFI_DISPLAYNAME = $200;
SHGFI_TYPENAME = $400;

type
_SHFILEINFO = record
hIcon: HICON;
iIcon: Integer;
dwAttributes: DWORD;
szDisplayName: array [0..MAX_PATH-1] of Char;
szTypeName: array [0..79] of Char;
end;

_ULARGE_INTEGER = record
LowPart: DWORD;
HighPart: DWORD;
end;

DriveInfo = record
DriveName: String;
DriveFileSystemName: String;
DriveSize: Extended;
DriveFreeSize: array [0..1] of Extended;
DriveType: String;
DriveIcon: _SHFILEINFO;
end;


function SHGetFileInfo(pszPath: String; dwFileAttributes: DWORD; var psfi: _SHFILEINFO; cbFileInfo, uFlags: UINT): DWORD; external 'SHGetFileInfo{#A}@shell32.dll stdcall';
function StrFormatByteSize64(qdw: Currency; var pszBuf: Char; cchBuf: UINT): PAnsiChar; external 'StrFormatByteSize64A@shlwapi.dll stdcall';
function GetVolumeInformationLp(lpRootPathName, lpVolumeNameBuffer: String; nVolumeNameSize, lpVolumeSerialNumber: DWORD; var lpMaximumComponentLength, lpFileSystemFlags: DWORD; lpFileSystemNameBuffer: String; nFileSystemNameSize: DWORD): BOOL; external 'GetVolumeInformation{#A}@kernel32.dll stdcall';
function GetDriveTypeLp(lpRootPathName: String): UINT; external 'GetDriveType{#A}@kernel32.dll stdcall';
function GetDiskFreeSpaceEx(lpDirectoryName: String; var lpFreeBytesAvailableToCaller, lpTotalNumberOfBytes, lpTotalNumberOfFreeBytes: _ULARGE_INTEGER): BOOL; external 'GetDiskFreeSpaceEx{#A}@kernel32.dll stdcall';


function BytesToSize(Bytes: Extended): String;
var
pszBuf: array [0..15] of Char;
begin
try
Result := StrFormatByteSize64(Abs(Bytes div 1E4), pszBuf[0], SizeOf(pszBuf));
except end;
end;

function CharArrayToString(cArray: array of Char): String;
begin
Result := '';
while cArray[Length(Result)] <> #0 do Insert(cArray[Length(Result)], Result, Length(Result)+1);
end;

function Size64(QuadPart: _ULARGE_INTEGER): Extended;
begin
Result := $7FFFFFFF;
Result := ((QuadPart.HighPart + integer(QuadPart.LowPart < 0))*Result + QuadPart.HighPart + integer(QuadPart.LowPart < 0))*2 + QuadPart.LowPart;
end;


procedure GetDrivesInfo(var DriveArray: array of DriveInfo);
var
i, e: Integer;
iIcon: WORD;
UndefDriveLetter: String;
DriveType: UINT;
DrivePath: String;
VolumeName, FileSystemName: String;
ComponentLength, SerialNumber, FileSystemFlags: DWORD;
FreeBytesAvailableToCaller, TotalNumberOfBytes, TotalNumberOfFreeBytes: _ULARGE_INTEGER;
begin
for i := 67 to 90 do // Loop from C..Z to determine available drives
begin
UndefDriveLetter := Chr(i) + ':\';
DriveType := GetDriveTypeLp(UndefDriveLetter);
case DriveType of
DRIVE_REMOVABLE, DRIVE_FIXED: begin
VolumeName := StringOfChar(#32, MAX_PATH);
FileSystemName := StringOfChar(#32, MAX_PATH);
GetVolumeInformationLp(UndefDriveLetter, VolumeName, MAX_PATH, SerialNumber, ComponentLength, FileSystemFlags, FileSystemName, MAX_PATH);
GetDiskFreeSpaceEx(UndefDriveLetter, FreeBytesAvailableToCaller, TotalNumberOfBytes, TotalNumberOfFreeBytes);
SetArrayLength(DriveArray, GetArrayLength(DriveArray)+1);
e := GetArrayLength(DriveArray)-1;
SHGetFileInfo(UndefDriveLetter, FILE_ATTRIBUTE_DIRECTORY, DriveArray[e].DriveIcon, sizeof(DriveArray[e].DriveIcon), SHGFI_ICON or SHGFI_SMALLICON or SHGFI_TYPENAME or SHGFI_DISPLAYNAME);
DriveArray[e].DriveName := CharArrayToString(DriveArray[e].DriveIcon.szDisplayName);
DriveArray[e].DriveFileSystemName := FileSystemName;
DriveArray[e].DriveSize := Size64(TotalNumberOfBytes);
DriveArray[e].DriveFreeSize[0] := Size64(TotalNumberOfFreeBytes);
if DriveArray[e].DriveSize > 0 then DriveArray[e].DriveFreeSize[1] := DriveArray[e].DriveFreeSize[0]*100/DriveArray[e].DriveSize;
DriveArray[e].DriveType := CharArrayToString(DriveArray[e].DriveIcon.szTypeName);
end;
DRIVE_NO_ROOT_DIR: Continue;
end;
end;
end;


procedure DriveListViewOnClick(Sender: TObject);
begin
if Assigned(TListView(Sender).Selected) then
WizardForm.DirEdit.Text := AddBackSlash(Copy(TListView(Sender).Selected.Caption, Pos('(', TListView(Sender).Selected.Caption)+1, 2)) + Copy(WizardForm.DirEdit.Text, 4, Length(WizardForm.DirEdit.Text));
end;

procedure DriveListViewColumnClick(Sender: TObject; Column: TListColumn);
begin
TListView(Sender).Tag := Column.Index;
with TListView(Sender) do
begin
if DesignInfo = 0 then DesignInfo := 1 else DesignInfo := -DesignInfo;
AlphaSort;
end;
end;

procedure DriveListViewOnCompare(Sender: TObject; Item1, Item2: TListItem; Data: Integer; var Compare: Integer);
begin
with TListView(Sender) do
begin
if Tag = 0 then
Compare := DesignInfo*CompareText(Item1.Caption, Item2.Caption)
else
Compare := DesignInfo*CompareText(Item1.SubItems[Tag-1], Item2.SubItems[Tag-1]);
end;
end;

procedure GetDiskInfo;
var
ReadyArray: array of DriveInfo;
DriveListView: TListView;
NewColumn: TListColumn;
ListItem: TListItem;
ImgList: TImageList;
i, e: Integer;
ico: TIcon;
begin
GetDrivesInfo(ReadyArray);
e := GetArrayLength(ReadyArray)-1;

DriveListView := TListView.Create(nil);
with DriveListView do
begin
Parent := WizardForm.SelectDirPage;
ViewStyle := vsReport;
ReadOnly := True;

//SetBounds(WizardForm.DirEdit.Left, WizardForm.DirEdit.Top + ScaleY(40), WizardForm.DirEdit.Width, ScaleY(200));
SetBounds(WizardForm.DirEdit.Left, WizardForm.DirEdit.Top + ScaleY(30), WizardForm.DirEdit.Width+85, ScaleY(99));

OnClick := @DriveListViewOnClick;
OnColumnClick := @DriveListViewColumnClick;
OnCompare := @DriveListViewOnCompare;

ImgList := TImageList.Create(DriveListView);
ImgList.BkColor := Color;
for i := 0 to e do
begin
ico := TIcon.Create;
ico.Handle := ReadyArray[i].DriveIcon.hIcon;
ImgList.AddIcon(ico);
ico.Free;
end;
SmallImages := ImgList;

NewColumn := Columns.Add;
NewColumn.Caption := ExpandConstant('{cm:DiskName}');
NewColumn.Width := ScaleX(130);

NewColumn := Columns.Add;
NewColumn.Caption := ExpandConstant('{cm:DiskFileSystem}');
NewColumn.Width := ScaleX(105);

NewColumn := Columns.Add;
NewColumn.Caption := ExpandConstant('{cm:DiskTotal}');
NewColumn.Width := ScaleX(60);

NewColumn := Columns.Add;
NewColumn.Caption := ExpandConstant('{cm:DiskFree}');
NewColumn.Width := ScaleX(90);

NewColumn := Columns.Add;
NewColumn.Caption := ExpandConstant('{cm:DiskType}');
NewColumn.Width := ScaleX(100);

for i := 0 to e do
begin
ListItem := Items.Add;
with ListItem do
begin
Caption := ReadyArray[i].DriveName;
SubItems.Add(ReadyArray[i].DriveFileSystemName);
SubItems.Add(BytesToSize(ReadyArray[i].DriveSize));
SubItems.Add(Format('%s (%d%%)', [BytesToSize(ReadyArray[i].DriveFreeSize[0]), Round(ReadyArray[i].DriveFreeSize[1])]));
SubItems.Add(ReadyArray[i].DriveType);
ImageIndex := i;
end;
end;
end;
end;

Sanarialerin
28-06-2016, 20:01
#define AppNameHL "Half-Life"
#define AppNameCS "Counter-Strike"
#define AppVersion "4554"
#define AppPublisher "Valve Corporation"
#define AppExeHL "hl.exe"
#define AppExeCS

[Setup]
AllowCancelDuringInstall=no
AppId={{F6E25E5E-3DDC-46AF-868A-C0057379351B}
AppName={#AppNameCS}
AppPublisher={#AppPublisher}
AppVerName={#AppNameCS}
AppVersion={#AppVersion}
Compression=lzma
DefaultDirName={pf}\{#AppNameHL}
DefaultGroupName={#AppNameHL}
DisableProgramGroupPage=yes
DisableReadyMemo=yes
DisableReadyPage=yes
DisableWelcomePage=no
OutputBaseFilename=setup
SolidCompression=yes
UninstallDisplayIcon={app}\cstrike\cstrike.ico
UninstallDisplayName={#AppNameCS}

[Languages]
Name: "english"; MessagesFile: "compiler:Default.isl"

[Files]
Source: "C:\DEV\HL\hl.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "C:\DEV\HL\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs

[Icons]
Name: "{group}\{#AppNameHL}"; Filename:"{app}\{#AppExeHL}"; Parameters:"-steam -appid 70";
Name: "{userdesktop}\{#AppNameHL}"; Filename:"{app}\{#AppExeHL}"; Parameters:"-steam -appid 70";

Name: "{group}\{#AppNameCS}"; Filename:"{app}\{#AppExeHL}"; WorkingDir:"{app}";IconFilename:"{app}\cstrike\cstrike.ico"; Parameters:"-game cstrike -steam -appid 10";
Name: "{userdesktop}\{#AppNameCS}"; Filename:"{app}\{#AppExeHL}"; WorkingDir:"{app}";IconFilename:"{app}\cstrike\cstrike.ico"; Parameters:"-game cstrike -steam -appid 10";


Ошибка при удалении
Внутренняя ошибка:Cannot find utCompiledCode record for this version of the uninstaller

Как исправить ?

P.S
Система установлена чистая
Inno Setup 5.5.9 Unicode

nik1967
28-06-2016, 21:20
Sanarialerin, на сколько помню данную ошибку, не надо паковать unins000.dat и unins000.exe. Могу ошибаться.

Sanarialerin
28-06-2016, 21:38
на сколько помню данную ошибку, не надо паковать unins000.dat и unins000.exe. Могу ошибаться. »


Я вас понял,проверю еще раз.

Andrei_IW
29-06-2016, 15:50
Подскажите а как в секцию DefaultDirName поместить свой адрес, сформированный cmd скриптом. А то язык который написан в секции code совсем не понятный.

Cocenalyanas
01-07-2016, 17:13
; Script generated by the Inno Setup Script Wizard.
; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!

#define MyAppName "My Program"
#define MyAppVersion "1.5"
#define MyAppPublisher "My Company, Inc."
#define MyAppURL "http://www.example.com/"
#define MyAppExeName "ExeName.exe"

[Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
AppId={{7B21D215-88A3-4374-9530-2DCCA0E58863}
AppName={#MyAppName}
AppVersion={#MyAppVersion}
;AppVerName={#MyAppName} {#MyAppVersion}
AppPublisher={#MyAppPublisher}
AppPublisherURL={#MyAppURL}
AppSupportURL={#MyAppURL}
AppUpdatesURL={#MyAppURL}
DefaultDirName={pf}\{#MyAppName}
DisableProgramGroupPage=yes
OutputBaseFilename=setup
Compression=lzma
SolidCompression=yes

[Languages]
Name: "english"; MessagesFile: "compiler:Default.isl"

[Tasks]
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked

[Files]
Source: "C:\Test\ExeName.exe"; DestDir: "{app}"; Flags: ignoreversion // Вот про это имею ввиду
Source: "C:\Test\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
; NOTE: Don't use "Flags: ignoreversion" on any shared system files

[Icons]
Name: "{commonprograms}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"
Name: "{commondesktop}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName}"; Tasks: desktopicon

[Run]
Filename: "{app}\{#MyAppExeName}"; Description: "{cm:LaunchProgram,{#StringChange(MyAppName, '&', '&&')}}"; Flags: nowait postinstall skipifsilent



Обязательна ли строка где указан путь к exe-файлу ?

Nordek
01-07-2016, 20:06
Обязательна ли строка где указан путь к exe-файлу ? »
В таком случае:
Source: C:\Test\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs


с учётом, что файл ExeName.exe расположен по тому же адресу, то строку:
Source: C:\Test\ExeName.exe; DestDir: {app}; Flags: ignoreversion
можете беспрепятственно исключить.

Т.е при таком условии:
Source: C:\Test\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs

всё содержимое каталога "Test" будет включено в инсталлятор. На выходе (т.е после инсталляции), файлы и структура каталогов в каталоге установки будет такой же как на данный момент у вас в каталоге "Test"

Но если решите отдельно определить отличное расположение для файла ExeName.exe, то строку нужно будет вернуть/добавить.

Cocenalyanas
01-07-2016, 20:41
Цитата Cocenalyanas:
Обязательна ли строка где указан путь к exe-файлу ? »
В таком случае:
Код:
Source: C:\Test\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs
с учётом, что файл ExeName.exe расположен по тому же адресу, то строку:
Код:
Source: C:\Test\ExeName.exe; DestDir: {app}; Flags: ignoreversion
можете беспрепятственно исключить.
Т.е при таком условии:
Код:
Source: C:\Test\*; DestDir: {app}; Flags: ignoreversion recursesubdirs createallsubdirs
всё содержимое каталога "Test" будет включено в инсталлятор. На выходе (т.е после инсталляции), файлы и структура каталогов в каталоге установки будет такой же как на данный момент у вас в каталоге "Test"
Но если решите отдельно определить отличное расположение для файла ExeName.exe, то строку нужно будет вернуть/добавить. »

; Script generated by the Inno Setup Script Wizard.
; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!

#define MyAppName "My Program"
#define MyAppVersion "1.5"
#define MyAppPublisher "My Company, Inc."
#define MyAppURL "http://www.example.com/"
#define MyAppExeName1 "ExeName1.exe"
#define MyAppExeName2 "ExeName2.exe"

[Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
AppId={{7B21D215-88A3-4374-9530-2DCCA0E58863}
AppName={#MyAppName}
AppVersion={#MyAppVersion}
;AppVerName={#MyAppName} {#MyAppVersion}
AppPublisher={#MyAppPublisher}
AppPublisherURL={#MyAppURL}
AppSupportURL={#MyAppURL}
AppUpdatesURL={#MyAppURL}
DefaultDirName={pf}\{#MyAppName}
DisableProgramGroupPage=yes
OutputBaseFilename=setup
Compression=lzma
SolidCompression=yes

[Languages]
Name: "english"; MessagesFile: "compiler:Default.isl"

[Tasks]
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked

[Files]
Source: "C:\Test\ExeName1.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "C:\Test\ExeName2.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "C:\Test\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
; NOTE: Don't use "Flags: ignoreversion" on any shared system files

[Icons]
Name: "{commonprograms}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName2}"
Name: "{commondesktop}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName2}"; Tasks: desktopicon

[Run]
Filename: "{app}\{#MyAppExeName}"; Description: "{cm:LaunchProgram,{#StringChange(MyAppName, '&', '&&')}}"; Flags: nowait postinstall skipifsilent

Если exe-файлов несколько и на каждый из нужно создать ярлыки,должно быть вот так или по другому ?

Nordek
02-07-2016, 04:07
[Files]
Source: "C:\Test\ExeName1.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "C:\Test\ExeName2.exe"; DestDir: "{app}"; Flags: ignoreversion
Source: "C:\Test\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs »В данном случае, лишнее зачеркнул.


[Icons]
Name: "{commonprograms}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName2}"
Name: "{commondesktop}\{#MyAppName}"; Filename: "{app}\{#MyAppExeName2}"; Tasks: desktopicon »Для добавления ярлыков, исп. секция [Icons].

Пример:
[Icons]
Name: "{commonprograms}\{#MyAppName} 1"; Filename: "{app}\{#MyAppExeName1}"
Name: "{commonprograms}\{#MyAppName} 2"; Filename: "{app}\{#MyAppExeName2}"
Name: "{commondesktop}\{#MyAppName} 1"; Filename: "{app}\{#MyAppExeName1}"
Name: "{commondesktop}\{#MyAppName} 2"; Filename: "{app}\{#MyAppExeName2}"

Maleritanali
02-07-2016, 15:35
HKEY_CURRENT_USER\Software\MyCompany
HKEY_LOCAL_MACHINE\SOFTWARE\MyCompany
HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\MyCompany

Помогите пожалуйста,как можно удалить во время установки и во время деинсталляции ?

Dodakaedr
02-07-2016, 19:44
Помогите пожалуйста,как можно удалить во время установки и во время деинсталляции ? »

Root: HKCU; Subkey: "Software\MyCompany"; Flags: dontcreatekey deletekey uninsdeletekey
Root: HKLM64; Subkey: "Software\MyCompany"; Check: IsWin64; Flags: dontcreatekey deletekey uninsdeletekey
Root: HKLM32; Subkey: "Software\MyCompany"; Check: IsWin64; Flags: dontcreatekey deletekey uninsdeletekey
Root: HKLM32; Subkey: "Software\MyCompany"; Check: not IsWin64; Flags: dontcreatekey deletekey uninsdeletekey

Maleritanali
02-07-2016, 21:10
Root: HKCU; Subkey: "Software\MyCompany"; Flags: dontcreatekey deletekey uninsdeletekey
Root: HKLM64; Subkey: "Software\MyCompany"; Check: IsWin64; Flags: dontcreatekey deletekey uninsdeletekey
Root: HKLM32; Subkey: "Software\MyCompany"; Check: IsWin64; Flags: dontcreatekey deletekey uninsdeletekey »

А как сделать вот это всё с помощью кода (Секция [Code]) ?

Dodakaedr
02-07-2016, 21:53
А как сделать вот это всё с помощью кода (Секция [code]) ? »
procedure CurStepChanged(CurStep: TSetupStep);
begin
case CurStep of
ssInstall:
begin
If IsWin64 then RegDeleteKeyIncludingSubkeys(HKLM64, 'Software\MyCompany');
RegDeleteKeyIncludingSubkeys(HKLM32, 'Software\MyCompany');
RegDeleteKeyIncludingSubkeys(HKCU, 'Software\MyCompany');
end;
end;
end;

procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);
begin
case CurUninstallStep of
usUninstall:
begin
If IsWin64 then RegDeleteKeyIncludingSubkeys(HKLM64, 'Software\MyCompany');
RegDeleteKeyIncludingSubkeys(HKLM32, 'Software\MyCompany');
RegDeleteKeyIncludingSubkeys(HKCU, 'Software\MyCompany');
end;
end;
end;

Pagelorichaz
03-07-2016, 11:26
Как сменить иконку и сообщение в MessageBox,чтобы вместо MB_ICONQUESTION было MB_ICONWARNING ?
Если что сморите скриншот!

http://i057.radikal.ru/1607/2f/8ab1d6bb5323.png

Rhianarkipom
03-07-2016, 17:00
Помогите исправить кнопку на странице приветствия (WelcomePage) вместо "Install" должно быть "Next"
Как сделать такое ?


#define MyAppName "My Program"
#define MyAppVersion "1.5"
#define MyAppPublisher "My Company, Inc."
#define MyAppURL "http://www.example.com/"
#define MyAppExeName "MyProg.exe"

[Setup]
; NOTE: The value of AppId uniquely identifies this application.
; Do not use the same AppId value in installers for other applications.
; (To generate a new GUID, click Tools | Generate GUID inside the IDE.)
AppId={{07BF4756-493A-4A92-8C99-65465807D1B5}
AppName={#MyAppName}
AppVersion={#MyAppVersion}
;AppVerName={#MyAppName} {#MyAppVersion}
AppPublisher={#MyAppPublisher}
AppPublisherURL={#MyAppURL}
AppSupportURL={#MyAppURL}
AppUpdatesURL={#MyAppURL}
DefaultDirName={pf}\{#MyAppName}
OutputBaseFilename=setup
Compression=lzma
SolidCompression=yes

DisableDirPage=yes
DisableProgramGroupPage=yes
DisableReadyMemo=yes
DisableReadyPage=yes
DisableStartupPrompt=yes
DisableWelcomePage=no
DisableFinishedPage=no

[Messages]
ButtonNext=Install

[Files]
Source: "C:\Program Files (x86)\Inno Setup 5\Examples\MyProg.exe"; DestDir: "{app}"; Flags: ignoreversion

[Code]
var
MainPage : TWizardPage;
edtFolderToInstall : TEdit;
InstallLocation : String;

procedure BrowseClick(Sender : TObject);
var
Dir : String;
begin
Dir := edtFolderToInstall.Text;
if BrowseForFolder('Select Folder',Dir,false) then
edtFolderToInstall.Text := Dir;
end;

procedure InitializeWizard();
var
lblFolderToInstall : TLabel;
btnFolderToInstall : TButton;

begin
MainPage := CreateCustomPage(wpWelcome,'Setup - Test App Name','This will install "Test App Name" to your computer');
lblFolderToInstall := TLabel.Create(MainPage);
lblFolderToInstall.Parent := MainPage.Surface;
lblFolderToInstall.Top := 10;
lblFolderToInstall.Left := 10;
lblFolderToInstall.Caption := 'If you would like to select a different folder, Click Browse.'


edtFolderToInstall := TEdit.Create(MainPage);
edtFolderToInstall.Parent := MainPage.Surface;

edtFolderToInstall.Top := 40;
edtFolderToInstall.Left := 7;
edtFolderToInstall.Width := 321;
edtFolderToInstall.Text := WizardDirValue;


btnFolderToInstall := TButton.Create(MainPage);
btnFolderToInstall.Parent := MainPage.Surface;
btnFolderToInstall.Top := 38;
btnFolderToInstall.Left := 340;
btnfolderToInstall.Caption := 'Browse...';
btnFolderToInstall.OnClick := @BrowseClick;
end;




© OSzone.net 2001-2012