[Sobol37]

Мне вот интересно каким образом программа вносит при первом запуске данные в раздел HKU минуя раздел HKCU.

[habib2302]

Sobol37, Если для удаления мусора попробуйте этот код
http://forum.oszone.net/post-2519766-719.html

[Sobol37]

Сделал проще. Просто внёс все те данные что программа создаёт при первом запуске в скрипт. Теперь при деинсталляции эти данные будут автоматически удалены из реестра. Там всё равно прописываются
стандартные режимы работы (разрешение экрана и т.п.), поэтому вряд ли будут конфликты если на другой машине её инсталлировать.

Большое спасибо за наводку, а то со вчерашнего дня мучался с кодом.

[habib2302]

Sobol37, пож

[vadjliss]

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

скрипт

Код:

[Setup]
AppName=KMSAuto Net 2015 1.3.8
AppVerName=KMSAuto
DefaultDirName={pf}\KMSAuto Net 2015 1.3.8
SetupIconFile=C:\Users\WWW\Desktop\скрипт\image\1.ico
VersionInfoDescription=KMSAuto Net 2015 1.3.8
OutputDir=C:\Users\WWW\Desktop\скрипт
Compression=lzma/ultra64
SolidCompression=true
InternalCompressLevel=ultra64
WizardImageFile=image\portable.bmp
WizardSmallImageFile=image\portable2.bmp
Uninstallable=IsChecked
CreateUninstallRegKey=IsChecked



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

[Files]
;Source: "C:\Users\WWW\Desktop\скрипт\soft\*"; DestDir: "{app}"; Check: "not IsChecked"; Flags: ignoreversion createallsubdirs recursesubdirs
Source: dll\BASS.dll; DestDir: {tmp}; Flags: dontcopy noencryption nocompression
Source: Sound\sound.mp3; DestDir: {tmp}; Flags: dontcopy noencryption nocompression
Source: image\Splash.png; Flags: dontcopy
Source: dll\isgsg.dll; Flags: dontcopy
Source: dll\VclStylesinno.dll; DestDir: {app}; Flags: dontcopy
Source: CobaltXEMedia.vsf; DestDir: {app}; Flags: dontcopy
Source: image\portable.bmp; DestDir: {tmp}; Flags: dontcopy


[CustomMessages]
MyRadioCaption_1=Распаковка
MyText_1=Будет произведена распаковка в паку,%nуказанную на следующей странице
Extracted=Распаковка — %1
ExtractedFolder=Выбор папки распаковки
ExtractedFolder2=В какую папку вы хотите распаковать %1?
ExtractedFolder3=Программа распакует %1 в следующую папку.
Installing=Распаковка...
InstallingLabel=Пожалуйста, подождите, пока %1 распакуется на ваш компьютер.
FinishedHeadingLabel=Завершение распаковки%n%1
FinishedLabelNoIcons=Программа %1 распакована на Ваш компьютер.%n%nНажмите «Завершить», чтобы выйти из программы распаковки.

[UninstallDelete]
Type: filesandordirs; Name: {app}

[Tasks]
Name: soft; Description: Браузеры:
Name: soft\Opera; Description: Установить Opera 31.0.1889.174 Stable; Flags: unchecked
Name: soft\Chromodo; Description: Установить Chromodo Browser 44.5.7.268; Flags: unchecked
Name: soft\Chrome; Description: Установить Google Chrome 44.0.2403.157 Stable 64; Flags: unchecked
Name: soft\Chrome; Description: Установить Google Chrome 44.0.2403.157 Stable; Flags: unchecked
Name: soft\UCBrowser; Description: Установить UCBrowser 5.4.4237.1032; Flags: unchecked


[Run]
Filename: {src}\soft\Opera 31.0.1889.174 Stable.exe; Parameters: /q; StatusMsg: Установка Opera 31.0.1889.174 Stable;
Filename: {src}\soft\Chromodo Browser 44.5.7.268.exe; Parameters: /Q; Tasks: soft\Chromodo; Flags: waituntilterminated
Filename: {src}\soft\Google Chrome 44.0.2403.157 Stable 64.exe; Parameters: /Q; Tasks: soft\Chrome; Flags: waituntilterminated
Filename: {src}\soft\Google Chrome 44.0.2403.157 Stable.exe; Parameters: /Q; Tasks: soft\Chrome; Flags: waituntilterminated
Filename: {src}\soft\UCBrowser 5.4.4237.1032.exe; Parameters: /Q; Tasks: soft\UCBrowser; Flags: waituntilterminated

[qwea234]

Подскажите пожалуйста, как сделать если выбран русский язык установщика, то компонент выбирался один, если выбрать английский язык установщика то компонент выбирался другой.

Вот пример моего кода:

Код:

[Languages]
Name: english; MessagesFile: compiler:Default.isl; LicenseFile: "F:\License\License_eng.txt"
Name: russian; MessagesFile: compiler:Languages\Russian.isl

[Types]
Name: custom; Description: {cm:CompProgram00}; Flags: iscustom

[Components]
; Select Languages Patch
Name: ALL01; Description: {cm:CompProgram01}; Types: custom; Flags: fixed
Name: RUS; Description: {cm:CompProgram02}; Flags: exclusive checkablealone
Name: ENG; Description: {cm:CompProgram03}; Flags: exclusive

Если выбираю английский, то компонент выбирается первый "RUS", если выбираю язык русский - то компонент тоже всегда "RUS".
а надо чтобы при выборе английского языка, компонент выбирался: "Name: ENG"

[vadjliss]

нужен скрипт вот такой
может кто знает как его сделать
что бы пользователь мог сам выбирать какое приложение ему установить или все сразу

[TryRooM]

qwea234, если выбран русский язык установщика, то компонент выбирался один, если выбрать английский язык установщика то компонент выбирался другой.

Код:

[Components]
; Select Languages Patch
Name: ALL01; Description: {cm:CompProgram01}; Types: custom;   Flags: fixed
Name: RUS; Description: {cm:CompProgram02}; Languages: russian;  Flags: exclusive checkablealone
Name: ENG; Description: {cm:CompProgram03}; Languages: english;  Flags: exclusive

[qwea234]

TryRooM, Хорошая идея и возьму на заметку, но немного другая задача была, видать не полностью расписал.

Смотрите нужно чтобы отображалось два пункта RUS, ENG в установке компонента, но если выбран русский, то активный компонент был RUS, а если выбран интерфейс инсталлятора английский то на странице компоненты было два выбора языка но активный был ENG.

[Dodakaedr]

Если выбираю английский, то компонент выбирается первый "RUS", если выбираю язык русский - то компонент тоже всегда "RUS". а надо чтобы при выборе английского языка, компонент выбирался: "Name: ENG" »

Код:

[setup]
appname=app
appvername=app 1.0
DefaultDirName={sd}\app

[Languages]
Name: english; MessagesFile: compiler:Languages\English.isl
Name: russian; MessagesFile: compiler:Languages\Russian.isl

[Types]
Name: custom; Description: cm:CompProgram00; Flags: iscustom

[Components]
Name: ALL01; Description: язык; Types: custom; Flags: fixed
Name: RUS; Description: рус; Flags: exclusive
Name: ENG; Description: анг; Flags: exclusive

[Code]
procedure InitializeWizard();
begin
 if ActiveLanguage = 'russian' then
WizardForm.ComponentsList.Checked[1] := true else
WizardForm.ComponentsList.Checked[2] := true;
end;