|
Компьютерный форум OSzone.net » Автоматическая установка Windows » Автоматическая установка приложений » Скрипты Inno Setup. Помощь и советы [часть 8] |
|
Скрипты Inno Setup. Помощь и советы [часть 8]
|
Ветеран Сообщения: 1269 |
Профиль | Отправить PM | Цитировать
Внимание! Данная тема предназначена только для обсуждения написания скриптов !
Остальные вопросы, а также последние версии компилятора в теме Inno Setup. Прочие вопросы. Показать/скрыть: Справка, руководство, примеры:
Показать/скрыть: Ссылки на примеры скриптов:
Показать/скрыть: Дополнительные программы для Inno Setup:
Предыдущие ветки обсуждения по ссылкам ниже и в прикреплённых архивах: Скрипты Inno Setup. Помощь и советы (Archive Pack 1):
Скрипты Inno Setup. Помощь и советы [часть 6] Скрипты Inno Setup. Помощь и советы [часть 7] |
|
Отправлено: 08:52, 02-02-2015 |
Пользователь Сообщения: 56
|
Профиль | Отправить PM | Цитировать Цитата NewMix:
|
|
Отправлено: 14:42, 17-04-2015 | #501 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Пользователь Сообщения: 56
|
Профиль | Отправить PM | Цитировать
Цитата NewMix:
|
|||||
Отправлено: 15:00, 17-04-2015 | #502 |
Пользователь Сообщения: 149
|
Профиль | Отправить PM | Цитировать
Всем доброго времени суток!
Возникла следующая проблема. При установке создается .url файл (способ стандартный ) [Icons] Name: "{commondesktop}\WebReports\WebInterface"; Filename: "{code:GetLink}"; Components: iis\web; Tasks: desktopicon\web [Сode] function GetLink(param:string):string; begin result:='http://127.0.0.1:' + SitePortPage.values[0] + '/webinterface/Home/Login'; end; Подскажите пожалуйста, откуда может взяться эта проблема и как ее решить. |
||||||||
Отправлено: 15:30, 17-04-2015 | #503 |
Ветеран Сообщения: 858
|
Профиль | Отправить PM | Цитировать
Цитата Shkutu:
|
|||||
------- Отправлено: 15:46, 17-04-2015 | #504 |
Новый участник Сообщения: 6
|
Профиль | Отправить PM | Цитировать Цитата NewMix:
|
|
Отправлено: 16:08, 17-04-2015 | #505 |
Пользователь Сообщения: 149
|
Профиль | Отправить PM | Цитировать Dodakaedr, там неспроста строка, идущая в filename не пишется хардкодом, а возвращается функцией, ибо порт может отличаться. в любом случае, это вряд ли влияет. судя по тому, что, если открыть этот файлик как текст, ссылка там правильная, напрашивается мысль, что проблема не с ярлыком, а с кэшем браузера или системы.
|
Отправлено: 17:07, 17-04-2015 | #506 |
Пользователь Сообщения: 56
|
Профиль | Отправить PM | Цитировать |
Отправлено: 18:21, 17-04-2015 | #507 |
Новый участник Сообщения: 20
|
Профиль | Отправить PM | Цитировать Цитата svs23:
function NextButtonClick(CurPageID: Integer): Boolean; var i: integer; begin Result := True; if CurPageID = wpSelectDir then begin if (FileSearch('WorldOfTanks.exe', ExpandConstant('{app}')) = '') then begin SuppressibleMsgBox('"WorldOfTanks.exe не найден в папке назначения, проверьте путь к игре".', mbCriticalError, MB_OK, MB_OK); Result := False; end else Result := True; end else if CurPageID = ComponentsPage1.ID then begin Result := False; for i:= 0 to ComponentsList1.Items.Count - 1 do begin if (ComponentsList1.Checked[i]) then begin Result := True; Break; end; end; if Not Result then MsgBoxEx(0, 'Не один из компонетов не выбран!','Внимание!!',MB_OK or MB_ICONWARNING, 0, 0); end else begin Result := True; end; end |
|
Отправлено: 19:02, 17-04-2015 | #508 |
Пользователь Сообщения: 56
|
Профиль | Отправить PM | Цитировать ekspoint, спс
|
Отправлено: 19:10, 17-04-2015 | #509 |
Новый участник Сообщения: 20
|
Профиль | Отправить PM | Цитировать Помогите прицепить новый тип установки к новому компонент листу
[Setup] AppName=Моя программа AppVersion=1.5 DefaultDirName={pf}\Моя программа DirExistsWarning=no AppendDefaultDirName=no [CustomMessages] CompName1=Компонент 1 CompName2=Компонент 2 CompSubtitlesLng=Язык субтитров CompVoiceLng=Язык озвучки CompRussian=Русский CompEnglish=Английский [_CODE] var ComboBox: TNewComboBox; Page: TWizardPage; var ComponentsList1: TNewCheckListBox; procedure CreateWizardPages; begin begin Page := CreateCustomPage(wpWelcome, '', ''); ComboBox := TNewComboBox.Create(Page); ComboBox.Width := Page.SurfaceWidth; ComboBox.Parent := Page.Surface; ComboBox.Style := csDropDownList; ComboBox.Items.Add('TComboBox 1'); ComboBox.Items.Add('TComboBox 2'); ComboBox.Items.Add('TComboBox 3'); ComboBox.Items.Add('TComboBox 4'); ComboBox.Items.Add('TComboBox 5'); ComboBox.ItemIndex := 0; end; //========================================================================\\ ComponentsList1 := TNewCheckListBox.Create(WizardForm); with ComponentsList1 do begin Parent := Page.Surface; SetBounds(ScaleX(0), ScaleY(61), ScaleX(417), ScaleY(169)); AddCheckBox(CustomMessage('CompSubtitlesLng'), '', 0, True, True, False, True, nil); //0 AddRadioButton(CustomMessage('CompRussian'), '', 1, True, True, nil); //1 AddRadioButton(CustomMessage('CompEnglish'), '', 1, True, True, nil); //2 AddCheckBox(CustomMessage('CompVoiceLng'), '', 0, True, True, False, True, nil); //3 AddRadioButton(CustomMessage('CompRussian'), '', 1, True, True, nil); //4 AddRadioButton(CustomMessage('CompEnglish'), '', 1, True, True, nil); //5 end; end; function IsComponentsForm1(CompIndex: Integer): Boolean; var i: Integer; begin Result := False; for i := 0 to ComponentsList1.ItemCount - 1 do begin if CompIndex <= (ComponentsList1.ItemCount - 1) then Result := ComponentsList1.Checked[CompIndex]; end; end; procedure InitializeWizard(); begin CreateWizardPages; end; |
Последний раз редактировалось ekspoint, 18-04-2015 в 00:31. Отправлено: 00:24, 18-04-2015 | #510 |
Участник сейчас на форуме | Участник вне форума | Автор темы | Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Скрипты Inno Setup. Помощь и советы [часть 7] | El Sanchez | Автоматическая установка приложений | 2499 | 02-02-2015 08:59 | |
Скрипты 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 |
|