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

Noname22 · Отправлено: **05:17, 30-07-2013** | #**921**

Цитата jiumx60rus:

Сам адрес-то и прописан в CompileCode.bin»

Люди умудряются от туда пароли вытаскивать:

Цитата Noname22:

удалось извлечь файл CompiledCode.bin, в котором можно посмотреть пароль. »

mat_y@vk · Отправлено: **09:13, 30-07-2013** | #**922**

Господа!
А есть ли возможность проверять перед установкой правильность выбора папки установки (когда файлы накатываются на установленную программу)?
Например, проверять в папке установки наличие какого либо файла?

alex barmalei · Отправлено: **09:33, 30-07-2013** | #**923**

saurn, Excludes помог, благодарствую.

Noname22 · Отправлено: **09:50, 30-07-2013** | #**924**

Цитата mat_y@vk:

Например, проверять в папке установки наличие какого либо файла? »

mat_y@vk · Отправлено: **11:44, 30-07-2013** | #**925**

Noname22, вставил вот так:

Код:

var Flag: boolean;
function InitializeSetup: Boolean;
begin
Flag:= True;
Result:=true;
if not FileExists(ExpandConstant('{app}')+'\res\resources.xml')
then
begin
MsgBox('На вашей системе не обнаружена My Program! Сначала установите My Program, затем начните установку заново.', mbInformation, MB_OK);
Flag:= False;
Result:=false;
end;
end;

Получаю ошибку

пробовал разные имена файлов и разные папки... что ему не нравится в app???

Mailchik · Отправлено: **11:57, 30-07-2013** | #**926**

mat_y@vk, константа {app} действительна после страницы SelectDir. На этапе инициализации она не известна, вот и ошибка.

alex barmalei · Отправлено: **11:58, 30-07-2013** | #**927**

Подскажите, как называются эти линии, чтобы можно было к ним обратится через WizardForm?
Хочу у них цвет поменять.

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

mat_y@vk, пишет, что пытаетесь применить константу "app" прежде, чем она была инициализирована. По русски - пытаешься применить константу "app" до того, как инсталлятор её получит. Это делается на SelectDirPage в function NextButtonClick(CurPageID: Integer): Boolean;

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

Цитата El Sanchez:

Цитата mifkys:
Можно ли во время установки после каждой записи в блоке [Run] выводить окно о запросе на продолжение установки, чтобы пользователь сам нажимал "Далее" »
mifkys, можно. Вопрос в том, что делать, если пользователь не захочет продолжать. В таком случае прервать работу установщика не удасться. »

Добрый день. Все-таки нужно отменить установку в случае, если пользователь нажмет "Отмена". Это как-то можно реализовать?

В секции [Run] у меня по очереди запускаются приложения, но на 4 файле мне нужно вывести окно, которое остановит продолжение установки до тех пор, пока пользователь не нажмет "ОК". Если же он нажмет "Отмена", то установка должна быть отменена. Сам инсталлятор работает с флагом Uninstallable=no, т.е. в portable режиме, поэтому прерывание установки мне не страшно. Окно я вывел через процедуру BeforeInstall на нужном файле, но

Код:

CancelWithoutPrompt := true;
WizardForm.Close;

не помогает. Что можно придумать? Не уже ли придется все описывать в секции [code]?

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

alex barmalei, они называются Bevel и Bevel1, и у них есть только свойства Shape: и Style:. Свойства Color у них нет.