Скрипты Inno Setup. Помощь и советы [часть 5]

[R.i.m.s.k.y.]

Цитата Respin:



Вы уже всё распланировали (что будет два установщика (один из которых будет искать Steam + путь установки)). И всё же говорите примерно...

Ну значит, примерно, как-то так:

Скрипты Inno Setup. Помощь и советы [часть 5]

Примерно я говорю потому, что какого-то конкретного сейчас сейчас нет. Но в скором времени это мне понадобится



Спасибо! Как сделать так, чтобы при наличии установленного стима игра устанавливалась в папку стима понятно. Но мне хотелось, чтобы даже при наличии установленного стима был выбор между обычной установкой и установкой стим. Может можно сделать какие чекбоксы на отдельной странице перед DirPage, чтобы в соответствии с чекбоксом прописывался путь либо "path1", либо "path2"?



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

[insombia]

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

[R.i.m.s.k.y.]

insombia,

Код:

Код: Выделить всё

[Languages]
Name: russian; MessagesFile: compiler:Languages\Russian.isl; 
Name: english; MessagesFile: compiler:Languages\English.isl; 
[Registry]
Languages: russian; Root: HKCU; SubKey: твой ключ реестра для русского
Languages: english; Root: HKCU; SubKey: твой ключ реестра для собачьего

[SoulSide]

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


Цитата apozlevich:



Tasks: open; Languages: en

Скрипты Inno Setup. Помощь и советы [часть 5]

будет добавлено, если выполнены одновременно оба условия - выбрана задача open и выбран язык инсталлятора en в начале установки ( если выбор языка отсутствует вообще, то условие скорей всего будет считаться невыполненым, утверждать не могу, не видя скрипта)

[insombia]

Цитата Gnom_aka_Lexander:



будет добавлено, если выполнены одновременно оба условия - выбрана задача open и выбран язык инсталлятора en в начале установки ( если выбор языка отсутствует вообще, то условие скорей всего будет считаться невыполненым, утверждать не могу, не видя скрипта)

Скрипты Inno Setup. Помощь и советы [часть 5]

Оба условия соблюдены.

[R.i.m.s.k.y.]

Цитата Gnom_aka_Lexander:



не видя скрипта

Скрипты Inno Setup. Помощь и советы [часть 5]

нужно посмотреть скрипт полностью.

[insombia]

Цитата apozlevich:



Не делает совсем ничего. Думаю, глупая опечатка, но в упор ее не вижу.

Скрипты Inno Setup. Помощь и советы [часть 5]

apozlevich, и не будет работать из-за:

1. GUID, дабы компилятор не посчитал его константой, экранируется только открывающей фигурной скобкой, нужно убрать лишнюю - {{645FF040-5081-101B-9F08-00AA002F954E}}.

2. Толку от этих записей на x64-системах будет никакого, т.к. запишутся в 32-разрядный куст реестра - в контекстном меню корзины ничего не увидите. Нужна проверка разрядности системы, в зависимости от результата писать в нужные кусты.

P.S. Раз делаете мультиязычный установщик, в данном случае от флага Languages можно отказаться. В общем, я бы сделал так:



Код:

Код: Выделить всё

[Languages]
Name: ru; MessagesFile: compiler:Languages\russian.isl
Name: en; MessagesFile: compiler:default.isl
[CustomMessages]
ru.ContextMenu=Открыть CCleaner...
en.ContextMenu=Open CCleaner...
[Registry]
;32-bit
Root: HKLM; Subkey: "SOFTWARE\Classes\CLSID\{{645FF040-5081-101B-9F08-00AA002F954E}\shell\{cm:ContextMenu}"; Tasks: open; Flags: uninsdeletekey; Check: not IsWin64
Root: HKLM; Subkey: "SOFTWARE\Classes\CLSID\{{645FF040-5081-101B-9F08-00AA002F954E}\shell\{cm:ContextMenu}\command"; ValueType: string; ValueData: "{app}\CCleaner.exe"; Tasks: open; Flags: uninsdeletekey; Check: not IsWin64
;64-bit
Root: HKLM64; Subkey: "SOFTWARE\Classes\CLSID\{{645FF040-5081-101B-9F08-00AA002F954E}\shell\{cm:ContextMenu}"; Tasks: open; Flags: uninsdeletekey; Check: IsWin64
Root: HKLM64; Subkey: "SOFTWARE\Classes\CLSID\{{645FF040-5081-101B-9F08-00AA002F954E}\shell\{cm:ContextMenu}\command"; ValueType: string; ValueData: "{app}\CCleaner.exe"; Tasks: open; Flags: uninsdeletekey; Check: IsWin64

[R.i.m.s.k.y.]

El Sanchez, спасибо, но я забыл отметить, что мне уже все объяснил Gnom_aka_Lexander, за что ему большое спасибо.




Цитата El Sanchez:



P.S. Раз делаете мультиязычный установщик, в данном случае от флага Languages можно отказаться. В общем, я бы сделал так:

Скрипты Inno Setup. Помощь и советы [часть 5]

А это хорошая идея!

[insombia]

нашел disablenouninstallwarning называется

[R.i.m.s.k.y.]

Tco 03, лови



Код:

Код: Выделить всё

[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application
[code]
procedure CopyFolder(SourceFolder, DestFolder: String);
var
    oFS: Variant;
begin
    try
        if not DirExists(SourceFolder) then Exit;
        if not DirExists(DestFolder) then if not CreateDir(DestFolder) then Exit;
        oFS := CreateOleObject('Scripting.FileSystemObject');
        oFS.CopyFolder(RemoveBackslash(SourceFolder), DestFolder);
    except
        //ShowExceptionMessage;
    end;
end;
procedure InitializeWizard();
begin
    CopyFolder('C:\setup', 'C:\Intel\setup');
end;