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

[Habetdin]

Kashtan007, "Directory Exists" message (http://www.jrsoftware.org/ishelp/index.php?topic=setup_direxistswarning)
[Setup]
DirExistsWarning=no

[White Rabbit]

А можно ли в сделать скрипт для поиска ключей в реестре? Имеется ввиду не конкретное расположение а, например, в ветке какой-нибудь. Допустим есть ветка HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\, ключ находится здесь HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\{4D36E978-E325-11CE-BFC1-08002BE10318}\0000. Но дабы не утруждать себя, поиск, чтобы проходил просто в HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Class\.

[sergey3695]

White Rabbit, RegKeyExists, в справке посмотришь.

[White Rabbit]

Сэнкс. Пользую его, но не могу понять. Я его использую для конкретного параметра, а не для всей ветки. Но ладно посмотрю. Просто наткнулся на проблему, сути которой не понимаю. Упомянутая мною ветка "работает" нормально. Я пытаюсь следить за параметром в ветке HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\ и здесь проблемы. В Windows XP SP3 x86 всё работает чётко, но на Windows 7 Ultimate SP1 x64 траблы. Не работает контроль параметра. В:
[code]
......
if not RegKeyExists(HKLM,'SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\A360E2EA788FFC586113AFE1F2AAB F01EBE7A248') then
.....

[Shkutu]

Сэнкс » Для этого есть "полезное сообщение".
Не работает контроль параметра »
А вы уверены, что параметр прописывается именно в эту ветку? На 64х битных машинах HKLM\SOFTWARE вообще говоря указывает на HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node. Если же нужна именно HKEY_LOCAL_MACHINE\SOFTWARE ветка, то это HKLM64

[White Rabbit]

Во-первых. Нет не уверен, но и на обратное не натыкался... Пока что. Во-вторых, для варианта HKLM\SYSTEM\CurrentControlSet\Control\Class\ это почему-то не критично. А вот для Uninstall-а - да. В-третьих, я смотрел Regedit-Ом - там ничего про HKLM64 не упоминается. В-четвёртых, проверил. Вы правы. Так и есть. Но эта фишка критична только для анинсталла.

[saneksanek]

Знающие люди могут подсказать в чем может быть проблема? http://forum.oszone.net/post-2354997-778.html

[Dodakaedr]

saneksanek, удалите процедуры HideComponents и ShowComponents(CurPageID: Integer), все что в них указывается укажите в CurPageChanged(CurPageID: Integer)...

[diman_21Ru]

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

[Dodakaedr]

diman_21Ru, посмотрите вот это (http://forum.oszone.net/post-2353937-715.html) может поможет.

[diman_21Ru]

Dodakaedr, Не помогло даже картинки не выходят почему то

[Dodakaedr]

diman_21Ru, без скрипта не разобратся

[diman_21Ru]

Dodakaedr, в личку кину

[ROMKA-1977]

Подскажите пож как решить следующую проблему:
1) На InnerPage прописал Bevel2
2) Необходимо чтобы он отображался ТОЛЬКО при отображении страницы SelectDirPage

[saurn]

Необходимо чтобы он отображался ТОЛЬКО при отображении страницы SelectDirPage »
procedure CurPageChanged(CurPageID: Integer);
begin
Bevel2.Hide;

case CurPageID of
wpSelectDir: Bevel2.Show;
end;
end;

[ROMKA-1977]

saurn, СПС. Всё ОК!

[saneksanek]

Dodakaedr, Все тоже самое

[sergey3695]

saneksanek,
if CurPageID = wpWelcome then
begin
WizardForm.OuterNotebook.Hide;
FinishedImage.Hide;

end;
else if CurPageID = wpFinished then
begin
WizardForm.OuterNotebook.Hide;
MainImage.Hide;
FinishedImage.Show;
end;
else WizardForm.OuterNotebook.Show;это сотри нафиг.
procedure InitializeWizard;
begin
WizardForm.OuterNotebook.Hide;
end;
этого вполне достаточно, чем бред писать.

[saneksanek]

sergey3695, Тогда пропадет картинка,на в начале и конце.

[Dodakaedr]

saneksanek, procedure CurPageChanged(CurPageID: Integer);
begin
WizardForm.OuterNotebook.Hide;
case CurPageID of
wpWelcome:
begin
Welcome1.Show;
Welcome2.Show;
MainImage.Show;
WizardForm.OuterNotebook.Show;
FinishedImage.Hide;
end;

wpFinished:
begin
FinishedHeadingLabel.Show;
FinishedLabel.Show;
WizardForm.OuterNotebook.Show;
FinishedImage.Show;
MainImage.Hide;
end;
end;
end;