|
Компьютерный форум OSzone.net » Автоматическая установка Windows » Автоматическая установка приложений » Скрипты Inno Setup. Помощь и советы [часть 7] |
|
Скрипты Inno Setup. Помощь и советы [часть 7]
|
Ветеран Сообщения: 1264 |
Профиль | Отправить PM | Цитировать
Внимание! Данная тема предназначена только для обсуждения написания скриптов !
Остальные вопросы, а также последние версии компилятора в теме Inno Setup. Прочие вопросы. Показать/скрыть: Справка, руководство, примеры:
Показать/скрыть: Ссылки на примеры скриптов:
Показать/скрыть: Дополнительные программы для Inno Setup:
Предыдущие ветки обсуждения по ссылкам ниже и в прикреплённых архивах: Скрипты Inno Setup. Помощь и советы (Archive Pack 1):
Скрипты Inno Setup. Помощь и советы [часть 6] |
|
Отправлено: 11:48, 10-03-2014 |
Ветеран Сообщения: 857
|
Профиль | Отправить PM | Цитировать Цитата Tixo:
|
|
------- Отправлено: 19:33, 12-11-2014 | #1941 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Ветеран Сообщения: 1264
|
Профиль | Отправить PM | Цитировать Цитата diman_21Ru:
Цитата VoLT:
|
||
Отправлено: 16:41, 13-11-2014 | #1942 |
Пользователь Сообщения: 74
|
Профиль | Отправить PM | Цитировать Подскажите возможно ли сделать кнопу закрытия окна инсталятора (верхний правый угол) не активной ?
|
Отправлено: 20:55, 13-11-2014 | #1943 |
Ветеран Сообщения: 517
|
Профиль | Отправить PM | Цитировать Цитата ROMKA-1977:
|
|
Отправлено: 08:26, 14-11-2014 | #1944 |
Новый участник Сообщения: 43
|
Профиль | Отправить PM | Цитировать Здравствуйте,возможно-ли в данный код добавить функцию,чтобы автоматом не выбирались компоненты над которыми работает код.
Пробовал flags "dontinheritcheck" но его нельзя совмещать с "exclusive" [Types] Name: viborochnaya; Description: Выборочная установка; Flags: iscustom [Components] Name: AB;Description: Группы A и B;Flags: exclusive Name: AB\A; Description: Группа A Name: AB\A\A1; Description: Компонент 1;Flags: exclusive Name: AB\A\A2; Description: Компонент 2;Flags: exclusive Name: AB\A\A3; Description: Компонент 3;Flags: exclusive Name: AB\A\A4; Description: Компонент 4;Flags: exclusive Name: AB\B; Description: Группа B Name: AB\B\B1; Description: Компонент 1;Flags: exclusive Name: AB\B\B2; Description: Компонент 2;Flags: exclusive Name: AB\B\B3; Description: Компонент 2;Flags: exclusive Name: AB\B\B4; Description: Компонент 4;Flags: exclusive [_Files] Source: compiler:Examples\MyProg.exe; DestDir: {app}; Check: Check1 Source: compiler:Examples\MyProg.chm; DestDir: {app}; Check: Check2 [_Code] function Check1: Boolean; begin Result:=WizardForm.ComponentsList.ItemEnabled[1] and WizardForm.ComponentsList.Checked[0] begin Result:=WizardForm.ComponentsList.ItemEnabled[2] and WizardForm.ComponentsList.Checked[0] end end; function Check2: Boolean; begin Result:=WizardForm.ComponentsList.ItemEnabled[4] and WizardForm.ComponentsList.Checked[3] begin Result:=WizardForm.ComponentsList.ItemEnabled[5] and WizardForm.ComponentsList.Checked[3] end end; procedure OnClickCheck(Sender: TObject); begin if WizardForm.ComponentsList.Checked[1] = True then begin WizardForm.ComponentsList.ItemEnabled[6]:=False WizardForm.ComponentsList.ItemEnabled[7]:=False WizardForm.ComponentsList.ItemEnabled[8]:=False WizardForm.ComponentsList.ItemEnabled[9]:=False WizardForm.ComponentsList.ItemEnabled[10]:=False end else begin WizardForm.ComponentsList.ItemEnabled[6]:=True WizardForm.ComponentsList.ItemEnabled[7]:=True WizardForm.ComponentsList.ItemEnabled[8]:=True WizardForm.ComponentsList.ItemEnabled[9]:=True WizardForm.ComponentsList.ItemEnabled[10]:=True end if WizardForm.ComponentsList.Checked[6] = True then begin WizardForm.ComponentsList.ItemEnabled[1]:=False WizardForm.ComponentsList.ItemEnabled[2]:=False WizardForm.ComponentsList.ItemEnabled[3]:=False WizardForm.ComponentsList.ItemEnabled[4]:=False WizardForm.ComponentsList.ItemEnabled[5]:=False end else begin WizardForm.ComponentsList.ItemEnabled[1]:=True WizardForm.ComponentsList.ItemEnabled[2]:=True WizardForm.ComponentsList.ItemEnabled[3]:=True WizardForm.ComponentsList.ItemEnabled[4]:=True WizardForm.ComponentsList.ItemEnabled[5]:=True end end; procedure InitializeWizard(); begin WizardForm.ComponentsList.Checked[1]:=True WizardForm.ComponentsList.Checked[6]:=True WizardForm.ComponentsList.OnClickCheck:=@OnClickCheck end; |
Отправлено: 14:30, 15-11-2014 | #1945 |
Ветеран Сообщения: 857
|
Профиль | Отправить PM | Цитировать Цитата saneksanek:
|
|
------- Отправлено: 17:46, 15-11-2014 | #1946 |
Новый участник Сообщения: 43
|
Профиль | Отправить PM | Цитировать Dodakaedr, Данный код блокирует другие компоненты при выборе того или иного компонента,в данном случае если выбрать группу А закроется группа Б и на оборот,на те компоненты которые подключены к коду выбираются автоматом.
Из-за этого выходит так что стоят галки в компонентах и А и Б а мне это не нужна так как все эти файлы не совместимы с друг-другом. |
Последний раз редактировалось saneksanek, 15-11-2014 в 19:57. Отправлено: 19:49, 15-11-2014 | #1947 |
Ветеран Сообщения: 532
|
Профиль | Отправить PM | Цитировать Забыл..что нужно написать, чтобы было не ниже Seven sp1
MinVersion: xxxxxx |
------- Отправлено: 19:53, 15-11-2014 | #1948 |
Ветеран Сообщения: 857
|
Профиль | Отправить PM | Цитировать Цитата saneksanek:
Скрытый текст
[Setup] AppName=My Program AppVersion=1.5 DefaultDirName={pf}\My Program [Languages] Name: "default"; MessagesFile: "compiler:Default.isl" [Types] Name: viborochnaya; Description: Выборочная установка; Flags: iscustom [Components] Name: AB;Description: Группы A и B;Flags: exclusive Name: AB\A; Description: Группа A Name: AB\A\A1; Description: Компонент 1;Flags: exclusive Name: AB\A\A2; Description: Компонент 2;Flags: exclusive Name: AB\A\A3; Description: Компонент 3;Flags: exclusive Name: AB\A\A4; Description: Компонент 4;Flags: exclusive Name: AB\B; Description: Группа B Name: AB\B\B1; Description: Компонент 1;Flags: exclusive Name: AB\B\B2; Description: Компонент 2;Flags: exclusive Name: AB\B\B3; Description: Компонент 2;Flags: exclusive Name: AB\B\B4; Description: Компонент 4;Flags: exclusive [Files] Source: compiler:Examples\MyProg.exe; DestDir: {app}; Check: Check1 Source: compiler:Examples\MyProg.chm; DestDir: {app}; Check: Check2 [Code] function Check1: Boolean; begin Result:=WizardForm.ComponentsList.ItemEnabled[1] and WizardForm.ComponentsList.Checked[0]; begin Result:=WizardForm.ComponentsList.ItemEnabled[2] and WizardForm.ComponentsList.Checked[0]; end; end; function Check2: Boolean; begin Result:=WizardForm.ComponentsList.ItemEnabled[4] and WizardForm.ComponentsList.Checked[3]; begin Result:=WizardForm.ComponentsList.ItemEnabled[5] and WizardForm.ComponentsList.Checked[3]; end; end; procedure OnClickCheck(Sender: TObject); begin if WizardForm.ComponentsList.Checked[1] = True then begin WizardForm.ComponentsList.ItemEnabled[6]:=False; WizardForm.ComponentsList.ItemEnabled[7]:=False; WizardForm.ComponentsList.ItemEnabled[8]:=False; WizardForm.ComponentsList.ItemEnabled[9]:=False; WizardForm.ComponentsList.ItemEnabled[10]:=False; end else begin WizardForm.ComponentsList.ItemEnabled[6]:=True; WizardForm.ComponentsList.ItemEnabled[7]:=True; WizardForm.ComponentsList.ItemEnabled[8]:=True; WizardForm.ComponentsList.ItemEnabled[9]:=True; WizardForm.ComponentsList.ItemEnabled[10]:=True; end; if WizardForm.ComponentsList.Checked[6] = True then begin WizardForm.ComponentsList.ItemEnabled[1]:=False; WizardForm.ComponentsList.ItemEnabled[2]:=False; WizardForm.ComponentsList.ItemEnabled[3]:=False; WizardForm.ComponentsList.ItemEnabled[4]:=False; WizardForm.ComponentsList.ItemEnabled[5]:=False; end else begin WizardForm.ComponentsList.ItemEnabled[1]:=True; WizardForm.ComponentsList.ItemEnabled[2]:=True; WizardForm.ComponentsList.ItemEnabled[3]:=True; WizardForm.ComponentsList.ItemEnabled[4]:=True; WizardForm.ComponentsList.ItemEnabled[5]:=True; end; end; procedure InitializeWizard(); begin WizardForm.ComponentsList.Checked[1]:=True; WizardForm.ComponentsList.ItemEnabled[6]:=False; WizardForm.ComponentsList.ItemEnabled[7]:=False; WizardForm.ComponentsList.ItemEnabled[8]:=False; WizardForm.ComponentsList.ItemEnabled[9]:=False; WizardForm.ComponentsList.ItemEnabled[10]:=False; WizardForm.ComponentsList.OnClickCheck:=@OnClickCheck; end; |
|
------- Отправлено: 20:45, 15-11-2014 | #1949 |
Пользователь Сообщения: 87
|
Профиль | Отправить PM | Цитировать Всем привет Подскажите пожалуйста команду, чтобы приложение автоматически установилось в папку "Мои документы". То есть я установила приложение с офсайта и оно у меня автоматически установилось по пути C:\Users\Ирина\Documents\TMClientProfile. А теперь мне нужно сделать установщик, который бы тоже автоматически устанавливал программу по тому же пути.
Ранее уже как то задавалась этим вопросом, но тогда мне нужно было, чтобы программа установилась в папку ProgramData. Оказалось, все очень просто: Source: "C:\ProgramData\Firefly Studios\*"; DestDir: "{commonappdata}\Firefly Studios"; Flags: ignoreversion recursesubdirs createallsubdirs В общем, может есть какой то код, чтоб приложение устанавливалось в папку "Мои документы" по умолчанию? Спасибо. |
Отправлено: 01:10, 16-11-2014 | #1950 |
Участник сейчас на форуме | Участник вне форума | Автор темы | Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Скрипты Inno Setup. Помощь и советы [часть 6] | El Sanchez | Автоматическая установка приложений | 2494 | 10-03-2014 11:51 | |
Скрипты Inno Setup. Помощь и советы [часть 5] | El Sanchez | Автоматическая установка приложений | 1999 | 28-03-2013 19:09 | |
Скрипты Inno Setup. Помощь и советы [часть 4] | El Sanchez | Автоматическая установка приложений | 2099 | 22-05-2012 23:16 | |
Скрипты Inno Setup. Помощь и советы [часть 3] | Serega | Автоматическая установка приложений | 3755 | 26-10-2011 17:58 | |
[архив] Скрипты Inno Setup. Помощь и советы [часть 2] | Serega | Автоматическая установка приложений | 2651 | 08-11-2010 18:34 |
|