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

Tenebries · Отправлено: **17:12, 21-03-2013** | #**1941**

Здравствуйте.

Подскажите пожалуйста что нужно дописать в скрипт чтобы при запуске инсталлятора он сверял реестер и если находило в нем значение (например: [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Steam App 220440]) он запускался, а если не находило то выбивало сообщение...

И как сделать так, чтобы инсталлятор искал в реестре значение и по нему выставлял путь установки (например: [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Steam App 220440], "InstallLocation"="D:\\Games\\steamapps\\common\\D mC Devil May Cry")?

Спасибо.

Habetdin · Отправлено: **19:21, 21-03-2013** | #**1942**

Цитата Tenebries:

а если не находило то выбивало сообщение... »

По мотивам #1929:

Код:

[Setup]
AppName=My Application
AppVersion=1.5
DefaultDirName={pf}\My Application

[Code]
function InitializeSetup(): Boolean;
var
 IsAppInstalled, MyResult: Boolean;
 Path: String;
begin
 IsAppInstalled := RegKeyExists(HKLM, 'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\Steam App 550');
 if IsAppInstalled then
  Result := True else
 MyResult := MsgBox('Left 4 Dead 2 не установлен!', mbConfirmation, MB_OK) = idOk;
end;

Цитата Tenebries:

чтобы инсталлятор искал в реестре значение и по нему выставлял путь установки »

Код:

[Setup]
DefaultDirName={reg:HKLM\Software\OSzone\Example,InstallPath|{pf}\Example}

Подробнее в справке

Tenebries · Отправлено: **19:37, 21-03-2013** | #**1943**

Habetdin
Большое спасибо. Уже все нашел.

insombia · Отправлено: **23:31, 21-03-2013** | #**1944**

ботву никогда не юзал,хотелось бы сделать через неё чтобы на всех страницах была картинка
p.s. пример из шапки не предлагать
http://rghost.ru/44666197

audiofeel · Конфигурация компьютера

Всем Доброе утро, помогите = добавил в скрипт "IsSlideShow [1.0.2]" - выходит вот эта ошибка, не знаю даже примерно в чем проблема . если нужен скрипт- отправлю. P.S. может посмотрев мои каракули предложите другой пример слайд шоу

saurn · Конфигурация компьютера

Цитата audiofeel:

Всем Доброе утро, помогите = добавил в скрипт "IsSlideShow [1.0.2]" - выходит вот эта ошибка, не знаю даже примерно в чем проблема . если нужен скрипт- отправлю. »

Скрипт дайте

saurn · Конфигурация компьютера

audiofeel,
На какой версии компилите? У меня всё работает.
P.S.
Строчки в скрипте, типа WizardForm.PageNameLabel.Transparent := True, смысла не имеют, и будут вызывать ошибку при компиляции. Стандартный PageNameLabel это TNewStaticText, а оный не поддерживает прозрачность.

audiofeel · Конфигурация компьютера

saurn, на последней которая доступна расширенной unicode (innoultra) вот сейчас с третьего раза вылезла (ошибка появляется после нажатия на кнопку "завершить")

Gnom_aka_Lexander · Отправлено: **10:39, 22-03-2013** | #**1949**

Цитата saurn:

WizardForm.PageNameLabel.Transparent := True, смысла не имеют »

В юникодной инно есть у них такое свойство. и да, у меня тоже все работает. несколько раз проверил.

Цитата audiofeel:

на последней которая доступна расширенной unicode (innoultra) »

Там не последняя. Последнюю не включил в сборку, поскольку опасаюсь багов, ибо она уже на базе следующей версии инно.
Грубых ошибок не вижу, которые могли-бы вызвать ошибки. CallbackCtrl.dll там лишняя, в IsDone уже есть каллбак. Версия инно какая?( в заголовке окна дословно что написано?

audiofeel · Конфигурация компьютера

Gnom_aka_Lexander, 5.5.1.ee2 (u) (build 121002)