» Inno Setup (создание инсталяционных пакетов)

Автор: Kindly
Дата сообщения: 20.09.2006 10:51

AtotIK, пробуй через функцию после удаления, смотри пример UninstallCode.

Автор: AtotIK
Дата сообщения: 20.09.2006 12:40

Kindly
Спасибо...Я об этом как раз и подумал сегодня...Но не будет ли гиморно писать все файлы в одну функцию (если файлов много)? Или там можно поставить запуск этого Bat'ника?

З.Ы. На счёт 2-го StatusBar'а...Можешь написать весь код реализации его движения?

Автор: Kindly
Дата сообщения: 21.09.2006 13:03

AtotIK

Цитата:

Или там можно поставить запуск этого Bat'ника?

Легко, юзай функцию Exec (см. справку)

Цитата:

З.Ы. На счёт 2-го StatusBar'а...Можешь написать весь код реализации его движения?

У-у. Это я сам хочу знать

Автор: DroN_S
Дата сообщения: 22.09.2006 19:30

народ, а как запустить текстовый файл, например мне надо запустить текстовый документ после установки программы?

Автор: JKSerGEAnt
Дата сообщения: 23.09.2006 06:56

DroN_S
[Run]
Filename: speed.txt; Description: Запустить; Flags: shellexec

Автор: Elm0
Дата сообщения: 24.09.2006 13:59

Народ а вот у меня такой код :

Цитата:

[Setup]
AppName=Чат for Matrix
AppVerName=Чат 1.0
DefaultDirName={pf}\Vypress Chat
OutputBaseFilename=Vypress Chat
Compression=lzma/ultra
InternalCompressLevel=ultra
SolidCompression=yes
DisableReadyPage=yes
ShowLanguageDialog=no

[Languages]
Name: en; MessagesFile: compiler:Default.isl
Name: ru; MessagesFile: compiler:Languages\Russian.isl

[CustomMessages]
en.CreateGroupIcons=Create &Program icons
ru.CreateGroupIcons=Создать значки в Главном меню

[Files]
Source: "C:\Program Files\Vypress Chat\*"; DestDir: {app}\Vypress Chat\; Flags: ignoreversion recursesubdirs

[Icons]
Name: {userstartup}\VyChat; Filename: {app}\Vypress Chat\VyChat.exe; Tasks: startup
;И по желанию можно добавить ярлыки в Главное меню
;Name: {userprograms}\Program1; Filename: {app}\program1\program1.exe; Tasks: programs
;Name: {userprograms}\Program2; Filename: {app}\program2\program2.exe; Tasks: programs
;Name: {userprograms}\Program2; Filename: {app}\program3\program3.exe; Tasks: programs

[Tasks]
Name: programs; Description: {cm:CreateGroupIcons}; GroupDescription: {cm:AdditionalIcons}
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}
Name: startup; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}

И когда устанавливается программа путь получается C:\Program Files\Vypress Chat\Vypress Chat а файлы унинстал (которые сделала сама Inno ) C:\Program Files\Vypress Chat\, а как бы сделать всё в одну папку...
ух.. надеюсь понятно объяснил

зарания благодарен...

Автор: GloThin
Дата сообщения: 24.09.2006 14:43

Elm0

Цитата:

а как бы сделать всё в одну папку...

Попробуй изменить:

Цитата:

Source: "C:\Program Files\Vypress Chat\*"; DestDir: {app}\Vypress Chat\; Flags: ignoreversion recursesubdirs

На :

Цитата:

Source: "C:\Program Files\Vypress Chat\*"; DestDir:"{app}"; Flags: ignoreversion recursesubdirs

Автор: FLIP87
Дата сообщения: 24.09.2006 15:38

Ребят, ну помогите сделать счетчик! Я уже писал неделю назад - ноль реакции...
Kindly, может хоть ты сталкивался с такой вещью, ну очень надо)

Напомню

Код:
[INI]
Components: "C5\1"; Filename: "{app}\CONF.ini"; Section: "AAA"; Key: "menu#{code:MyConst}"; String: "{code:MyConst}"
; Т.е. на выходе сторока в INI файле должна выглядить след. образом:
; [AAA]
;menu#1=1
Components: "C5\1"; Filename: "{app}\CONF.ini"; Section: "AAA"; Key: "menu{code:MyConst}"; String: "{code:MyConst}"
;А эта строка так:
; [AAA]
;menu#2=2
[Code]
function MyConst(Default: String): String;
var n: Integer;
begin
begin
n:=1;
Result:=IntToStr(n);
end;
n:=n+1;
end;

Автор: AtotIK
Дата сообщения: 26.09.2006 13:25

Kindly
Всё получилось...Отлично работает...

Автор: xMesSir
Дата сообщения: 26.09.2006 18:03

FLIP87
Если я правильно понял, то попробуй так (только секция кода):
Цитата:

[Code]
var
n: integer;

function InitializeSetup(): Boolean;
begin
n:= 1;
result:= true;
end;

function MyConst(Default: String): String;
begin
Result:=IntToStr(n);
n:=n+1;
end;

Автор: FLIP87
Дата сообщения: 26.09.2006 18:55

xMesSir ты все правильно понял, работает как надо!!!
пасяба )))

Автор: FLIP87
Дата сообщения: 27.09.2006 14:59

Ммда, не успел расправится с одним, теперь еще одна недокументированная чушь....
Не нашел флага для секции INI позволяющего ДОписывать значение ключа.

К примеру, программа извлекает INI файл в папку установки программы с таким, уже существующим, содержанием:
[SECTION]
KEY=STRING-0

По умолчанию (т.е. если флаги не указаны) значение заменяется, т.е инсталятор выполняет код

Код:
[INI]
Filename: "{app}\Config.ini"; Section: "SECTION"; Key: "KEY"; String: "STRING-1"

Автор: VitaliM
Дата сообщения: 27.09.2006 15:18

FLIP87
Напиши функцию, которая читает значение ключа, добавляет в хвост новое значение и возвращает его как результат.

Автор: FLIP87
Дата сообщения: 27.09.2006 19:08

Цитата:

VitaliM
FLIP87
Напиши функцию, которая читает значение ключа, добавляет в хвост новое значение и возвращает его как результат.

Слушай проблемы с синтаксисом (ну нет у меня опыта программирования), пишу следущее

Код: Filename: "{app}\Config.ini"; Section: "SECTION"; Key: "KEY"; String: "{code:GetIniString(const SECTION2, KEY2, Default, Config.ini: String)}"

Автор: AtotIK
Дата сообщения: 28.09.2006 13:29

Вопросик...Можно ли (думаю что да, но я сам не сделаю - функции не знаю) перед уделением программы чтобы выдавало сообщение типа "Если вы не делали резервные копии файлов, то удаление приведёт к неработоспособности программы. Продолжить?" и кнопки "Да" "Нет".Если нажимаешь "Да", то прога удаляется, а если "Нет", то удаление закрывается?

Автор: Kindly
Дата сообщения: 28.09.2006 16:43

AtotIK, юзай функцию DeinitializeSetup. Смотри тот же пример - UninstallCode. Там перед началом удаления выдается сообщение, такое же можешь применить и ты.

Автор: DroN_S
Дата сообщения: 29.09.2006 09:32

как сделать, чтобы при установке программы, инсталлятор проверял на установленную версию, и если такая уже есть, то сначала удалял её, а потом ставил новую?

Автор: Kindly
Дата сообщения: 29.09.2006 17:10

AtotIK, сорри, вчера голова кругом шла - юзай функцию InitializeUninstall.
DroN_S, ну так смотри как в руководстве, только сразу запускай деинсталлятор исходя из значений реестра - вырежи лишнее.

Автор: cracklover
Дата сообщения: 29.09.2006 22:43

Я уже давно задавал подобный вопрос, но так и не получил на него вразумительного ответа.
Может сейчас получу ответ?
Так вот. Почему после распаковки (с помощью innounp.exe 0.17) какого-нибудь дистрибутива созданного инносетапом ( сейчас меня интерсеует дистрибутив проги UltraIso), я потом не могу снова скомпилировать дистрибутива. Даже ничего не меняя в выдранном скрипте install_script.iss я получаю кучу ошибок, либо неизвсетных задач и значений при попытке компиляции. Как же тогда компилировали сами создатели дистрибутива этот дистрибутив?!

Автор: YuriPet1
Дата сообщения: 30.09.2006 16:35

cracklover
Глубже копать надо...

Версия InnoSetup должна быть 5.1.7 и [more=вот так (примерно)]
[LangOptions]
LanguageName=Russian
LanguageID=$0419

[Setup]
AppName=UltraISO
AppVerName=UltraISO Premium V8.51
DefaultDirName={pf32}\UltraISO
OutputBaseFilename=uiso851pe_ru
Compression=lzma/ultra
InternalCompressLevel=ultra
VersionInfoVersion=8.5.1.1860
VersionInfoCompany=EZB Systems, Inc.
VersionInfoDescription=Установка UltraISO
VersionInfoTextVersion=8.5.1.1860
DefaultGroupName=UltraISO
ShowLanguageDialog=yes
LanguageDetectionMethod=locale
WizardImageFile=compiler:wizmodernimage-IS.bmp
WizardSmallImageFile=compiler:wizmodernsmallimage-IS.bmp
ArchitecturesAllowed=x86 x64
AllowNoIcons=true
VersionInfoCopyright=(c) 2002-2006 EZB Systems, Inc.
DisableFinishedPage=true
SolidCompression=true

[Files]
Source: {app}\UltraISO.exe; DestDir: {app}; MinVersion: 4.1,4.0; Flags: overwritereadonly ignoreversion
Source: {app}\drivers\ISODrive.sys; DestDir: {app}\drivers; Tasks: isodrive; MinVersion: 4.1,4.0; Flags: overwritereadonly ignoreversion
Source: {app}\drivers\ISODrv64.sys; DestDir: {app}\drivers; Tasks: isodrive; MinVersion: 4.1,4.0; Flags: overwritereadonly ignoreversion
Source: {app}\drivers\IsoCmd.exe; DestDir: {app}\drivers; Tasks: isodrive; MinVersion: 4.1,4.0; Flags: overwritereadonly ignoreversion
Source: {cf32}\EZB Systems\lame_enc.dll; DestDir: {cf32}\EZB Systems; MinVersion: 4.1,4.0; Flags: overwritereadonly ignoreversion
Source: {app}\ultraiso.chm; DestDir: {app}; MinVersion: 4.1,4.0
Source: {app}\History.txt; DestDir: {app}; MinVersion: 4.1,4.0
Source: {app}\vdrive.ini; DestDir: {app}; MinVersion: 4.1,4.0; Flags: onlyifdoesntexist
Source: {app}\lang\lang_ru.dll; DestDir: {app}\lang; MinVersion: 4.1,4.0

[Registry]
Root: HKLM; Subkey: Software\EasyBoot Systems; MinVersion: 4.1,4.0; Flags: uninsdeletekeyifempty
Root: HKLM; Subkey: Software\EasyBoot Systems\UltraISO; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems; MinVersion: 4.1,4.0; Flags: uninsdeletekeyifempty
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKLM; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueType: String; ValueData: {app}; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueType: String; ValueData: {app}; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKLM; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: Shared; ValueType: String; ValueData: {cf32}\EZB Systems; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: Shared; ValueType: String; ValueData: {cf32}\EZB Systems; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: XPBurn; ValueType: String; ValueData: 0; MinVersion: 4.1,4.0; Flags: createvalueifdoesntexist uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: ISOFolder; ValueType: String; ValueData: {userdocs}\My ISO Files; Check: DirExists(ExpandConstant('{userdocs}')); MinVersion: 4.1,4.0; Flags: createvalueifdoesntexist uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: UseSkins; ValueType: String; ValueData: 1; MinVersion: 4.1,4.0; Flags: createvalueifdoesntexist uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: SoundEffect; ValueType: String; ValueData: 1; MinVersion: 4.1,4.0; Flags: createvalueifdoesntexist uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: Language; ValueType: String; ValueData: 1049; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: Install; ValueType: String; ValueData: 1; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: UserName; ValueType: String; ValueData: Netz.ru; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: Registration; ValueType: String; ValueData: efa088d4ebe7a8fcc4c5f0f3c396e4d6; MinVersion: 4.1,4.0; Flags: uninsdeletekey

Root: HKCR; Subkey: .iso; ValueType: String; ValueData: UltraISO; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: .isz; ValueType: String; ValueData: UltraISO; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: UltraISO; ValueType: String; ValueData: Файл UltraISO; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: UltraISO\DefaultIcon; ValueType: String; ValueData: """{app}\UltraISO.exe"",0"; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: UltraISO\shell\open; ValueType: String; ValueData: Открыть используя &UltraISO; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: UltraISO\shell\open\command; ValueType: String; ValueData: """{app}\UltraISO.exe"" ""%1"""; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: .bin; ValueType: String; ValueData: binimage; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: binimage; ValueType: String; ValueData: BIN File; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: binimage\DefaultIcon; ValueType: String; ValueData: """{app}\UltraISO.exe"",0"; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: binimage\shell\Convert to ISO\command; ValueType: String; ValueData: """{app}\UltraISO.exe"" -bin2iso ""%1"""; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: binimage\shell\open\command; ValueType: String; ValueData: """{app}\UltraISO.exe"" ""%1"""; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey

[Run]
Filename: {app}\UltraISO.exe; Description: Запустить UltraISO; MinVersion: 4.1,4.0

[UninstallRun]
Filename: {app}\drivers\isocmd.exe; Parameters: -r; Tasks: isodrive; MinVersion: 4.1,4.0

[Icons]
Name: {group}\UltraISO; Filename: {app}\UltraISO.exe; WorkingDir: {app}; MinVersion: 4.1,4.0
Name: {group}\UltraISO Help; Filename: {app}\ultraiso.chm; MinVersion: 4.1,4.0
Name: {group}\UltraISO Online Order; Filename: http://www.ezbsystems.com/ultraiso/order.htm; MinVersion: 4.1,4.0
Name: {group}\UltraISO Web Site; Filename: http://www.ezbsystems.com/index.php; MinVersion: 4.1,4.0
Name: {group}\UltraISO Readme; Filename: {app}\Readme.txt; MinVersion: 4.1,4.0
Name: {group}\UltraISO Revision History; Filename: {app}\History.txt; MinVersion: 4.1,4.0
Name: {group}\Uninstall UltraISO; Filename: {uninstallexe}; MinVersion: 4.1,4.0
Name: {userdesktop}\UltraISO; Filename: {app}\UltraISO.exe; WorkingDir: {app}; Tasks: desktopicon; MinVersion: 4.1,4.0

[Tasks]
Name: desktopicon; Description: Добавить иконку на &Рабочий стол; MinVersion: 4.1,4.0
Name: associate; Description: &Ассоциировать .iso файл с UltraISO; MinVersion: 4.1,4.0
Name: isodrive; Description: &Setup ISO CD/DVD emulator (ISODrive); MinVersion: 4.1,4.0
[/more] должен выглядеть НОВЫЙ install_script.iss для последней версии UltraISO

Автор: cracklover
Дата сообщения: 30.09.2006 18:56

YuriPet1

Большое спасибо!

Теперь я понял.

Вот только окончательный вариант я чуть-чуть поправил, так как не люблю ничего лишнего

:

[more]
[Languages]
Name: "russian"; MessagesFile: "compiler:Languages\Russian.isl"

[Setup]
AppName=UltraISO
AppVerName=UltraISO Premium V8.5.1.1860
DefaultDirName={pf32}\UltraISO
OutputBaseFilename=uiso8_pe
VersionInfoVersion=8.5.1.1860
VersionInfoCompany=EZB Systems, Inc.
VersionInfoDescription=Установка UltraISO
VersionInfoTextVersion=8.5.1.1860
DefaultGroupName=UltraISO
ShowLanguageDialog=yes
LanguageDetectionMethod=locale
WizardImageFile=compiler:wizmodernimage-IS.bmp
WizardSmallImageFile=compiler:wizmodernsmallimage-IS.bmp
ArchitecturesAllowed=x86 x64
AllowNoIcons=true
VersionInfoCopyright=(c) 2002-2006 EZB Systems, Inc.
DisableFinishedPage=true
SolidCompression=true

[Files]
Source: {app}\UltraISO.exe; DestDir: {app}; MinVersion: 4.1,4.0; Flags: overwritereadonly ignoreversion
Source: {app}\drivers\ISODrive.sys; DestDir: {app}\drivers; Tasks: isodrive; MinVersion: 4.1,4.0; Flags: overwritereadonly ignoreversion
Source: {app}\drivers\ISODrv64.sys; DestDir: {app}\drivers; Tasks: isodrive; MinVersion: 4.1,4.0; Flags: overwritereadonly ignoreversion
Source: {app}\drivers\IsoCmd.exe; DestDir: {app}\drivers; Tasks: isodrive; MinVersion: 4.1,4.0; Flags: overwritereadonly ignoreversion
Source: {cf32}\EZB Systems\lame_enc.dll; DestDir: {cf32}\EZB Systems; MinVersion: 4.1,4.0; Flags: overwritereadonly ignoreversion
Source: {app}\ultraiso.chm; DestDir: {app}; MinVersion: 4.1,4.0
Source: {app}\History.txt; DestDir: {app}; MinVersion: 4.1,4.0
Source: {app}\Readme.txt; DestDir: {app}; MinVersion: 4.1,4.0
Source: {app}\vdrive.ini; DestDir: {app}; MinVersion: 4.1,4.0; Flags: onlyifdoesntexist
Source: {app}\lang\lang_ru.dll; DestDir: {app}\lang; MinVersion: 4.1,4.0

[Registry]
Root: HKLM; Subkey: Software\EasyBoot Systems; MinVersion: 4.1,4.0; Flags: uninsdeletekeyifempty
Root: HKLM; Subkey: Software\EasyBoot Systems\UltraISO; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems; MinVersion: 4.1,4.0; Flags: uninsdeletekeyifempty
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKLM; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueType: String; ValueData: {app}; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueType: String; ValueData: {app}; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKLM; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: Shared; ValueType: String; ValueData: {cf32}\EZB Systems; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: Shared; ValueType: String; ValueData: {cf32}\EZB Systems; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: XPBurn; ValueType: String; ValueData: 0; MinVersion: 4.1,4.0; Flags: createvalueifdoesntexist uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: ISOFolder; ValueType: String; ValueData: {userdocs}\My ISO Files; Check: DirExists(ExpandConstant('{userdocs}')); MinVersion: 4.1,4.0; Flags: createvalueifdoesntexist uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: UseSkins; ValueType: String; ValueData: 1; MinVersion: 4.1,4.0; Flags: createvalueifdoesntexist uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: SoundEffect; ValueType: String; ValueData: 1; MinVersion: 4.1,4.0; Flags: createvalueifdoesntexist uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: Language; ValueType: String; ValueData: 1049; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: Install; ValueType: String; ValueData: 1; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: UserName; ValueType: String; ValueData: Netz.ru; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCU; Subkey: Software\EasyBoot Systems\UltraISO\5.0; ValueName: Registration; ValueType: String; ValueData: efa088d4ebe7a8fcc4c5f0f3c396e4d6; MinVersion: 4.1,4.0; Flags: uninsdeletekey

Root: HKCR; Subkey: .iso; ValueType: String; ValueData: UltraISO; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: .isz; ValueType: String; ValueData: UltraISO; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: UltraISO; ValueType: String; ValueData: Файл UltraISO; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: UltraISO\DefaultIcon; ValueType: String; ValueData: """{app}\UltraISO.exe"",0"; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: UltraISO\shell\open; ValueType: String; ValueData: Открыть используя &UltraISO; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: UltraISO\shell\open\command; ValueType: String; ValueData: """{app}\UltraISO.exe"" ""%1"""; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: .bin; ValueType: String; ValueData: binimage; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: binimage; ValueType: String; ValueData: BIN File; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: binimage\DefaultIcon; ValueType: String; ValueData: """{app}\UltraISO.exe"",0"; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: binimage\shell\Convert to ISO\command; ValueType: String; ValueData: """{app}\UltraISO.exe"" -bin2iso ""%1"""; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey
Root: HKCR; Subkey: binimage\shell\open\command; ValueType: String; ValueData: """{app}\UltraISO.exe"" ""%1"""; Tasks: associate; MinVersion: 4.1,4.0; Flags: uninsdeletekey

[UninstallRun]
Filename: {app}\drivers\isocmd.exe; Parameters: -r; Tasks: isodrive; MinVersion: 4.1,4.0

[Icons]
Name: {group}\UltraISO; Filename: {app}\UltraISO.exe; WorkingDir: {app}; MinVersion: 4.1,4.0
Name: {group}\UltraISO Help; Filename: {app}\ultraiso.chm; MinVersion: 4.1,4.0
Name: {group}\Uninstall UltraISO; Filename: {uninstallexe}; MinVersion: 4.1,4.0

[Tasks]
Name: associate; Description: &Ассоциировать .iso файл с UltraISO; MinVersion: 4.1,4.0
Name: isodrive; Description: &Setup ISO CD/DVD emulator (ISODrive); MinVersion: 4.1,4.0
[/more]

Автор: Kindly
Дата сообщения: 01.10.2006 16:51

DroN_S
[Code]
function InitializeSetup(): Boolean;
var
ResultCode: Integer;
s, ResultStr:string;
begin
Result:=True;
begin
If RegQueryStringValue(HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\My Program_is1', 'UninstallString', ResultStr)
then
begin
If ResultStr<>''
then
begin
ResultStr:=RemoveQuotes(ResultStr);
if not Exec(ResultStr, '', '', SW_SHOWNORMAL, ewWaitUntilTerminated, ResultCode)
then
MsgBox('Ошибка удаления. ' #13#13 '' + SysErrorMessage(ResultCode) + '.' #13#13 'Вероятно, деинсталлятор был перемещен, удален или переименован.', mbError, MB_OK);
end;
end;
end;
end;

Автор: DroN_S
Дата сообщения: 01.10.2006 19:55

Kindly
спасибо конечно за код, но это маленько не то, при таком использовании получается что пользователя спрашивают, удалить программу или нет, а мне нужно чтобы просто говорилось следующее, что на вашем компе установлена более поздняя версия программы, при установке новой версии, необходимо удалить старую... и два батона, удалить и выход... а после удаления установка новой новой без диалога о том что программа удалена...

Автор: aleksgteam
Дата сообщения: 02.10.2006 01:39

kolins1982

Ты наверное на FAT32 пытаешься сделать setup... У него как раз и есть такое ограничение на 2 гига... Делай сборку на NTFS и будет тебе счастье

Автор: Goncharenko
Дата сообщения: 02.10.2006 08:23

Подскажите пожалуйста, а можно сделать так- один файл запуска,(setup) и файлы для установки с CDROM набором, не упакованные.

Автор: VitaliM
Дата сообщения: 02.10.2006 09:50

Goncharenko
Это тебе InstallShield нужен.

Автор: Kindly
Дата сообщения: 02.10.2006 10:31

Goncharenko, юзай флаг external в секции [Files] - смотри руководство.
DroN_S, ну так проверяй значение параметра, сравнивай его и исходя из результатов выполняй соответствующие действия.

Автор: Goncharenko
Дата сообщения: 02.10.2006 12:56

Спасибо, попробую.

Автор: DroN_S
Дата сообщения: 02.10.2006 13:10

Цитата:

ну так проверяй значение параметра, сравнивай его и исходя из результатов выполняй соответствующие действия

Sample!!!! Please!!!

Автор: Midway
Дата сообщения: 02.10.2006 17:58

cracklover
Странно, я перепаковал последний сабж UI по твоему методу и никаких проблем у меня не возникло....Правда у меня InnoSetup 5.1.6...

Страницы: 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

Предыдущая тема: ICONS

Форум Ru-Board.club — поднят 15-09-2016 числа. Цель - сохранить наследие старого Ru-Board, истории становления российского интернета. Сделано для людей.