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

mariolast · Отправлено: **16:27, 22-03-2010** | #**1571**

Мне нужно сделать так, чтобы в поле ввода пути назначения стоял по умолчанию путь, который зависит от Типа устанавливаемого приложения.
Думаю, что для этого надо чтобы страница выбора компонентов выскакивала раньше чем страница выбора пути.
Делал так

procedure CurPageChanged(CurPageID: Integer);
begin

with WizardForm do
begin
if CurPageID = wpSelectDir then
begin
SelectDirPage.Notebook.ActivePage:= SelectComponentsPage;
end;
if CurPageID = wpSelectComponents then
SelectComponentsPage.Notebook.ActivePage:= SelectDirPage;
DiskSpaceLabel.Caption:= ComponentsDiskSpaceLabel.Caption;
if isComponentSelected('zs') then DirEdit.Text:=ExpandConstant('{pf}\proga1) else DirEdit.Text:=ExpandConstant('{pf}\proga2');
if CurPageID = wpSelectProgramGroup then
begin
if isComponentSelected('proga1') then GroupEdit.Text:='proga1' else GroupEdit.Text:='proga2';
end;
end;

Кнопка Обзор фактически тут не работает....чтобы ни выбирал я...ставится будет либо в {pf}\proga1 либо в {pf}\proga2.
И еще при выборе отличного по умолчанию пути всегда высвечивается то что задано в начале скрипта в DefaultDirName={pf}\..., приходится ручками стирать, вот бы это DefaultDirName можно было изменять...

Можно как то ситуацию поправить без создания пользовательского окна? Или может есть уже готовый скрипт для такого окна более-менее приличного вида...

A1EXXX · Отправлено: **20:13, 22-03-2010** | #**1572**

Inno Setup Compiler 5.3.8 build 100322 Final от Restools

Habetdin · Отправлено: **21:58, 22-03-2010** | #**1573**

Цитата YURSHAT:

ЗЫ. В каких строчках выдавало ошибку? »

YURSHAT · Отправлено: **23:20, 22-03-2010** | #**1574**

Habetdin, эт я уже понял. просто закоментируйте строку. Рестулзовскому юникоду эту не нужно.

ЗЫ. Эту фигню я поправлю

Habetdin · Отправлено: **23:26, 22-03-2010** | #**1575**

YURSHAT,

Цитата YURSHAT:

просто закоментируйте строку »

Вот тогда и выдает "Unknown type":

alex2010 · Отправлено: **00:33, 23-03-2010** | #**1576**

Habetdin, сделай вот так:
//PAnsiChar = PChar;

Habetdin · Отправлено: **00:40, 23-03-2010** | #**1577**

alex2010, я что, заккоментировать строку не могу?

Ошибку из поста выше выдает после комментирования

comsun · Отправлено: **01:01, 23-03-2010** | #**1578**

Можно ли на Inno Setup собрать "тихий" инсталлятор?
И если можно,то как?
Спасибо.

alex2010 · Отправлено: **01:37, 23-03-2010** | #**1579**

Habetdin,

у меня этой ошибки нет, хочешь закомментируй, хочешь не комментируй

YURSHAT, а как сделать в твоем новым скрипте так, чтоб скин загружался без autorun, т.е. когда удаляешь код autorun'а то скин не загружается???

YURSHAT · Отправлено: **02:11, 23-03-2010** | #**1580**

Цитата Habetdin:

Ошибку из поста выше выдает после комментирования »

Я чуть позже подправлю этот недочет.

Цитата alex2010:

URSHAT, а как сделать в твоем новым скрипте так, чтоб скин загружался без autorun, т.е. когда удаляешь код autorun'а то скин не загружается?? »

1. Самый простой способ отключения Авторана (ничего не удаляя) это

Код:

function InitializeSetup(): Boolean;
begin
  ExtractTemporaryFile('Tiger.cjstyles');
  LoadSkin(ExpandConstant('{tmp}\Tiger.cjstyles'), '');
  Result := AutoRunExec;
end;

заменить Result := AutoRunExec на Result := True.

2. Загрузка скина происходит в функции InitializeSetup, не удаляй ее при удалении строк отвечающих за авторан

Цитата comsun:

Можно ли на Inno Setup собрать "тихий" инсталлятор? »

Почитайте справку (к Inno Setup)